procedure ShowMessage();
begin
      MainFormW.Edit1.Text:= 'Test';
end;第一个,
你是不是C学出来的,老是用指针,不要太复杂了