Delphi如何通过调用网址传参数来发送短信

Delphi怎么通过调用网址传参数来发送短信？
有些短信提供商只给出一个网址，通过提交参数来发送短信，Delphi怎么实现发送短信和取回结果？
比如：http://www.stongnet.com/sdkhttp/sendsms.aspx?reg=账号&pwd=密码&sourceadd=子通道&phone=电话1,电话2&content=短信内容


参数描 述
reg注册号，不可为空
pwd密码，不可为空
sourceadd子通道号（最长10位，可为空）
phone手机号码（最多1000个），多个用英文逗号(,)隔开，不可为空
content短信内容（UTF-8编码）（最多600个字符，字母、标点都算字符），不可为空


[解决办法]

uses IdHTTP; 

var
  url, resStr: string; // url 和 返回信息
  ss: TStringStream; // 接收返回值的流对象
  idhtp: TIdHTTP; // IdHttp 对象
begin
  ss := TStringStream.Create('');
  idhtp := TIdHTTP.Create(nil);
  try
    // 自己拼接这个url字符串
    url := 'http://www.stongnet.com/sdkhttp/sendsms.aspx?';
    url := url + 'reg=账号';
    url := url + '&pwd=密码';
    url := url + '&sourceadd=子通道';
    url := url + '&phone=电话1,电话2';
    url := url + '&content=短信内容';
    idhtp.Get(UTF8Encode(url), ss); //UTF8Encode 编码一下
    ss.Position := 0;
    // 显示返回信息, 用UTF8Decode解码一下
    resStr := UTF8Decode(ss.ReadString(ss.Size));
    ShowMessage(resStr); // 然后自己处置这个返回的字符串
  finally
    idhtp.Free;
    ss.Free;
  end;
end;