在Form1和form2的Uses下加各自的单元，但是要避免循环调用，不然编译器是报错的。
应该这样调用：
unit Unit1;
interface
uses
Unit2.pas;
......
--------------------------
unit Unit2;
interface
uses
......
var
Form2: TForm2;
implementation
Uses
Unit1.pas
......
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024