DLL中两个窗体调用时出错！跪求》》》》》》》》》》》》》》

Question

在DLL下用TForm1窗体Click事件里创建TForm2窗体procedure TForm1.FormClick(Sender: TObject);
Var
  F1:TForm2; //TB为窗体
begin
   F1:=TForm2.Create(Self);
   F1.Show;
end;然后再在Form2的单击事件中为Form1上的Edit1.Text赋值，此进出错，
Access Violation at address 02b8ef7b in module 'bas004.dll'.Read of address 0000002fc.请高人指点。

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  if not Assigned(Form2) then
     Form2:=TForm2.Create(nil);
  Form2.ShowModal;
end;

Answer 2

不知你的两个窗体文件的pas文件中uses 是如何引用的
两个单元不能都在文件中相互引用,要引用的话,
uses Form1Unit; 和 uses Form2Unit;都要放在implementation关键字后

Answer 3

不是吧，应该是一个放在 interface 里
另一个是放在implementation 里