GetUserName 函数得不到正确的windows系统登陆用户名,怎么解?
delphi吧
全部回复
仅看楼主
level 1
pjmgydzyd 楼主
用 GetUserName 函数 得到的用户名是 system
实际上 用户名应该是 administrator
请问能用什么方法 获取 真正的登陆用户名
2019年09月27日 10点09分 1
level 9
注册表里有,自己去翻
2019年11月20日 15点11分 2
用set看下环境变量,那里也有
2019年11月20日 15点11分
level 5
function WinUserName: string;
var
FStr: PChar;
FSize: Cardinal;
begin
FSize := 255;
GetMem(FStr, FSize);
GetUserName(FStr, FSize);
Result := FStr;
FreeMem(FStr);
end;
2019年11月28日 13点11分 3
1