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

Вниз

Кaк вырубить, а потом снова врубить мышь???   Найти похожие ветки 

 
Transnet.   (2002-06-14 12:35) [0]

сабж. Очень надо!!! HELP!! PLIZ!!!!!


 
SerVS ©   (2002-06-14 16:43) [1]

Как ты думаешь, зачем на этом сайте поиск?


 
Manulo ©   (2002-06-17 17:10) [2]

Хм... Путей два ща вспоминаю...
1. Вырубить полностью и клаву и мышку...
BlockInput (true);
Врубаеться аналогично, тока с параметром false

2. Запомни текущее местоположение курсора мышки, а потом по таймеру переводи курсор в него... Точного синтаксиса не помню, посмотри в хелпе по функциям
GetCursorPos
SetCursorPos

Если не палучиться, кидай на мыло месагу, что именно неполучилось. ;)


 
Izyum ©   (2002-06-17 18:26) [3]

Если мне память не изменяет, то указанная функция (BlockInput) находится в User32.dll - перед использованием нужно ее импортировать


 
Izyum ©   (2002-06-17 18:27) [4]

1. Если мне память не изменяет, то указанная функция (BlockInput) находится в User32.dll - перед использованием нужно ее импортировать
2. При ее использовании вместе с мышкой у тебя заблокируется и клава


 
easy ©   (2002-06-17 20:06) [5]

...это на бейсике:

Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Form_Activate()
"KPD-Team 2000
"URL: http://www.allapi.net/
"E-Mail: KPDTeam@Allapi.net
DoEvents
"block the mouse and keyboard input
BlockInput True
"wait 10 seconds before unblocking it
Sleep 10000
"unblock the mouse and keyboard input
BlockInput False
End Sub

...если надо перевести - на мыло...



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

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

Наверх




Память: 0.48 MB
Время: 0.033 c
3-70986
ППавел
2002-07-31 10:24
2002.08.22
Ячейки Базы данных


1-71181
Voldemar
2002-08-09 04:21
2002.08.22
Как спрятать свойство в наследнике?


1-71096
X-jedy
2002-08-09 14:24
2002.08.22
Как оптимально сделать Create и Free куче переменных TStringlist?


14-71325
Romkin
2002-07-26 14:25
2002.08.22
Переход на MS SQL


3-70996
Ruslan_55
2002-07-31 13:58
2002.08.22
Помогите