Главная страница
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.033 c
7-25626
Данила
2003-10-27 13:18
2004.01.09
C, D, E ... сколько их.


14-25544
Style
2003-12-18 16:54
2004.01.09
И всеже, как осуществляется докачка файлов по HTTP?


4-25669
reef
2003-11-07 16:32
2004.01.09
WriteFile и 1Mb массив


1-25438
Stas
2003-12-23 15:06
2004.01.09
Градиентаня заливка


3-25253
ShadowSmart
2003-12-10 14:22
2004.01.09
Сжатие *.mdb через ADO