数人にデータを配布するのにメールを使っていましたが、大きなプログラムなんかは添付できないので、レンタルクラウドを使って公開してダウンロードしてもらうことにしました。
データも同様にダウンロードしてもらうようにしましたが、直接プログラムから読み込む、ダウンロードするほうが手間が省けると思います。
どうしたいいでしょうか?
分かる人がいましたら、教えてください。
TIdHTTPコンポーネントでダウンロードするのはどうでしょうか。
var
AStream: TFileStream;
begin
AStream := TFileStream.Create('C:\tmp\sample.zip', fmCreate);
IdHTTP1.Get('http://example.com/sample/soft/sample.zip', AStream);
AStream.Free;
end;
今体調が悪くて、見ていませんでした。
回復次第、試してみます。
ありがとうございました。
すみません。
うまくいかないようです。
また、うまい方法がありましたらお願いします。
>うまくいかないようです。
具体的には、どのように“うまくいかない”のですか?
(エラーメッセージが表示するとか・・・)
ツイート | ![]() |