在主窗体的Create事件中,创建你的对话框,如:
var
oDialog:TDialog;
begin
oDialog:=TDialog.create(Application);
try
//加入对对话框的一些操作
oDialog.ShowModal;
finally
oDialog.Free;
end;
end;
TDialog类是你要出弹出的对话框的窗口
var
oDialog:TDialog;
begin
oDialog:=TDialog.create(Application);
try
//加入对对话框的一些操作
oDialog.ShowModal;
finally
oDialog.Free;
end;
end;
TDialog类是你要出弹出的对话框的窗口
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货