alguem teria uma função que retorne o IP local de um PC?
IP local de um PC
IP local de um PC
Olá,
alguem teria uma função que retorne o IP local de um PC?
alguem teria uma função que retorne o IP local de um PC?
-
FranciscoA
- Posts: 1964
- Joined: Fri Jul 18, 2008 1:24 am
- Location: Chinandega, Nicaragua, C.A.
Re: IP local de um PC
Hola. Intenta con esto:
Saludos.
Code: Select all
//---------------//Conocer IP del ordenador
Function GetIP()
local cIP
WsaStartUp()
cIP := GetHostByName( GetHostName() ) //IP equipo local
WsaCleanUp()
Return cIPFrancisco J. Alegría P.
Chinandega, Nicaragua.
Fwxh1204-MySql-TMySql
Chinandega, Nicaragua.
Fwxh1204-MySql-TMySql
Re: IP local de um PC
Francisco,
muito obrigado, funciona perfeitamente!
muito obrigado, funciona perfeitamente!
-
FranciscoA
- Posts: 1964
- Joined: Fri Jul 18, 2008 1:24 am
- Location: Chinandega, Nicaragua, C.A.
Re: IP local de um PC
Me alegra que te haya sido de utilidad.
Saludos.
Saludos.
Francisco J. Alegría P.
Chinandega, Nicaragua.
Fwxh1204-MySql-TMySql
Chinandega, Nicaragua.
Fwxh1204-MySql-TMySql