为什么我删除dbgrid中的一行数据,在dbgrid中显示已经删除了,但刷新dbgrid并没有真正删除,记录还存在,不明白这是什么问题,
删除我是这样写的,dbgrid我设置了只读。 with dm.Q_HYXX do
begin
if application.MessageBox('确定要删除该条记录吗?','警告',mb_yesno) = ID_yes then
begin
if dm.Q_HYXX.FieldByName('HY_ID').AsString = '' then
showmessage('记录为空,无法删除!')
else
begin
datasource1.DataSet.Delete;
end;
end;
end;
删除我是这样写的,dbgrid我设置了只读。 with dm.Q_HYXX do
begin
if application.MessageBox('确定要删除该条记录吗?','警告',mb_yesno) = ID_yes then
begin
if dm.Q_HYXX.FieldByName('HY_ID').AsString = '' then
showmessage('记录为空,无法删除!')
else
begin
datasource1.DataSet.Delete;
end;
end;
end;
begin
if application.MessageBox('确定要删除该条记录吗?','警告',mb_yesno) = ID_yes then
begin
if FieldByName('HY_ID').AsString = '' then
showmessage('记录为空,无法删除!')
else
begin
Delete;
end;
end;
end;