你从哪抄来的??
最好用ID系列
IDYES,IDNO,IDCANCEL
等等
这个7可能就是IDNO吧
还有不要用abort()
用Action:=canone;
最好用ID系列
IDYES,IDNO,IDCANCEL
等等
这个7可能就是IDNO吧
还有不要用abort()
用Action:=canone;
解决方案 »
- 如何双击外部程序(另外一个进程)中的TREEVIEW节点
- 请教 Delphi6.0 另类安装问题
- 我想用delphi做游戏, 没有思路, 能否给点意见?
- 如何快速删除Paradox数据表中所有记录
- insert into的问题
- 关于socket问题,在线请教高手(一定给分)
- 特殊类型音频\视频的读取
- 仓库台帐!!!!!!!
- ADO 连接 MYSQL的问题
- DBGrid的OnEnter事件有什么意思!主要用来做什么??看的例子大多是连接DataSoure!还有就是一个DateNavigator连接两个DbGrid??????
- 老鱼,怎么使treeview用imagelist里的图表?我在treeview的stateimage属性选择了imagelist,却找不到treeview哪能控制选择imagelist里的图表的地方。
- 视频采集?
1,
procedure TMainWindow.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if MessageDlg('您确定要退出吗?',mtConfirmation, [mbYes, mbNo], 0) = mrNo then
Action:=caNone;
end; 2,
if MessageBox(Handle,'是否关闭?','关闭',Mb_Question+Mb_YESNO)=IdYes then
Close;
就这么两个,这都属于window句炳吗?
mrno,idyes之类的东西
是一个预定义常量的而已
你最好还是多看看相关的书
还是你不是科班出身??
哪类书有他们的资料?
vcl源码中看到.
一般不应该在FormClose中调用CLose.
如果你想关闭一个窗口,只要将它的ModalResult置为非0值就行了.当然这不是在FormClose中.
procedure TMainWindow.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if MessageDlg('您确定要退出吗?',mtConfirmation, [mbYes, mbNo], 0) = mrNo then
Action:=caNone;
end;
这个过程是我推荐的