No hay respuestas en este tema

[sir.dev.a.lot]

[TRUCO DELPHI] Nombre de tu Ordenador.

delphi

function GetLocalComputerName: String;
Var
  aLength           : DWORD;
  aLocalComputerName: Array[0..MAX_PATH - 1] Of Char;
begin
  aLength := MAX_COMPUTERNAME_LENGTH + 1;
  GetComputerName(aLocalComputerName, aLength);
  Result := aLocalComputerName;
end;

Saludos!