![]() |
Aktuell eingeloggter User
Hallo,
hiermit kann man sich den aktuell eingeloggten User anschauen. Ob und wozu es Sinn macht sei mal dahin gestellt. ;)
Delphi-Quellcode:
Grüsse, Daniel :hi:
procedure TForm1.Button1Click(Sender: TObject);
function GetUser: String; var Buffer: Array[0..MAX_COMPUTERNAME_LENGTH +1] of Char; Size: DWord; begin Size := Pred(SizeOf(Buffer)); Windows.GetUserName(Buffer, Size); Result := StrPas(Buffer); end; begin ShowMessage(GetUser); end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:49 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz