继续增加？(70分)

J

jiang81

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-04

• #1

如果我用一个增加按钮给表增加一条记录，当我再按此按钮时，想提示用户‘ 当前记录没保
存，是否保存？’有三个按钮可作选择，yes,no,cancel,当我yes时，保存已增加的记录，继续
增加，当我no时，不保存已增加的记录，继续增加，当我cancel，abort,我该怎样实现？急！

 

Z

zzh0918

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-04

• #2

if messagedlg('当前记录没保存，是否保存？',mtInformation,[mbYesNoCancel],0)=mryes then
table1.post
else
messagedlg('当前记录没保存，是否保存？',mtInformation,[mbYesNoCancel],0)=mrno then
table1.insert
else
table1.cnacel;

 

Z

zzh0918

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-04

• #3

应该如此：
if messagedlg('当前记录没保存，是否保存？',mtInformation,mbYesNoCancel,0)=mryes then
table1.post
else
messagedlg('当前记录没保存，是否保存？',mtInformation,mbYesNoCancel,0)=mrno then
table1.insert
else
table1.cnacel;

 

D

delphiwolf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-04

• #4

cancel时，什么也不做，仍然在单击增加按钮前的状态。

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-20

• #5

接受答案了.