Try

    Form2 := TForm2.Create(Self);

    Form2.ShowModule;

  Finally

    Form2.Free;

  End;

End;

[1] Delphi help: Object Pascal Language Guide.

[2] Delphi help: Component writer''''s guide

版权所有：idilent 网站转载请注明作者 其他转载方式请与作者联系(idilent@yahoo.com.cn)。

上一页  [1] [2] [3]