Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

2 вопроса   Найти похожие ветки 

 
Пубертанец   (2003-09-02 17:39) [0]

1) Хочу вызвать функцию AdjustTokenPrivileges для установления привилегии SE_SYSTEMTIME_NAME - как?

2) Почему, когда вызываю функцию SetSystemTime(lpSystemTime) у меня часы увеличиваются на 3 часа, чем задаю в lpSystemTime.wHour (var lpSystemTime: TSystemTime;)?


 
clickmaker   (2003-09-02 17:56) [1]

2) SetLocalTime


 
clickmaker   (2003-09-02 17:59) [2]

1)
var hToken: THandle;
tkp: TOKEN_PRIVILEGES;

OpenProcessToken(GetCurrentProcess, TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY, hToken);
LookupPrivilegeValue(nil, SE_SYSTEMTIME_NAME, tkp.Privileges[0].Luid);
tkp.PrivilegeCount := 1;
tkp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;
AdjustTokenPrivileges(hToken, false, tkp, 0, nil, 0);


 
Пубертанец   (2003-09-02 18:02) [3]

Спасибо, но проверю уже завтра. Конец дня.


 
Пубертанец   (2003-09-03 10:02) [4]

Че-то ругается на SE_SYSTEMTIME_NAME:
Undeclared identifier: "SE_SYSTEMTIME_NAME"

А на AdjustTokenPrivileges(hToken, false, tkp, 0, nil, 0); говорит:
There is no overloaded version of "AdjustTokenPrivileges" that can be called with these arguments


 
Игорь Шевченко   (2003-09-03 10:22) [5]

F1 на строке с ошибкой и все станет ясно


 
Пубертанец   (2003-09-03 10:52) [6]

С AdjustTokenPrivileges я уже разобрался.
А вот с SE_SYSTEMTIME_NAME - в WinAPI help написано, что это константа, а где она прописана, не нашел. Дельфя не понимает ее.

Кстати, для развития темы:
1) как, наоборот, снять эту привилегию
2) как узнать, есть ли у пользователя эта привилегия


 
clickmaker   (2003-09-03 11:15) [7]

1) Help по AdjustTokenPrivileges, там все это написано
2) GetTokenInformation



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

Текущий архив: 2003.11.13;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.034 c
1-41428
Elic
2003-10-29 07:20
2003.11.13
LoadFromStream для ТImage.Picture


3-40796
DelphiNew
2003-10-26 14:00
2003.11.13
Invalid parametr


3-40836
chtr
2003-10-21 14:22
2003.11.13
Ошибка Row cannot be located for updating


6-41870
TButton
2003-09-05 20:50
2003.11.13
Сокеты


3-40907
snoup
2003-10-19 14:25
2003.11.13
Можно ли и как создавать таблицы с помощью TIB компонент?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский