window.open ('page.html', 'newwindow', 'height=100, width=400, top=0, left=0, toolbar=no, menubar=no, scrollbars=no, resizable=no,location=no, status=... ...
提示框： wx.showToast(OBJECT) 显示消息提示框 OBJECT参数说明： 示例代码： wx.hideToast() 隐藏消息提示框 wx.showModal(OBJECT) ?显示模态弹窗 OBJECT参数说明： 示例代码： wx.showActionSheet(OBJECT) ? ...
分类：
微信 时间：
2016-11-17 13:59:41
阅读次数：
759
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons; type TForm1 = class( ...
procedure TForm1.Button1Click(Sender: TObject);varChildForm: TForm2;beginChildForm := TForm2.Create(nil);ChildForm.ShowModal(procedure(ModalResult: TM ...
procedure TForm1.Button1Click(Sender: TObject);var ChildForm: TForm2;begin ChildForm := TForm2.Create(nil); ChildForm.ShowModal( procedure(ModalResult ...
使用 ShowModal ： ps. 在 XE8 之前的版本，对于使用多 Form 实在不敢领教，问题不外乎创建慢，耗记忆体等问题，但到了 XE8 后的版本，此方面改进了不少，可以放心的使用了。
分类：
其他好文 时间：
2016-03-16 21:00:53
阅读次数：
392
Delphi的fsMDIChild类型的窗体是不能使用ShowModal的，否则会弹出"Cannot make a visible window modal"异常，但是把fsMDIChild改为fsNormal类型之后使用ShowModal，依旧会弹出＂Cannot make a visible w...
procedure TForm1.RichEdit1KeyPress(Sender: TObject; var Key: Char);begin if key='+' then begin form2.ShowModal; key:=#0;//关键此步骤 end;end;
Delphi中的窗体分为模式窗体和无模式窗体。二者的区别在于，用户可以在无模式窗体和其他窗体之间切换。这样，用户就可以同时工作于一个应用程序的几个部分。Delphi中窗体的初始化有两种情况，动态创建，和自动创建。通过show显示一个无模式窗体，ShowModal显示一个模式窗体。窗体有创建对应的也要...
252627 //第一种方式procedure TForm1.btn1Click(Sender: TObject);beginWith TForm2.Create(Application) doTry ShowModal;finally free;end;end; //第二种方式proced...
分类：
其他好文 时间：
2015-05-12 20:41:57
阅读次数：
121
