下面的代码中的frmload.ShowModal=mrok 是在那里定义的?还是有其它意思,请赐教。
begin
Application.Initialize;
try
frmload:=Tfrmload.Create(nil);
finally
if frmload.ShowModal=mrok then
begin
application.Terminate;
end;
frmload.Destroy;
end;
Application.Title := 订单信息管理系统;
Application.CreateForm(Tmainform, mainform);
Application.CreateForm(Tzhibanform, zhibanform);
……
按住Ctrl再点击mrOK,你就找到定义的地方了。
与按钮有关:
用BitBtn1:设置属性BitBtn1.Kind:=bkOK;BitBtn1.ModalResult:=mrOk
当你点此按钮时,frmload.ShowModal=mrok
设置属性BitBtn1.Kind:=bkCancel;BitBtn1.ModalResult:=mrCancel
当你点此按钮时,frmload.ShowModal=mrCancel
相关kind:bkAbort、bkAll、bkClose....bkYes//看看属性吧
frmload.ShowModal=mrok 是关闭窗体的意思!
有问题请发信息到我的E-mail:guangbowang@yahoo.com.cn