unit1调用 在线等!

Question

form1-----unit1               主窗体
form2-----unit2               窗体2
form3-----unit3               窗体3当我在unit2中的uses里添加unit1后,    在unit3中就无法再添加unit1.有什么好办法么?在线急等.

Answer 1

把unit1添加到{$R *.dfm}后面，如下所示,unit2中也要这样添加
var
  Form3: TForm3;implementation{$R *.dfm}
uses
unit1;
procedure TForm3.Button1Click(Sender: TObject);