執行idtelnet.disconnect後 ,程式會當掉.... |
尚未結案
|
furesu
一般會員 發表:26 回覆:10 積分:7 註冊:2004-10-22 發送簡訊給我 |
procedure TForm1.Button3Click(Sender: TObject);//disconnect button begin if idtelnet1.Connected then begin idtelnet1.Disconnect; Button3.Enabled := False; Button1.Enabled := not Button3.Enabled; end; end; procedure TForm1.IdTelnet1Disconnected(Sender: TObject); begin RichEdit1.Lines.Clear; end;如果是用滑鼠去點button3的話,都沒問題, 如果是用程式去自動disconnect的話,disconnect後程式就會沒有任何回應.. . . if idtelnet1.connected then begin //加這段 Sleep(2000); //自動disconnect後就會掛掉 idtelnet1.Disconnect; // if Button3.Enabled then Button3.Click; end; //直接idtelnet1.disconnect or 用Button3.Click都是一樣結果... 也沒有任何錯誤訊息出現... |
Ktop_Robot
站務副站長 發表:0 回覆:3511 積分:0 註冊:2007-04-17 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |