| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Имя пользователя [NT4, Win2k, WinXP]
FastByte © (2004-08-18 07:46:00)Здравствуйте.
Как в Delphi получить имя текущего польз-ля в системе?
Есть исходник на Си, но не знаю какие модули подключать, где определены нужные типы данных.
FastByte (2004-08-18 09:22:00) [1]Огромное спасибо :)
Юрий Зотов (2004-08-18 08:10:00) [2]Модуль - Windows. Функция - GetUserName.
function GetCurrentUserName: string;
var
Buff: array[0..255] of Char;
L: DWORD;
begin
L := SizeOf(Buff);
if GetUserName(Buff, L) then
SetString(Result, Buff, L - 1)
else
Result := ''
end;
| |
