wxColourDialog*?dialog?=?new?wxColourDialog(NULL);
??if(dialog->ShowModal()?==?wxID_OK?)
??{
???wxColourData?data?=?dialog->GetColourData();
???dialog->Destroy();
??} 不要...
分类：
其他好文 时间：
2015-04-17 20:39:22
阅读次数：
134
if Form1.showmodal = mrok then这句话什么意思？ 首先，所有的命令按钮(不论是Button还是BitBtn)都有一个属性：ModalResult，该属性可以设置为mrOk、mrCancel...等等，默认值是mrNone(ModalResult是一个整型值，只要你在用S....
分类：
其他好文 时间：
2015-04-04 21:05:38
阅读次数：
190
procedureTRES_CQ_JB_F.N1Click(Sender:TObject);variLoop:Integer;begininherited;if_JuMaPao=3thenbeginifIsZCJB=2thenbeginCQ_JB_P_F:=TCQ_JB_P_F.Create(Self);ifCQ_JB_P_F.ShowModal=mrokthenbegincxGrid2.BeginUpdate;cxGrid2DBTableView1.BeginUpdate;foriLoop:=0tocxGr..
分类：
其他好文 时间：
2014-12-28 02:00:39
阅读次数：
178
Show:
Use Show to set the form Visible property to true and to bring the form to the front of other forms on the screen.
ShowModal:
Use ShowModal to show a form as a modal form. A modal form is ...
分类：
其他好文 时间：
2014-12-17 18:28:10
阅读次数：
219
procedure TForm1.Button1Click(Sender: TObject);var F:TForm2;begintry F:= TForm2.Create(nil); F.ShowModal;finally F.Free;end;end;
学习一种语言的第一句话：Hello World通过一个例子认识到三点;1,Form1.close为关闭当前窗体并释放资源；application.Terminate为关闭所有窗体并释放资源。2,form2.Show显示窗体2后还可以编辑窗体1；form2.ShowModal显示窗体2后不能编辑窗体1...
分类：
其他好文 时间：
2014-10-29 01:53:57
阅读次数：
134
mrNone 0 None. Used as a default value before the user exits.mrOk 1 The user exited with OK button. mrCancel 2 The user exited with the CANCEL button....
procedure TForm1.Button1Click(Sender: TObject);begin Form2 := TForm2.Create(Self); Form2.ShowModal(procedure(ModalResult : TModalResult) ...
分类：
移动开发 时间：
2014-09-24 14:15:26
阅读次数：
219
Calling ShowModal as an Anonymous Method on All Platformsprocedure THeaderFooterForm.btnPickClick(Sender: TObject);var dlg: TForm1;begin dlg := TFor.....
分类：
其他好文 时间：
2014-08-06 01:19:51
阅读次数：
227
简单的说，就是一个在弹出窗口之后可以做其它的事，即window.open另一个在弹出窗口之后不能做其它的事，只能是关闭了当前的窗口之后才能做其它的事，即window.showModalDialog那么两者在使用上有什么不同呢？他们分别是如何和父窗口进行交互的呢？先来看window.showModal...
