Текущий архив: 2004.11.07;
Скачать: CL | DM;
Вниз
mousewheel Найти похожие ветки
← →
focor (2004-10-10 09:17) [0]У меня мышь с восьмью кнопками.Как в делфи их можно опознать?
Как сделать опознавание из любого приложения?
← →
begin...end © (2004-10-10 09:19) [1]Мутант, что ли?
← →
TeNY © (2004-10-10 17:31) [2]Не мутант а мышь с 8 кнопками у человека у мення их 5 и подобный вопрос...Так что жду ответ(2х кнопочные отдыхают...:))
← →
Defunct © (2004-10-10 19:51) [3]У фреймов есть события:
OnMouseWheelDown
OnMouseWheelUp
← →
Defunct © (2004-10-10 19:53) [4][3] у форм похоже тоже.
← →
focor (2004-10-10 21:24) [5]Ну а как его споймать,когда форма не в фокусе?
← →
KilkennyCat © (2004-10-10 21:30) [6]Вообще-то, к таким мышам драйв идет.
> TeNY © (10.10.04 17:31) [2]
> Не мутант а мышь с 8 кнопками у человека у мення их 5
"Урри, Урри, ты нашел у него кнопку?"
← →
Anatoly Podgoretsky © (2004-10-10 22:08) [7]Hit года мышка с 40 кнопками. Заняла первое место по не нужным устройствам.
← →
Palladin © (2004-10-10 22:10) [8]Артемий Лебедев: 40 кнопок можно уложить в одну, если дать ей 40 свобод движения, НО КАК МОЖНО ПРОЩЕ!!!
← →
mtihonov © (2004-10-11 05:29) [9]Вот он - западный снобизм , нет что"б как у всех нормальных людей - две, ну три кнопочки. А теперь ему скажи как ими пользоваться. Подари мне такую же - я глядишь разберусь и тогда скажу...
← →
TUser © (2004-10-11 06:08) [10]
> Hit года мышка с 40 кнопками.
Это не мышь с 40 кнопками, это - клава с лампочкой.
← →
TeNY © (2004-10-11 06:43) [11]зря смеётесь двухкнопошные,конечно 40 кнопок это много но 5ти кнопок мне вполне хватает на дополнительных 3х кнопках у меня висят такие функции как запуск дельфи,компиляция и выход,так что ЛЮДИ ва наверное просто завидуете нам :)
← →
Defunct © (2004-10-11 06:49) [12]> наверное просто завидуете нам :)
Отнюдь..
Выбросил 5-ти кнопочную мышку, т.к. эти левые 3 кнопки постоянно мешали. Кликнешь случайно и на тебе - армагеддон ;)
2 кнопки + Wheel самое оно. А компилировать лучше с клавиатуры.
← →
TeNY © (2004-10-11 06:52) [13]
> focor (10.10.04 09:17)
> У меня мышь с восьмью кнопками.Как в делфи их можно опознать?
> Как сделать опознавание из любого приложения?
Попробуй на форму брось ApplicationEvents1 и отлавливать все мессапги то есть ты получишь коды кнопок
← →
Sunny Way © (2004-10-11 12:39) [14]Раз уж сам Anatoly Podgoretsky сиронизировал на тему многокнопочных мышей, позволю себе заметить, что для некоторых специализированных рабочих станциях они как нельзя кстати. Один из примеров -
http://www.racurs.ru/index.php?page=20
Что-то большое черное слева от обычной мышки - десятикнопочная мышка, позволяющая оператору при выполнении одинаковых рутинных действий обходиться ею совсем без клавиатуры, тем самым повышая эффективность работы.
← →
KilkennyCat © (2004-10-11 15:41) [15]
> Sunny Way © (11.10.04 12:39) [14]
согласен, сам когда-то производил нечто для своей проги, но запускать делфи мышиной выделенной кнопкой... можно подумать, сотню раз в день приходится запускать.
← →
focor (2004-10-16 19:19) [16]Если бы у вас была такая мышь,то вы бы никогда не отказались от
нее (очень удобно,кстати).Так что зря смеетесь :0
← →
TeNY © (2004-10-23 15:26) [17]MSDN описывает 5 кнопок так что делай так
ставишь таймер,в нем пишеш
procedure TForm1.Timer1Timer(Sender: TObject);
begin
panel1.caption:=getbaton;
end;
/////////////////
funtion getbaton():string;
var
s:tkeyboardstate;
b:byte;
mousedown:string;
begin
mousedown:="";
GetKeyState(s);
for b:=1 to 6 do
if abs(s[b]div $80)=$80 then
case b of
1:mousedown:=mousedown+"Левый батон ";
2:mousedown:=mousedown+"Правый батон ";
3:mousedown:=mousedown+"Средний батон ";
5:mousedown:=mousedown+"Х1 батон ";
6:mousedown:=mousedown+"Х2 батон ";
else mousedown:="Ничего не нажато";
result:=mousedown;
end;
К сожалению сканкоды других кнопок не знаю но ты можеш их сам просканить проверив если число в S[B]=1000хххх(binary)или 128 или 80h тогда кнопка нажата иначе не нажата на первый байт можеш забить так как он нужен лишЬ для хххLock разных,
Код проверен работает на моей 5 кнопочной мышке со стандартными видоскими дровами,если ставлю родные дрова то дополнительные кнопки вообще как бы исчезают,видать дрова всё перехватывают.
← →
focor (2004-10-24 08:53) [18]Спасибо большое за оказанную помощь :)
← →
TeNY © (2004-10-24 13:49) [19]Рад оказать помощь :)
Страницы: 1 вся ветка
Текущий архив: 2004.11.07;
Скачать: CL | DM;
Память: 0.51 MB
Время: 0.053 c
