ahpei55(独来读网)你好！按你说的是能用，可我现在需要将表中的一个字段dwmz加进去，我就不知道应该怎么搞了，请指教！ procedure Tbmdm.btn_delClick(Sender: TObject); var abc:PChar; begin abc:=table1dwmz.value; if Application.MessageBox(abc,'提醒您!!',MB_OKCANCEL+MB_IconInformation+MB_DefBUTTON1)= IDOK then ..... end; 以上还是不能正常使用。
procedure Tbmdm.btn_delClick(Sender: TObject);
var
abc:PChar;
begin
abc:=table1dwmz.value;
if Application.MessageBox(abc,'提醒您!!',MB_OKCANCEL+MB_IconInformation+MB_DefBUTTON1)= IDOK then
.....
end;
以上还是不能正常使用。