掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TIdFTPでPut中にAbortするには？ (ID：13304)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
単純な接続・中断・切断のサンプルです。 Abortの後、DisconnectしないとConnectedがTrueのままになります。 # ソケットはAbortした時点で切断しているみたいです。 procedure TForm1.Button1Click(Sender: TObject); begin try IdFTP1.Host := 'サーバ名'; IdFTP1.Username := 'ユーザID'; IdFTP1.Password := 'パスワード'; IdFTP1.Connect; ShowMessage('Connected'); IdFTP1.Abort; ShowMessage('Abort'); ShowMessage('Connected:' + BoolToStr(IdFTP1.Connected) ); IdFTP1.Disconnect; ShowMessage('Disconnected'); except on e: Exception do ShowMessage('Exception:' + e.Message); end; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.