直接引用就可以了如 functionName(aForm:TForm;...);只不过aForm就好像c中的指针,
所有对aForm的改动,都将反映到传进来的参数中,
如调用 functionName(Form1;...);函数体
begin
aForm.left:=0;//则Form1的left也会变成0;
end;
所有对aForm的改动,都将反映到传进来的参数中,
如调用 functionName(Form1;...);函数体
begin
aForm.left:=0;//则Form1的left也会变成0;
end;
unit main;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ShellAPI;
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ShellAPI,//这儿你的单元名;