请教高人怎样实现一个对话框中有"确定","取消" 二个按钮并执行对应语句。(50分)

L

li_yu

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样实现一个对话框中有"确定","取消" 二个按钮。点 "确定","取消"要分别执行对应语句,
请教高人做。
 
在Form的OnCloseQuery 事件里加入以下代码:

if MessageBox('要走了吗','关闭吗',MB_YESNO )=IDYES then
CanClose:=True
else
CanClose:=False
 
用messagebox就行。
 
给分!!!
谢谢
 
[Error] sr.pas(192): Illegal character in input file: '"' ($22)
[Error] sr.pas(192): Illegal character in input file: '"' ($22)
[Error] sr.pas(192): Not enough actual parameters
出错了!!
 
sr.pas的192行出现非法字符。
 
顶部