如何使一段语句执行完后再执行下面语句？

[xu19834]

query1.close;
query1.SQL.Clear;
query1.SQL.Add('update xx set xxx =''' + xxxxx + '''');
query1.execsql;
先执行完成后再执行下列语句 因为数据量可能很大 时间有点长判断执行完上句后再执行下面这句
请大家告知语句 谢谢 ！！！

xxxxxx.Execute;

[lake_cx]

默认就是这样的，除非你指定了ADOQuery1.ExecuteOptions包含eoAsyncExecute

[xu19834]

我刚学 不知道有没有 使语句 先后执行的 句子！！！

或者 if 某句执行完后 then 执行这句 什么的？

[thinkcome]

var
i:integer;


query1.close;
query1.SQL.Clear;
query1.SQL.Add('update xx set xxx =''' + xxxxx + '''');
query1.execsql;
i:=messagedlg('查詢完成﹐是否繼續?',mtinformation,[mbyes,mbno],0);
if i = id_yes then
begin
//要接著執行的代碼段﹔
end
else
abort;//退出不執行;

兄弟﹐不知道這是不是你想要的效果。

[hm616911]

默认就是从上到下。。要不如上面的加个判断也可以~

[wangxuelid]

[Quote=引用 3 楼 thinkcome 的回复:]
var
i:integer;


query1.close;
query1.SQL.Clear;
query1.SQL.Add('update xx set xxx =''' + xxxxx + '''');
query1.execsql;
i:=messagedlg('查詢完成﹐是否繼續?',mtinformation,[mbyes,mbno],0);
if i = id_yes then
begin
//要接著執行的代碼段﹔
end
else
abort;//退出不執行;

兄弟﹐不知道這是不是你想要的效果。
[/Quote]
上面都可以，
可以判断query状态

procedure TForm1.Button1Click(Sender: TObject);
begin
   if adoquery1.state   in   [dsedit,dsinsert]   then
     Showmessage('1')
   Else
    Showmessage('s1');
end;

[meiZiNick]

什么呀