Discussion :

[[DreaMs]]

Bonjour,

J'aurais besoin dans mon programme en delphi de récupérer le nom d'utilisateur et le nom du domaine de l'utilisateur en cours.

J'avais écris une première version du code qui utilise une requête WMI. Or cette version ne fonctionne pas sous Citrix qui ne renvoi rien pour la variable USERNAME.

Mon client pour qui est dédié l'application m'a dit qu'une méthode en C# permettait de le faire, en voici le code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Console.WriteLine(System.Security.Principal.WindowsIdentity.GetCurrent().Name);

Auriez une méthode comparable ou similaire en Delphi pour récupérer cette information ?

D'avance merci !

[Ludo_360]

regarde avec ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Function GetUserFromWindows: string;
Var
   UserName    : string;
   UserNameLen : Dword;
Begin
   UserNameLen := 255;
   SetLength(userName, UserNameLen) ;
   If GetUserName(PChar(UserName), UserNameLen) Then
     Result := Copy(UserName,1,UserNameLen - 1)
   Else
     Result := 'Unknown';
End;

ludo

[evarisnea]

essaie aussi ceci pour le login et cela pour le domaine, c'est issu de la