DBGrid中删除一行的代码怎么写 Delphi 开发 我想建一个"删除"按钮,在DBGrid中鼠标点中一行,然后点这个“删除”就把当前选中的这行删除,代码怎么写呀,我是菜鸟,知道的写详细点啊。谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用数据集删除adoquery1.delete procedure TRes_Cq_HrQj_F.btnSB_DelClick(Sender: TObject);begin inherited; if MessageDlg('你確定要刪除此條記錄嗎?',mtWarning,[mbYes,mbNo],0)=mryes then begin if not qry_hrqj.IsEmpty then begin qry_hrqj.Delete; end else Abort; endend; 不过最好还是用SQL语句删除好 想问一下是sql,access数据库?如果是就获取那行的ID,然后delete,是bde直接table.delete Table1.deletequery1.delete...... 现在还有很多人学delphi啊 adoquery1.SQL.CommaText := 'delete from tablename where key=''你选中的行的key'''adoquery1.ExecSQL;DBGrid1.Refresh; 要看你程序结构,删除时的办法很多。直接tdataset.delete是可以但是可能还需要在beforedelete或afterdelete处理事务,另外还有处理deleteerror事务。 DBGrid支持用SQL吗?楼主说的是DBGrid里面的一列啊 一个pointer附给另一个pointer时,发生了什么 椭圆公章问题 如何重新启动线程 检测form窗体已经被创建的语句 如何判断两个表数据相同? 如何在delphi中检测网上某IP电脑FTP端口是否开放的? 请问怎么使用xpmenu控件? MDI的主窗体是否必须是应用程序的主窗体? 如何判断edit里面的text是不是可以转换成数字 数据库连接问请各位指点(300分) 软件开发 Delphi导出问题
adoquery1.delete
begin
inherited;
if MessageDlg('你確定要刪除此條記錄嗎?',mtWarning,[mbYes,mbNo],0)=mryes then
begin
if not qry_hrqj.IsEmpty then
begin
qry_hrqj.Delete;
end else
Abort;
end
end;
query1.delete
......
adoquery1.ExecSQL;
DBGrid1.Refresh;