如何给FORM传递创建时要用的参数?(100分)

给FORM传递create时要用的参数,我目前采用的方法有两种:
1.在FORM单元中建立全局变量
2.在FORM单元中创建一函数或过程,再将参数赋值给单元内部变量,再创建FORM
总觉得以上方法都不理想,不知那位大侠有高招,望能赐教,不胜感谢!

标准方法是：重载TForm的constructor Create方法，并在Create方法里引入你要的参数

可以改写Create.
constructor Create(AOwner : TComponent
AParam : TYourParam)

~~~~~~~~~~~~~~~~~~~~~
你的参数
实现部分可以这样写
constructor Create(AOwner: TComponent
AParam: TYourParam);
begin
inherited Create(AOwner);
..... //你的处理代码
end;

这样生成Form只需
MyForm := TMyForm(self,YourParam);就可以了.

谢谢两位大侠,我是半调子DELPHI程序员,这么简单的方法都没想到,该打!