[NumLock]

не надо инди. вот пример консольного приложения:

Код:

program GetIP;

{$APPTYPE CONSOLE}

uses
  msxml, ComObj, ActiveX, Windows, Messages;

var
  XMLHTTP: IXMLHttpRequest;

begin
  CoInitialize(nil);
  XMLHTTP:=CreateOleObject('Microsoft.XMLHTTP') as IXMLHttpRequest;
  XMLHTTP.open('GET', 'http://j2me.webservis.ru/ip.php', False, '', '');
  XMLHTTP.setRequestHeader('If-Modified-Since', '0');
  XMLHTTP.send('');
  if XMLHTTP.status=200 then Writeln('IP = '+XMLHTTP.responseText)
  else Writeln('Oops');
  Write('Press any key...');
  Readln;
end.

или http://j2me.webservis.ru/ip2.php