DELPHI打开新窗口，可以离开主窗口

procedure TForm1.About1Click(Sender: TObject);
begin // 打开新窗口，可以离开主窗口。
if not assigned(helpForm) then
helpForm:=helpForm.create(self);
helpForm.show;
end;[@more@]procedure TForm1.About1Click(Sender: TObject);
begin
if not assigned(helpForm) then
helpForm:=helpForm.create(self);
helpForm.show;
end;

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/729024/viewspace-1020604/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/729024/viewspace-1020604/