Вниз
Скачать: CL | DM;

Как получить расшифровку логина WIndows   Найти похожие ветки 

 
Deniskov   (2009-12-10 10:04) [0]

Подскажите, пожалуйста, как можно получить, не знаю как правильно это назвать - расшифровку, ФИО или комментарий логина пользователя?  Эти данные выводятся в меню "Пуск" в самом верху, как бы в заголовке окна меню. Администратор домена записывает туда ФИО.
Понимаю - описание сумбурное, но точнее не знаю как сказать:)


 
Ymen   (2009-12-10 10:20) [1]

procedure GetUserNameEx (NameFormat: DWORD; lpNameBuffer: LPSTR; nSize: PULONG); stdcall; external "secur32.dll" Name "GetUserNameExA";
function LoggedOnUserNameEx : string;
{
const
 NameUnknown          = 0; // Unknown name type.
 NameFullyQualifiedDN = 1; // Fully qualified distinguished name
 NameSamCompatible    = 2; // Windows NT® 4.0 account name
 NameDisplay          = 3; // A "friendly" display name
 NameUniqueId         = 6; // GUID string that the IIDFromString function returns
 NameCanonical        = 7; // Complete canonical name
 NameUserPrincipal    = 8; // User principal name
 NameCanonicalEx      = 9;
 NameServicePrincipal = 10; // Generalized service principal name
 DNSDomainName        = 11; // DNS domain name, plus the user name
}
{var
 UserName : array [0..250] of char;
 Size     : DWORD;
begin
 Size := 250;
 GetUserNameEx (3, @UserName, @Size);
 Result := UserName;
end


 
Deniskov   (2009-12-10 10:51) [2]

Спасибо, попробую:)



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c
15-1259598607
TIF
2009-11-30 19:30
2010.01.31
Серия вебинаров Embarcadero по Delphi 2010


1-1234886728
Drowsy
2009-02-17 19:05
2010.01.31
DLL BCB из Дельфи


15-1259357418
Юрий
2009-11-28 00:30
2010.01.31
С днем рождения ! 28 ноября 2009 суббота


1-1234695610
stas
2009-02-15 14:00
2010.01.31
TWebbrowser получить картинки


15-1258128360
Кто б сомневался
2009-11-13 19:06
2010.01.31
Как скачать файл с помощью батника?




   Наверх