Delphi:如何将互联网上的文本文件加载为字符串？

Question

在我的程序中，我有一个函数可以检查程序的当前版本，该版本是从以下网址获取的:www.tablemaster.webs.com/versioninfo.txt

如您所见，URL 中只是纯文本。我需要将此文本从 URL 加载到程序中的字符串中，我将如何执行此操作？我四处搜寻但一无所获..

PS:我需要尽可能简单的代码..

提前致谢:)

Answer 1

我会使用 Indy 的 TIdHTTP最简单的 GET 重载方式如下:

uses
  IdHTTP;

procedure TForm1.Button1Click(Sender: TObject);
var
  S: string;
  IdHTTP: TIdHTTP;
begin
  IdHTTP := TIdHTTP.Create(nil);
  try
    S := IdHTTP.Get('http://www.tablemaster.webs.com/versioninfo.txt');
    ShowMessage(S);
  finally
    IdHTTP.Free;
  end;
end;