Форум: "Сети";
Текущий архив: 2002.06.20;
Скачать: [xml.tar.bz2];
ВнизКак определить имя пользователя Найти похожие ветки
← →
dymon (2002-04-11 10:28) [0]Вопрос конечно простой, но что-то не могу нигде найти. Пишу программку-скрипт для входа в сеть и маппирования дисков. Должна срабатывать в зависимости от того, под каким именем пользователь зашел в сеть. Наверное это где-то в переменных среды. Как это имя получить в свою программу. Подскажить плз.
← →
else (2002-04-11 10:48) [1]s:string
l:=10;// все равно.
setlength(s,l);
if not GetUserName(pchar(s),l) then begin
setlength(s,l);
GetUserName(pchar(s),l);
end;
← →
dymon (2002-04-11 11:40) [2]Всем сэнкс. Работает следующий код:
procedure TForm1.Button3Click(Sender: TObject);
var aaa:string;
S : String ;
Len : Cardinal ;
begin
SetLength ( S , 255 ) ;
Len := Length ( S ) ;
GetUserName ( @S [ 1 ] , Len ) ;
Label1.caption:=S;
end;
← →
Anatoly Podgoretsky (2002-04-11 11:48) [3]При условии, что до входа в сеть есть имя
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2002.06.20;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.005 c