本文整理自网络,侵删。
procedure TForm1.Button3Click(Sender: TObject);
var
h:TIdhttp;
res : String;
MyStream:TMemoryStream;
begin
MyStream:=TMemoryStream.Create;
h:=Tidhttp.Create(nil);
try
h.get('http://www.3464.com/project2.exe',MyStream);
except
showmessage('网络出错!');
MyStream.Free;
exit;
end;
MyStream.SaveToFile('c:\1.exe');
MyStream.Free;
end;
本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/aroc_lo/archive/2009/12/19/5037225.aspx
相关阅读 >>
Delphi中组件panel、splitter、groupbox、按钮组件(checkbox...)、计时器、滚动条、多选卡
Delphi windows 编程[3] - 学习窗体生成的过程三
Delphi 10.2 新特性之―tfdbatchmovejsonwriter
Delphi在设计时设置tstringgrid控件各列的列宽
更多相关阅读请进入《Delphi》频道 >>