Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)
-   -   Nombre de PC (https://www.clubdelphi.com/foros/showthread.php?t=66293)

Ledian_Fdez 11-02-2010 21:22:49

Nombre de PC
 
Holas amigos de este foro:

Alguien conoce de alguna función donde te devuelva el nombre de la PC donde corre el ejecutable de tu aplicación.

Gracias de antemano.

Salu2
Ledian.,

rgstuamigo 11-02-2010 21:33:24

Chequea éste truco.;)
Pequeño y gran consejito: Usar primero el buscador del club antes de consultar.:D.
Saludos...:)

Ledian_Fdez 11-02-2010 21:54:17

Equivalente en C++
 
rgstuamigo encontré este hilo pero el código es en Delphi. Quien Podría llevarlo a C++. :confused:

Código Delphi [-]
function ComputerName: string;
var
  Buffer: array[ 0..MAX_COMPUTERNAME_LENGTH ] of Char;
  MaxSize: Integer;
begin
  MaxSize := SizeOf( Buffer );
  if not GetComputerName( @Buffer, MaxSize ) then
    raise Exception.Create( 'No puedo determinar el nombre de la máquina' );
  Result := StrPas( @Buffer );
end;

Salu2,
Ledian.

rgstuamigo 11-02-2010 22:33:08

Acá va en C++Builder:
Cita:

String ComputerName()
{
char Buffer[MAX_COMPUTERNAME_LENGTH];

DWord MaxSize=sizeof(Buffer);
if (! GetComputerNameA(Buffer,&MaxSize))
throw Exception("No puedo determinar el nombre de la máquina");
return (StrPas(Buffer));
}

Ledian_Fdez 11-02-2010 22:50:46

Mil Gracias
 
Hola amigos, este foro es super !!!!

Mil gracias !!! :D

Salu2,
Ledian.


La franja horaria es GMT +2. Ahora son las 07:58:20.

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