| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
Ciklon Cdt

Registrado: 27 Nov 2002Mensajes: 22Ubicación: Argentina
|
Publicado: Lun 04 Abr, 2005 11:48 pm Asunto: nombre de la pc |
|
|
como puedo obtener el nombre de la pc donde ejecuto mi programa??
Gracias |
|
| Volver arriba |
|
 |
rayder Master

Registrado: 03 Mar 2004Mensajes: 207
|
Publicado: Mar 05 Abr, 2005 9:23 am Asunto: |
|
|
Yo utilizo esta funcion.
| Código: |
WORD wVersionRequested;
WSADATA wsaData;
char name[255];
AnsiString ip;
PHOSTENT hostinfo;
wVersionRequested = MAKEWORD( 2, 0 );
if ( WSAStartup( wVersionRequested, &wsaData ) == 0 )
{
if( gethostname ( name, sizeof(name)) == 0)
{
Label1->Caption = name;
if((hostinfo = gethostbyname(name)) != NULL)
{
ip = inet_ntoa (*(in_addr *)*hostinfo->h_addr_list);
Label2->Caption = ip;
}
}
WSACleanup( );
}
|
tienes que hacer un include:
| Código: |
#include <winsock2.h>
|
Para probarla, pon en un formulario un TButton y dos TLabel, y asigna la función al evento OnClick _________________ Un saludo
Rayder |
|
| Volver arriba |
|
 |
pampa Lt JG

Registrado: 16 Jun 2004Mensajes: 58Ubicación: Mar del Plata - Argentina
|
Publicado: Mar 05 Abr, 2005 3:58 pm Asunto: |
|
|
Yo uso este otro código, sacado de este mismo foro:
| Código: | AnsiString pc
pc.SetLength(MAX_COMPUTERNAME_LENGTH+1);
DWORD size;
size = pc.Length();
if (!GetComputerName(pc.c_str(), &size))
pc="¿?";
|
|
|
| Volver arriba |
|
 |
|