全局变量和函数都在接口处定义unit unit1interface.....var Form1:TForm1; //在这里定义全局变量或函数 //例如全局定义整型变量A A:Integer; //定义全局函数B function B(X,Y:Integer):Integer;implementation...