本文整理自网络,侵删。
procedure TForm1.Button4Click(Sender: TObject);
var mystr:string;
begin
MyStr:=IdHTTP1.Get('http://www.3464.com/version.html');
showmessage(MyStr);
end;
相关阅读 >>
Delphi xe listbox 行高根据内容高度进行调速
Delphi 过卡巴2009和沙盘启发杀毒的Delphi源代码
更多相关阅读请进入《Delphi》频道 >>