执行一条SQL语句,要么成功,要么失败。例如:
ADOCommand1.CommandText:='Insert Into TblA Select ID From TblB ';
ADOCommand1.Execute;
表TblA,表TblB数据量非常庞大,执行这条语句需要2分钟时间。(由于我利用了线程,可以点击一个取消按钮,当点击此取消按钮,我希望将此语句停止。)
TForm1.BtnCancelClick(Sender: TObject);
begin
ADOCommand1
end;
ADOCommand1.CommandText:='Insert Into TblA Select ID From TblB ';
ADOCommand1.Execute;
表TblA,表TblB数据量非常庞大,执行这条语句需要2分钟时间。(由于我利用了线程,可以点击一个取消按钮,当点击此取消按钮,我希望将此语句停止。)
TForm1.BtnCancelClick(Sender: TObject);
begin
ADOCommand1
end;
解决方案 »
- delphi开发的程序,通过网络访问服务器,打开一个表单比较慢,访问本地数据库打开就快,请问是什么原因,请指教,谢谢
- 我写了一个网络上的软件,求软件注册及网络验证方法
- 如何让Excel的列自动长度?或列内容自动换行且居中?急
- 第九期:CSDN论坛秀-Delphi版-本期作秀:ehom(?!)
- 兄弟我现在用一个*.ocx的组件,同样注册在vb中好用,但在delphi中只有一部分功能好用,另外还还有一个*.bas的文件,在delphi中能打开,但
- 怎样将string的第一个字符取出赋给一个char型变量
- 在sybase中,如果取得datetime的年月日呢?
- delphi報表問題
- 用了DBGrid这么久,第一次才发现?
- 我怎么看前两天的贴子?
- 界面为什么不好看?!郁闷中……
- 像Word那样的文件密码保护是怎样做的?
执行一条SQL语句,要么成功,要么失败。例如:
ADOCommand1.CommandText:='Insert Into TblA Select ID From TblB ';
ADOCommand1.Execute;
表TblA,表TblB数据量非常庞大,执行这条语句需要2分钟时间。(由于我利用了线程,可以点击一个取消按钮,当点击此取消按钮,我希望将此语句停止。)
TForm1.BtnCancelClick(Sender: TObject);
begin
ADOCommand1.Cancel;
end;
正常来说,可以结束,但是弹出一个“取消操作”对话框,不知各位还有好办法没有。在线等待,分不够可以再加。
你的意思是,由于有线程的原因?先把线程挂起,再ADOCommand1.Cancel,然后释放线程?
分不够可以再加,请举个例子。谢谢