Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.26;
Скачать: CL | DM;

Вниз

Имя пользователя   Найти похожие ветки 

 
FastByte   (2004-08-18 07:46) [0]

Здравствуйте.
Как в Delphi получить имя текущего польз-ля в системе?
Есть исходник на Си, но не знаю какие модули подключать, где определены нужные типы данных.


 
Юрий Зотов ©   (2004-08-18 08:10) [1]

Модуль - 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;


 
FastByte   (2004-08-18 09:22) [2]

Огромное спасибо :)



Страницы: 1 вся ветка

Текущий архив: 2004.09.26;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.041 c
1-1094639011
Boris
2004-09-08 14:23
2004.09.26
Управление портами


14-1094190998
Аноним
2004-09-03 09:56
2004.09.26
Посоветуйте книгу


14-1094236585
Владислав
2004-09-03 22:36
2004.09.26
Вопрос.


14-1094114975
Knight
2004-09-02 12:49
2004.09.26
Кто-нибудь сам мониторы фокусировал?


14-1093665713
Григорьев Антон
2004-08-28 08:01
2004.09.26
211.34.96.11 - адрес трусливого ничтожества