Como saber qual é o usuario logado na rede.
Amigos,
como faço para saber qual é o usuário logado na rede?
como faço para saber qual é o usuário logado na rede?
Orlando Frade
Curtidas 0
Respostas
Eniorm
23/04/2004
Veja a dica 557 - Usuário Logado que pode ser
encontrado no Dicas e Truques DTDelphi 800 dicas, download
em www.lloydsoft.hpg.com.br
encontrado no Dicas e Truques DTDelphi 800 dicas, download
em www.lloydsoft.hpg.com.br
function LogUser : String;
{Requer a unit Registry declarada na clausula Uses da Unit}
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;GOSTEI 0
Marcela
23/04/2004
use GetUserName(..)
GOSTEI 0
Dpinho
23/04/2004
[quote:4c541f1353=´Enio Marconcini´]Veja a dica 557 - Usuário Logado que pode ser
encontrado no Dicas e Truques DTDelphi 800 dicas, download
em www.lloydsoft.hpg.com.br
[/quote:4c541f1353]
Estou fazendo um bate papo e esta quase pronto, so estou precisando colocar em um combo o nome de todas as estações e atualizar com um pequeno prazo timpo bate papo na net
encontrado no Dicas e Truques DTDelphi 800 dicas, download
em www.lloydsoft.hpg.com.br
function LogUser : String;
{Requer a unit Registry declarada na clausula Uses da Unit}
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;Estou fazendo um bate papo e esta quase pronto, so estou precisando colocar em um combo o nome de todas as estações e atualizar com um pequeno prazo timpo bate papo na net
GOSTEI 0