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

Вниз

Узнать текущего пользователя   Найти похожие ветки 

 
Popova   (2003-11-06 16:47) [0]

Как узнать имя текущего пользователя?


 
Игорь Шевченко ©   (2003-11-06 16:56) [1]

Перевести вопрос на английский GetUserName


 
keymaster ©   (2003-11-06 17:15) [2]

Самый простой способ:

function GetCurrentUserName: string;
var
L: Cardinal;
begin
try
L := 255;
SetLength(Result, L - 1);
if GetUserName(PChar(Result), L) then SetLength(Result, L - 1)
except
RaiseLastWin32Error;
end;
end;


 
Игорь Шевченко ©   (2003-11-06 17:33) [3]

keymaster © (06.11.03 17:15)

У меня небольшой вопрос: в каком случае возникнет Exception внутри Win32-функции ?



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

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

Наверх




Память: 0.47 MB
Время: 0.032 c
11-25268
tamerlan311
2003-04-14 00:29
2004.01.09
Форум


3-25258
Andriy Tysh
2003-12-13 13:18
2004.01.09
Подгруппа в группе QuickReport a


14-25587
DelphiN!
2003-12-17 08:56
2004.01.09
Прога для маштабного изменения веб страниц


14-25568
Andryk
2003-12-16 20:15
2004.01.09
Где отчет о выездной международной встрече Мастаков?


1-25278
Masa
2003-12-23 14:56
2004.01.09
Exception