昨
昨夜渡轮上
Unregistered / Unconfirmed
GUEST, unregistred user!
我为什么在多层结构中不能用以下的代码删除记录？（相同记录不能够删除）
procedure TdengjiForm.SpeedButton3Click(Sender: TObject);
begin
{if not bumdengjiClientDataSet1.Eof then
begin
bumdengjiClientDataSet1.Close;
bumdengjiClientDataSet1.Open;
if messagedlg('你确定要删除吗？',mtWarning,[mbOK, mbCancel],0)=idok then
}
bumdengjiClientDataSet1.Delete;
bumdengjiClientDataSet1.ApplyUpdates(0);
end;
procedure TdengjiForm.SpeedButton3Click(Sender: TObject);
begin
{if not bumdengjiClientDataSet1.Eof then
begin
bumdengjiClientDataSet1.Close;
bumdengjiClientDataSet1.Open;
if messagedlg('你确定要删除吗？',mtWarning,[mbOK, mbCancel],0)=idok then
}
bumdengjiClientDataSet1.Delete;
bumdengjiClientDataSet1.ApplyUpdates(0);
end;