|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
23.08.2009, 16:18 | #1 |
Студент, не
Старожил
Регистрация: 29.01.2009
Сообщений: 2,067
|
Почему обработчики OnMouseWheel происходят несколько раз подряд? (Delphi7)
Делал я однажды программу... И заметил что масштабирование с помощью колёсика мыши работает как-то не так...
Если точнее - "прыжки" в 2 раза больше чем должно быть... Стал разбираться... Поставил точку останова на одном из событий OnMouseWheel и выяснилось, что обработчик почему-то вызывается дважды подряд... Код:
Точнее - когда этот контрол в фокусе... А в моём проекте как раз одна кнопка... Так же происходит с TEdit, TBitBtn, TCheckBox, TRadioButton, TScrollBar, TMaskEdit и другими... Должно ли так происходить и почему? Ни в одном из моих самоучителей про это ни слова, а ошибки-то лезут... Или это с моей Делфи что-то не так? P.S. Вышел из ситуации заменив свою кнопку на TSpeedButton... Хотя можно было наверное ещё и через Application.OnMessage сделать, но поменять кнопку было быстрее...
I am the First of Cyber Evolution...
I am the First to Program your Future... |
23.08.2009, 16:27 | #2 | |
Trust no one.
Старожил
Регистрация: 07.04.2009
Сообщений: 6,526
|
А попробуй поменять настройки мыши, а именно "прокручивание на N строк". Может эта системная функция вызывается так:
Цитата:
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ |
|
23.08.2009, 16:35 | #3 | ||
Студент, не
Старожил
Регистрация: 29.01.2009
Сообщений: 2,067
|
А если положить на форму TPanel, в него ещё один TPanel, а уже во второй положить TButton - то обработчики OnMouseWheel вызываются четырежды... О_О
Цитата:
Может когда класс TForm делали что-то с этим напутали: Цитата:
I am the First of Cyber Evolution...
I am the First to Program your Future... |
||
23.08.2009, 16:49 | #4 | |
Trust no one.
Старожил
Регистрация: 07.04.2009
Сообщений: 6,526
|
Цитата:
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ |
|
23.08.2009, 19:43 | #5 |
Участник клуба
Регистрация: 12.10.2007
Сообщений: 1,204
|
Код:
|
23.08.2009, 22:11 | #6 |
Студент, не
Старожил
Регистрация: 29.01.2009
Сообщений: 2,067
|
Хм... Никогда не пользовался этой настройкой...
Ну это-то не должно влиять на Делфи... И к тому же на пустой форме-то работает как надо... Вот сделал через Application.OnMessage (вроде всё правильно): Код:
I am the First of Cyber Evolution...
I am the First to Program your Future... |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Почему не работают модули в Delphi7: DXClass, DXSprite, DXDraws, ExtCtrls, StdCtrls | Mclaren | Помощь студентам | 3 | 02.05.2009 15:13 |
Как зарегистрировать несколько раз в реестре | Volkogriz | Общие вопросы Delphi | 5 | 14.01.2009 16:42 |
имя может встречаться несколько раз, как используя pos найти все вхождения имени в строку | milton | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 09.12.2008 22:34 |
по нажатию кнопки shape будет сдвигаться на несколько позиций в сторону (Delphi7) | -HunteR- | Gamedev - cоздание игр: Unity, OpenGL, DirectX | 14 | 12.11.2007 20:37 |
обработчики в кучу | CyberMerlin | Общие вопросы Delphi | 15 | 15.08.2007 13:42 |