delphi怎么读取远程远程的txt或者ini文件中的内容并执行

delphi如何读取远程远程的txt或者ini文件中的内容并执行！
比如我的代码是下面的
program;
uses Windows,shellapi;
begin
shellexecute(0,'open',pchar('IEXPLORE.EXE'),pchar('http://www.baidu.com/'),0,sw_show);
setcursorpos(111,111);
shellexecute(0,'open',pchar('IEXPLORE.EXE'),pchar('http://www.sohu.com/'),0,sw_show);
setcursorpos(222,222);
end.
这样编译的话，他只能打开我上面写的网址
我想让他可以读取我远程的txt或者ini文件中的网址列表
比如我远程文件的地址是http://www.333.com/1.txt或者http://www.333.com/1.ini
每次程序运行后都是先访问http://www.333.com/1.txt或者http://www.333.com/1.ini文件，然后读取我里边写的网址列表，然后再打开我里边写的网址列表的网页，同时我还想让setcursorpos();里边的参数也从访问的远程文件里边读取

比如我远程的http://www.333.com/1.txt文件里边写
http://www.hao123.com 123 123
http://www.hao222.com 222 222
那么程序就按顺序先打开http://www.hao123.com网页，然后鼠标到123 123这个坐标
然后再打开http://www.hao222.com网页，然后鼠标到222 222这个坐标

意思就是shellexecute和setcursorpos这两个参数里边的内容都从远程读取

那位大哥可以帮帮我呢？感激不尽！

小弟QQ:285468720

[解决办法]
第一步下载http://www.333.com/1.ini,使用idhttp.get
第二步读取1.ini里的网址
第三步shellexecute,打开每个网址
[解决办法]

Delphi(Pascal) code

uses   URLDownloadToFile(nil,'http://www.333.com/1.txt','D:\Temp\1/txt', 0 , nil);
[解决办法]
用idhttp把ini或txt下载到本地,再读取
[解决办法]
// 给你写了一个单元文件
unit uUrlTxt;

interface

uses
 Classes, Windows, SysUtils;

type
 TUrlItem = record
   Link: string;
   Position: TPoint;
 end;

 TUrlItemArray = array of TUrlItem;

function LoadUrlListFromTextFile(fileName: string): TUrlItemArray;

implementation

function LoadUrlListFromTextFile(fileName: string): TUrlItemArray;
var
 list: TStringList; // 用于加载整个文件内容
 line: TStringList; // 用于分解一行中的各字段
 i: Integer;
begin
 list := TStringList.Create;
 line := TStringList.Create;
 line.Delimiter := '|'; // 一行中各字段是以 | 分隔的
 try
   list.LoadFromFile(fileName);
   SetLength(Result, list.Count);

   for i := 0 to list.Count - 1 do
   begin
     line.DelimitedText := list[i];
     if line.Count < 3 then Continue;

     Result[i].Link := line[0];                 // 第一字段是 URL链接
     Result[i].Position.X := StrToInt(line[1]);
     Result[i].Position.Y := StrToInt(line[2]);
   end;
 finally
   line.Free;
   list.Free;
 end;
end;

end.