delphi怎样在关闭程序时弹出窗口?
我想在关闭delphi编译的程序时,弹出“您是否确实要退出的窗口”点击否不退出,是退出
在主窗体的CloseQuery事件里,使用messagebox进行提示,根据选择的按钮对Canclose进行设置就可以了 如 begin if messagebox(handle, '是否退出程序', '提示', MB_YESNO ) = IDNO then Canclose = False; end;
楼上说的对.当窗体关闭的时候FormCloseQuery这个时间可以通过参数 canclose来控制窗口是否关闭.
详细代码:procedureTunFDataCol.FormCloseQuery( :Boolean);beginCanClose:=False;ifMessageDlg('Areyousuretoclosetheprogram?',mtConfirmation,[mbYES,mbNO],0)=mrYesthenbeginCanClose:=True;end;end;
答:我们建立了两个窗口,就有两个窗口单元文件Unit1和Unit2,要在窗口1中调用窗口2,必须在窗口1的单元接口部分加上窗口2的单元文件Unit2。反之窗口2要调...详情>>
答:我建议你去--天下网吧联盟 这里面都是网吧业主和网管交流的论坛,你可以自己注册一个用户进去看看,你可以和他们交流也可以寻求他们的帮助,我想没有你解决不了的问题,...详情>>
答:格式化文本区域的段落标记,用于规定文本和层的属性和位置等。比如: 新浪网 用来规定 新浪网 这三个字居中显示。 文本中心(CENTER)、左(LEFT)或右(R...详情>>