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

Вниз

Как узнать, что винда заблокирована?   Найти похожие ветки 

 
Shurik_212   (2003-12-17 14:37) [0]

Т.е. как узнать что пользователь нажал Ctrl+Alt+Del или Win+L


 
Shurik_212   (2003-12-17 15:45) [1]

Тайный смысел заключается в следующем. Моя прога по событию таймера смотрит позицию мышки
MyMousePos:=Mouse.CursorPos
И во время запроса пароля (Win+L) или когда нажаты Ctrl+Alt+Del программа выдает ошибку "A call to an OS function failed", а затем при следующем событии таймера "System Error. Code 6. Неверный дескриптор".
Помогите, плиз.


 
Карелин Артем   (2003-12-17 15:50) [2]

может так:
try
MyMousePos:=Mouse.CursorPos
except
...Винда заблокирована
end


 
Shurik_212   (2003-12-17 16:21) [3]

все-равно ругается....


 
Карелин Артем   (2003-12-18 09:14) [4]

Shurik_212 (17.12.03 16:21) [3]
Кто ругается и когда? Отладчик или прога?


 
Shurik_212   (2003-12-18 10:48) [5]

Спасибо. разобрался. Ругалась прога, но до тих пор, пока после Except не написал MyMousePos.X:=0; и MyMousePos.Y:=0;
Но что самое интересное, если просто ремил строку MyMousePos:=Mouse.CursorPos - ругни небыло.
Спасибо за участие.



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

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

Наверх





Память: 0.45 MB
Время: 0.007 c
7-12565
bvn123
2003-12-17 14:46
2004.03.05
Как организовать автозапуск приложения при подключении к USB


1-12337
LaidBack
2004-02-25 14:56
2004.03.05
Как расположить панель выше главного меню?


8-12463
Sodven
2003-11-03 19:34
2004.03.05
GDI+ в Delphi


3-12238
Солер
2004-02-09 17:41
2004.03.05
Halcyon и русский язык


4-12571
fishca
2003-12-30 11:01
2004.03.05
Удаление файла





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