有两个Form,Form1和Form2,Form1中有控件dbgrid1,datasource1,adoquery1,adotable1,dbgrid的数据来自adoquery1,在Form2中有dbgrid2,数据来自form1.adotable1,我在Form2中写delete语句删除一条记录,然后用close和open来刷新form1中的adoquery1,但form1.dbgrid1中显示的还是原来的几条记录,当我删除第二条时,form1.dbgrid1中才把两次删除的记录都除去了,不只到底是怎么回事,请大家帮我想想
解决方案 »
- 问个问题,项目经理是干什么的???
- 读取数据库时,精度发生变化,如何解决?
- (高分求救)我想做个HTTP SERVER,这个容易,就是如果要支持ASP的,请问怎办?
- 有谁知道ActionManager的用法
- 如何动态创建TQRCHART并打印预览
- dfgs
- 如何在delphi中操作SQL SERVER的UniqueIdentifier字段
- 我在image1里显示一副bmp图象,我想点击按钮把他平均分成4份,显示在image2,image3,image4,image5里,怎么才能完成啊?
- 如何删除WIN98中的多用户设置
- 请问在DBgrid中,如何让焦点移到指定的行与列当中?
- 招聘Delphi 兼职程序员,要求有至少2年以上的开发经验,对电子书的开发能够胜任.
- 招聘Delphi 兼职程序员,要求有至少2年以上的开发经验,对电子书的开发能够胜任.
procedure TForm3.Button1Click(Sender: TObject);
begin
if not Form1.ADOTable1.FieldByName('Active').AsBoolean then
Form1.ADOTable1.Delete
else
if Application.MessageBox('任务正在执行中,你确定要删除吗?','删除提示',MB_YESNO OR MB_ICONWARNING)=IDYES THEN
Form1.ADOTable1.Delete;
Form1.ADOQuery1.Close;
Form1.ADOQuery1.Open;
end;
在的话帮我看看是哪的问题,先行谢了
Form1.ADOtable1.close;
Form1.ADOtable2.Open;