Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите пожалуйста... Я из реестра беру имя пользователя... [D7, WinXP]


SANEK_10289 ©   (2005-10-12 09:29:00) 

Помогите пожалуйста...
Я из реестра беру имя пользователя компьютера, таким способом:
// узнаем текущего юзера в системе
Rg:=TRegistry.Create;
Rg.RootKey:=HKEY_CURRENT_USER;
Rg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\Explorer',true);
CurrentUser:=Rg.ReadString('Logon User Name');
Rg.Free;

но почему то оттуда береться одна фамилия, например: Петров,
а в заголовке меню Windows высвечиваеться: Петров Петр Петрович

Откуда взять полное имя пользователя, с какого места из реестра? Помогите...


SANEK_10289   (2005-10-12 10:47:00) [1]

спасибо.


umbra   (2005-10-12 10:24:00) [2]

на ХР имя пользователя содержится в переменной среды USERNAME.

uses SysUtils;
var usr: string;
{......................}
usr := GetEnvironmentVariable('username');


Наверх

Титульная страница Поиск, карта сайта Написать письмо