как узнать имя (логин) текущего пользователя 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

commm (06.04.02 13:53)
Если ты про Synochka (06.04.02 13:03), то не помешает добавить
S := PChar(S);

← →
commm (2002-04-06 15:09) [10]

thanx!
выручили прямо ;)

как узнать имя (логин) текущего пользователя windows? Найти похожие ветки