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

L

li_yu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #1

怎样实现一个对话框中有"确定"，"取消" 二个按钮。点 "确定"，"取消"要分别执行对应语句，
请教高人做。

 

L

ledo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #2

在Form的OnCloseQuery 事件里加入以下代码：

if MessageBox('要走了吗','关闭吗',MB_YESNO )=IDYES then
CanClose:=True
else
CanClose:=False

 

懒

懒虫007

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #3

用messagebox就行。

 

L

li_yu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #4

给分！！！
谢谢

 

L

li_yu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-28

• #5

[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
出错了！！

 

L

ledo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-29

• #6

sr.pas的192行出现非法字符。