![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как узнать Имя пользователя в Виндовс [D6, WinXP]
Slash_from_Ryazan © (2004-01-26 02:23:00)Подскажите, пожалуйста, как можно узнать имя пользователя который работает в текущем сеансе. На компьютере с Win XP создано два пользователя мне необхдимо при старте одной из моих программ определять какой из пользователей сейчас вошел в систему; желательно узнать его имя. Заранее спасибо всем ответившим.
SPIRIT (2004-01-26 15:19:00) [1]все.. наступил на грабли.. и понял
SPIRIT (2004-01-26 15:10:00) [2]а почему Trim(Buffer) не работает ??
Pipe (2004-01-26 09:14:00) [3]Function GetUserLogin():String;
Var Buffer:String;
BuffSize:DWORD;
begin
BuffSize:=128;
SetLength(Buffer,BuffSize);
GetUserName(PChar(Buffer),BuffSize);
Result:=Buffer;
end;
Maksss (2004-01-26 08:45:00) [4]перед getusername(str,255) не збывай про SetLength(str,255)
KSergey (2004-01-26 08:41:00) [5]А как доступ осуществляем? Партизанская тайна?
Впрочем, подозрваю, что не выделен буфер под первый параметр.
AlexGreG (2004-01-26 08:21:00) [6]Выдаёт ошибку доступка в модуле ntdll.dll
REP (2004-01-26 07:59:00) [7]GetUserName