掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TIdFTPでPut中にAbortするには？ (ID：13307)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Delphi5+INDY10+Win2kで、上記のコードだとやっぱうまくいきません。 ですが、DisConnectの位置を変えたらうまくいきました。 procedure TfrmMain.Button1Click(Sender: TObject); begin try IdFTP1.Connect; except Exit; end; try IdFTP1.OnWork := ProcessMessage; IdFTP1.Put('D:\temp\aaa.dat','aaa.dat') finally // IdFTP1.DisConnect; end; end; procedure TfrmMain.Button2Click(Sender: TObject); begin IdFTP1.Abort; IdFTP1.DisConnect; end; あとでもうちょっとINDYのソースを追って原因調べます。 ありがとうございました。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.