無邪気に未来を考える

■Ｄｅｌｐｈｉを用いた　「ＦＴＰクライアント」の作成方法
　これも、標準添付のＩｎｄｙコンポーネントを使用することで、簡単に実現できますね。
　例えば、フォームに「IdFTP」と「Button」のコンポーネントを貼り付け、
　Buttonイベントに数行のコーディングで最低限の機能は実装可です。

■Buttonイベントの例
　procedure TForm1.Button1Click(Sender: TObject);
　begin
　　　// ----- Indy 設定 -----
　　　IdFTP1.Host := '[ＩＰアドレス等]';
　　　IdFTP1.Username := '[ユーザ名]';
　　　IdFTP1.Password := '[パスワード]';
　　　IdFTP1.Connect;
　　　
　　　IdFTP1.Get([元ファイル名], [ファイル名], True, False);　　// DownLoad
　　　IdFTP1.Put([元ファイル名], [ファイル名], False);　　　　　　// UpLoad

　　　// ----- メッセージ -----
　　　showmessage('Down Ok');
　end;

　尚、ファイル名は必要に応じてＰＡＴＨ指定可、
　また、Ｐｒｏｘｙの指定が必要な場合は下記設定を追加。

　　IdFTP1.ProxySettings.Host := [IHost];
　　IdFTP1.ProxySettings.UserName := [IUserName];
　　IdFTP1.ProxySettings.Password := [IPassword];
　　IdFTP1.ProxySettings.Port := [IPort];

　Ｐｒｏｘｙの設定詳細はこちらを
　　http://www.indyproject.org/・・・・

■作成フォームとツールパレット


■その他
「IdFTP1.List」を追加し、「IdFTP1.ListResult.Count」でファイル数を取得、
「IdFTP1.ListResult[n]」でファイルの情報を取得できます。

■実行
Delphiの場合、生成したＥＸＥファイルは、ＤＬＬ無しの単独ファイルで実行（配布）
できますので、いろいろと応用できそう。