Dicas - Usuário do Windows

Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Para efetuar o download você precisa estar logado. Clique aqui para efetuar o login
Confirmar voto
0
 (1)  (0)

Dica de como mostrar o usuário logado no Windows.

Mostrando o usuário logado no windows

 

Incremente seu sistema, exibindo o usuário logado no windows, com uma simples dica. Veja o código abaixo:

 

function LogUser: string;

var

  Registro: TRegistry;

begin

   Registro := TRegistry.Create;

   Registro.RootKey := HKEY_LOCAL_MACHINE;

   if Registro.OpenKey('Network\Logon', false) then

   begin

      result := Registro.ReadString('username');

   end;

   Registro.Free;

end;

 

Veja abaixo a interface deste aplicativo.

 

 
Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Ficou com alguma dúvida?