Obtener el Nombre Real del Usuario de Windows

[leodenis784]

Hola a Todos...

Deseo Obtener el Nombre Real del Usuario de Windows, ya se que la siguiente funcion, me muestra el nombre de usuario.

Código Delphi [-]
function GetUserName : String;
 var
    pcUser   : PChar;
    dwUSize : DWORD;
 begin
    dwUSize := 21;
    GetMem( pcUser, dwUSize );
    try
       if Windows.GetUserName( pcUser, dwUSize ) then
          Result := pcUser
    finally
       FreeMem( pcUser );
    end;
 end;

Label1.Caption:=GetUserName;

Bien, pero en realidad no es eso lo que me interesa, me interesa que si el Usuario es "JUAN PEREZ", me muestre ese nombre ("JUAN PEREZ") en lugar el Usuario "J.perez".

Un Saludo,

Espero Puedan Ayudarme.

[luisgutierrezb]

creo que este tip te servira perfectamente, como observacion en lugar de usuar el "NameSamCompatible" usa el "NameDisplay"

[leodenis784]

El ejemplo que me enviaste me funciono Perfectamente!

Mil Gracias!