Форум: "Начинающим";
Текущий архив: 2007.02.04;
Скачать: [xml.tar.bz2];

Вниз

Как узнать под каким пользователем загруженна программа   Найти похожие ветки 

← →
root ©   (2007-01-17 15:27) [0]

Господа подскажите как получить имя пользователя под которым загружена программа

Administrator
Guest
User
......

---

← →
Rouse_ ©   (2007-01-17 15:48) [1]

ГетЮзерНайм

---

← →
kaZaNoVa ©   (2007-01-17 16:01) [2]

Function GetUserFromWindows: string;
Var
 UserName    : string;
 UserNameLen : Dword;
Begin
 UserNameLen := 255;
 SetLength(userName, UserNameLen);
 If GetUserName(PChar(UserName), UserNameLen) Then
   Result := Copy(UserName,1,UserNameLen - 1)
 Else
   Result := "Unknown";
End;



---

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

Форум: "Начинающим";
Текущий архив: 2007.02.04;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.042 c