Obtener IP publica

[jeremiselxi]

Empezado por advancexz

Como obtengo la IP publica de la pc que estoy usando?? se puede??

[EDITADO] ups perdon, me referia a la IP publica desde un programa hecho en delphi... osea en codigo pues...

hola...

Código Delphi [-]
uses shellapi;
procedure TForm1.Button1Click(Sender: TObject);
var
  Archivo: TextFile;
begin
  // creamos el archivo .bat
  AssignFile(Archivo, 'c:\ping.bat');
  {$i-} Rewrite(Archivo); {$i+} // lo sobreescribimos
  if LongBool(IOResult) then
  begin
   ShowMessage('Error al guardar.');
   Exit;
  end;

  // instrucciones para el archivo bat
  WriteLn(Archivo, '@echo off');
  WriteLn(Archivo, 'ipconfig ');// nuestro comando ipconfig
  WriteLn(Archivo, 'pause');
  CloseFile(Archivo);

  // ejecutamos el bat
  ShellExecute(Form1.Handle, nil, 'c:\ping.bat',
  nil, nil, SW_SHOWNORMAL);
end;
end.