Como faço para pegar o nome do usuário da rede

06/08/2004

2

Olá Pessoal !
Estava dando uma olhada numas dicas do delphi e vi está função:


( DCUs : DBITYPES, DBIPROCS, DBIERRS, DBTables e DB)

function TForm1.usuario : string;
var
szNetName: Array[0..48] of Char;
iResult: DBIResult;
begin
iResult:= DBIGetNetUserName(szNetName);
if iResult <> DBIErr_None then
DBIError( iResult )
else
Result:= StrPas(szNetName);
end;


ela está certa? como faço para mostrar numa label o nome do usuário da rede por exemplo?

Valew
Um abraço

Celso A. F.


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar