所有程序中只有下面这个ADOQuery_projd6.Delete; 删除不了数据,按下删除按钮dbgrid中的数据是没有了,但是在sqlserver表中作查询数据还在,为什么啊??而同样的程序在其它from中是可以删除数据的。ADOQuery_projd6的设置跟其它ADOQuery的设置一样的,试过重建这个ADOQuery的了。急啊,程序如下:procedure TForm_projd6.ToolButton_delClick(Sender: TObject);
var result:smallint;
begin
result:=application.MessageBox('真的要删除吗?','提示',mb_okcancel+mb_defbutton2);
if result=idok then
begin
try
DataModule_main. ADOQuery_projd6.Delete;;
except
showmessage(' Fail !');
abort;
end;
end;
if result=idcancel then abort;
var result:smallint;
begin
result:=application.MessageBox('真的要删除吗?','提示',mb_okcancel+mb_defbutton2);
if result=idok then
begin
try
DataModule_main. ADOQuery_projd6.Delete;;
except
showmessage(' Fail !');
abort;
end;
end;
if result=idcancel then abort;
解决方案 »
- 请教,delphi5 中如何use msxml?
- 做数据库工程中,会遇到很多窗体的问题,现在不用贴控件的方式,全用继承,好不好?
- 希望哪位说说面向对象编程(数据库的)。在线等,每人有分。(2)
- 关于文件夹拷贝的问题:如有兴趣请进,不容易哟!
- 哪位大哥,能给小弟一个fast report的使用说明,谢谢了。
- delphi的2个问题求助
- 关于 如何处理 key violation 关键字冲突
- 多年编程来一个有趣的问题共同讨论:今有一个ole对象,它有若干个属性(方法),如何让它们动态关联到一起来?
- 如何随机抽取记录集中的若干字段?
- 打印预览调用的问题
- 有没有碰到过取数据太多报错的问题(其实也不多的,并且这个问题只出在一台机子上,其它机子上都没问题)
- 在打印时如何按 999,999,999的格式显示啊金额啊 ?? 大侠 帮忙啊
DataModule_main.ADOQuery_projd6.sql.Clear;
DataModule_main.ADOQuery_projd6.sql.Add('select * from proj_d6 where projno=:projno ' );
DataModule_main.ADOQuery_projd6.Parameters.ParamByName('projno').Value:=gs_projno;
DataModule_main.ADOQuery_projd6.open;
如果是的话,删除语句后必需:ADOQuery1.UpdateBatch;
或者改回ltOptimistic