Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   Obtener IP publica (https://www.clubdelphi.com/foros/showthread.php?t=60776)

advancexz 14-10-2008 00:40:54

Obtener IP publica
 
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...

PablorD 14-10-2008 05:58:07

si, puedes ir a la pagina de speedtest ahi aparte de decir tu velocidad te dicen tu ip y la latencia que hay hacia un servidor.

tambien puedes meterte a la consola de windows y escribir
Código:

ipconfig /all

duilioisola 14-10-2008 08:47:44

Date una vuelta por los trucos...

Mira por ejemplo este

jeremiselxi 14-10-2008 12:11:39

Respuesta
 
Cita:

Empezado por advancexz (Mensaje 319861)
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.

jeremiselxi 14-10-2008 12:34:57

resp
 
y si esto no es lo que buscas entonces ve a http://www.clubdelphi.com/foros/showthread.php?t=36690

y la parte que dice

ShowMessage(GetIp('EQUIPO01')); // donde EQUIPO01 ES EL NOMBRE DE TU MAQUINA
lo pones en un boton y ya

advancexz 16-10-2008 00:38:28

muchas gracias, me sirvio el de la seccion de trucos, ese que saca la IP de una pagina, es justo lo que necesitaba, el problema seria si esa pagina esta siempre disponible ¿? pero creo que lo vamos a resolver teniendo una lista de paginas de respaldo, si no se obtuvo de una que lo saque de la otra, ya tenemos 3 diferentes.

lo del GETIP es interesante, no lo necesito ahorita, pero me parece que lo puedo utilizar en un futuro...

gracias a todos


La franja horaria es GMT +2. Ahora son las 18:03:12.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi