Migrar um código Delphi 5 para Borland

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,NMHttp, StdCtrls, Psock;

type
  TForm1 = class(TForm)
    Button1: TButton;
    conhttp: TNMHTTP;
    Memo2: TMemo;

    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var idAux,Id : string;
i : integer;
begin

  conHTTP.Host := 'http://webapi.comtele.com.br';
  conHTTP.Port := StrToInt('8080');
  //da um get com usuario e senha e retorna o id que ira usar no segundo get pra enviar sms
                                                                                                     //usuario      //senha
  conHTTP.Get('http://webapi.comtele.com.br/api/api_fuse_connection.php?fuse=get_id&user=50459&pwd=uwofy459' );
  idAux := conHTTP.Body;
  idAux := copy(idAux,3,length(idaux));

  conHTTP.Get('http://webapi.comtele.com.br/api/api_fuse_connection.php?fuse=send_msg&id=' + idaux + '&from=1993418894&msg=nandoteste&number=1993418894' );

  // Varivael conHTTP.Body contém o string de retorno, que pode ser processado conforma a Documentação de Integração
  memo2.Lines.Text   := conHTTP.Body;

  // if retornar true no memo2 pq deu certo sms

end;

end.