假設我在timer元件的ontimer事件(一秒呼叫一次)裡 要每一秒時更新資料庫 procedure TForm1.Timer1Timer(Sender: TObject); begin ADOQuery1.Close; ADOQuery1.SQL.clear; ADOQuery1.SQL.Add('Select * from search where sh_flag=false'); ADOQuery1.Prepared; ADOQuery1.Open; NMHTTP1.Get(url); .... .... .... NMHTTP1.Discount; end; 我每次跑到一段時間後程式就會發生錯誤(剛開始都不會...)， 是不是因為我一直開關ADOQuery1的關係呢?還是NMHTTP的問題? (確定不是程式撰寫錯所產生的錯誤) [Delphi]=*VaKa*=is~me

------
[Delphi]=*VaKa*=is~me

我的猜測 ~~~ 會不會是你的資料庫資料越來越多，來不及在一秒內做完更新哩 ~~~ timer事件的事還沒做完就又被呼叫到，所以過一段時間就 ~~~over 另外Prepared應該不需要一直做吧?? 而且你的sql語法一直沒變 那麼應該不用把query一直clear，和反覆開關 如有錯，請見諒~~ 發表人 - mihopaul 於 2002/04/08 03:58:43

引言: procedure TForm1.Timer1Timer(Sender: TObject); begin NMHTTP1.Get(url); .... NMHTTP1.Discount; end;

NMHTTP1.Get在一秒內應無法完成,Timer每一秒會一直呼叫, 最好設定一整體性變數

var InTimer:boolean;
procedure TForm1.Timer1Timer(Sender: TObject);  
begin
   if intimer then exit;
   intimer:=true;
   NMHTTP1.Get(url); 
    ....
   NMHTTP1.Discount;
   intimer:=false;
end;
initialization
  InTimer:=False;

～～～Delphi K.Top網站總管～～～