重载界面的CREATE函数。
例如:constructor Create(填写不同的参数即可); overload;
session相当于delphi全局变量,你可以用全局变量,但建议,最好方法,就是写个带参数的方法,调用时传入即可
如你可以在你要调用的这样写
private
FMyValue: string;
public
procedure SetParam(MyValue: string);
.....
procdure TForm1.SetParam(MyValue: string);
begin
FMyValue := MyValue;
end;
MyValue 就你要传入的参数, 值被传到FMyValue中;
调用:
Form1 := TForm1.Create(nil);
try
Form1.SetParam('你好,世界世界!');
Form1.Showmodual;
finally
Form1.Free;
end;
//这样,“你好,世界世界!”就被传到FMyValue中啦
你可以定义一个全局变量来传递