Lenguaje "Delphi"

Enviar mensajes – HTTP/GET

[delphi]
Uses IdHTTP;

function getContent(url: String): String;
var
http : TIdHTTP;
begin
 http := TIdHTTP.Create(nil);
   try
     Result := http.Get(url);
   finally
     http.Free;
   end;
end;

Memo.Lines.Add(getContent('http://api.labsmobile.com/get/send.php?username=[X]&password=[X]&msisdn=34609036253&sender=SENDER&message=This+is+the+message'));
[/delphi]

Consulta de créditos – HTTP/GET

[delphi]
Uses IdHTTP;

function getContent(url: String): String;
var
http : TIdHTTP;
begin
 http := TIdHTTP.Create(nil);
   try
     Result := http.Get(url);
   finally
     http.Free;
   end;
end;

Memo.Lines.Add(getContent('http://api.labsmobile.com/get/balance.php?username=[X]&password=[X]'));

[/delphi]