Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как узнать Имя пользователя в Виндовс [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


Наверх

Титульная страница Поиск, карта сайта Написать письмо