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

Вниз

Система   Найти похожие ветки 

← →
alone   (2006-03-13 20:06) [0]

Подскажите как можно узнать имя пользователя под которым вошли в систему.. т.е. имя учетной записи..

---

← →
Anatoly Podgoretsky ©   (2006-03-13 20:13) [1]

GetUserName

---

← →
Handle   (2006-03-13 20:23) [2]

procedure TForm1.Button1Click(Sender: TObject);
var
lpBuffer: array [0..56] of char;
nSize: DWORD;
begin
GetUserName(lpBuffer,nSize);
Edit1.Text:= lpBuffer;
end;

---

← →
alone   (2006-03-13 21:19) [3]

спасибо. не сообразил

---

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

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

Наверх

Память: 0.45 MB
Время: 0.049 c