Текущий архив: 2002.04.18;
Скачать: CL | DM;
Вниз
как узнать имя (логин) текущего пользователя windows? Найти похожие ветки
← →
commm (2002-04-05 17:40) [0]напомните, где в реестере лежит login (имя) пользователя, который сейчас зашел в windows... заранее благодарю ;)
← →
Виктор Щербаков © (2002-04-05 17:46) [1]GetUserName
← →
commm (2002-04-06 10:12) [2]я читал в архиве форума - но там получается в переменно 255 символов... тогда как обрезать лишние пробелы???
← →
Pat © (2002-04-06 10:25) [3]Ничего обрезать не надо...наверно...
var ch:array [0..255] of char;
d:dword;
begin
d:=sizeof(ch);
GetUserName(ch,d);
end;
← →
Anatoly Podgoretsky © (2002-04-06 10:37) [4]n := GetUserName(ch,0) вернет размер
← →
Вася Пупкин © (2002-04-06 10:46) [5]Anatoly Podgoretsky © (06.04.02 10:37) Неправда, дяденька :)
← →
Anatoly Podgoretsky © (2002-04-06 10:55) [6]Вася Пупкин © (06.04.02 10:46)
Ты прав, я ошибся :-(
← →
Synochka (2002-04-06 13:03) [7]
Var
S : String ;
Len : Cardinal ;
BEGIN
SetLength ( S , 255 ) ;
Len := Length ( S ) ;
GetUserName ( @S [ 1 ] , Len ) ;
END ;
← →
commm (2002-04-06 13:53) [8]ну смотрите:
...
SHOWMESSAGE(S);
...
и что он выдает - сообщение, которое не вмещается на экран!!! ;)
НАРОД, кто помнит, где в реестере-то это имя лежит...
я нашел в своем XP, но не уверен: ПОСМОТРИТЕ у себя, plz, КТО НА 98-ом РАБОТАЕТ:
HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Explorer/Logon User Name
← →
Anatoly Podgoretsky © (2002-04-06 13:59) [9]commm (06.04.02 13:53)
Если ты про Synochka (06.04.02 13:03), то не помешает добавить
S := PChar(S);
← →
commm (2002-04-06 15:09) [10]thanx!
выручили прямо ;)
Страницы: 1 вся ветка
Текущий архив: 2002.04.18;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.009 c
