如何实现如下语句
if MessageDlg(是否真的删除该生档案,mtConfirmation, [mbYes, mbNo], 0) = mrYes then
我写的代码
smd1.buttoncount:=2;
smd1.Caption := 系统提示;
smd1.Text:= 是否要真的删除此条记录吗!;
smd2.ShowModal;
??这里不知道怎么写了
datamodule1.adoq_xs.delete;
请帮助???
smd1.buttoncount:=2;
smd1.Caption := 系统提示;
smd1.Text:= 是否要真的删除此条记录吗!;
if smd1.ShowModal=MrOk then
datamodule1.adoq_xs.delete;