名前 題名 ▼ Mr.XRAYさん > > 後でインストールして再度兆戦してみます． > > インストールして，先のサンプル[774....]テストしました． > OKですね． > あと，今気づいたところでは，OnWorkとOnWorkBeginイベントの引数が > 違っています．この修正が必要ですね．手動で書き換えて構いません． > 多分OnWorkEndも同じでしょう． > Int64にしたのはおそらく大きなサイズのダウンロードやアップに耐える > ようにしたということかも知れません(2GB以上)． > > Ver 10.1.5 > procedure IdFTP1Work(Sender: TObject; AWorkMode: TWorkMode; > const AWorkCount: Integer); > > Ver 10.2.3 > AWorkCountの前のconstがなく，Int64になっている > procedure IdFTP1Work(ASender: TObject; AWorkMode: TWorkMode; > AWorkCount: Int64); GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link