Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2004.04.04;
Скачать: [xml.tar.bz2];

Вниз

Как узнать Имя пользователя в Виндовс   Найти похожие ветки 

 
Slash_from_Ryazan   (2004-01-26 02:23) [0]

Подскажите, пожалуйста, как можно узнать имя пользователя который работает в текущем сеансе. На компьютере с Win XP создано два пользователя мне необхдимо при старте одной из моих программ определять какой из пользователей сейчас вошел в систему; желательно узнать его имя. Заранее спасибо всем ответившим.


 
REP ©   (2004-01-26 07:59) [1]

GetUserName


 
AlexGreG ©   (2004-01-26 08:21) [2]

Выдаёт ошибку доступка в модуле ntdll.dll


 
KSergey ©   (2004-01-26 08:41) [3]

А как доступ осуществляем? Партизанская тайна?
Впрочем, подозрваю, что не выделен буфер под первый параметр.


 
Maksss   (2004-01-26 08:45) [4]

перед getusername(str,255) не збывай про SetLength(str,255)


 
Pipe   (2004-01-26 09:14) [5]

Function GetUserLogin():String;
Var Buffer:String;
   BuffSize:DWORD;
begin
 BuffSize:=128;
 SetLength(Buffer,BuffSize);
 GetUserName(PChar(Buffer),BuffSize);
 Result:=Buffer;
end;


 
SPIRIT ©   (2004-01-26 15:10) [6]

а почему Trim(Buffer) не работает ??


 
SPIRIT ©   (2004-01-26 15:19) [7]

все.. наступил на грабли.. и понял



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

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

Наверх





Память: 0.45 MB
Время: 0.041 c
1-1079540651
Buffoon
2004-03-17 19:24
2004.04.04
Конвертирование


1-1079321290
PIA
2004-03-15 06:28
2004.04.04
Почему программа из Delphi не запускается на других компах


4-1074872270
GrayFace
2004-01-23 18:37
2004.04.04
Как получить координаты клиентской обл. окна (ширины краев окна)?


1-1079130133
graf
2004-03-13 01:22
2004.04.04
RxRichEdit


1-1079085420
ORMADA
2004-03-12 12:57
2004.04.04
Синхронизация 2-х Memo





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский