ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Отключение скроллинга, когда курсор не на компоненте
9 сообщений из 9, страница 1 из 1
Отключение скроллинга, когда курсор не на компоненте
    #39614745
aford
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
aford
Гость
Всем привет!

Прошу помощи в такой проблеме. В DBGridEh скроллинг мышкой по умолчанию работает и это замечательно!
Но, когда увожу курсор с таблицы - он все равно работает на этой же таблице до тех пор, пока у нее не отпадет фокус. Функционал программы не страдает, но неудобства все же есть. Хотелось бы, чтобы при наведении на таблицу скроллинг работал, а если курсор не над таблицей - соответственно отключался.
...
Рейтинг: 0 / 0
14.03.2018, 13:53
| Ответить | Цитировать | Написать  
Отключение скроллинга, когда курсор не на компоненте
    #39614804
Соколинский Борис
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Соколинский Борис
Участник
aford,
Вставь в код формы-владельца
Код: pascal
1.
2.
3.
4.
5.
6.
type
  TForm1 = class(TForm)
  public
    { Public declarations }
    procedure MouseWheelHandler(var Message: TMessage); override;
  end;


И делай там что хочешь.
...
Рейтинг: 0 / 0
14.03.2018, 15:16
| Ответить | Цитировать | Написать  
Отключение скроллинга, когда курсор не на компоненте
    #39614810
LSV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LSV
Участник
А меня дико бесит сабж в закрытом комбобоксе. :)
...
Рейтинг: 0 / 0
14.03.2018, 15:20
| Ответить | Цитировать | Написать  
Отключение скроллинга, когда курсор не на компоненте
    #39614817
Соколинский Борис
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Соколинский Борис
Участник
LSV, а мне кажется, что в каких-то случаях очень полезная фича.
Например если при переключении меняются моды других контролов.
...
Рейтинг: 0 / 0
14.03.2018, 15:26
| Ответить | Цитировать | Написать  
Отключение скроллинга, когда курсор не на компоненте
    #39614825
LSV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LSV
Участник
Соколинский БорисLSV, а мне кажется, что в каких-то случаях очень полезная фича.
Например если при переключении меняются моды других контролов.Я пока вижу только негатив. Очень легко перепутать и случайно схрольнуть. А потом трудно вернуться назад, если не помнишь начальное значение.
...
Рейтинг: 0 / 0
14.03.2018, 15:35
| Ответить | Цитировать | Написать  
Отключение скроллинга, когда курсор не на компоненте
    #39614829
aford
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
aford
Гость
Соколинский БорисИ делай там что хочешь.
Можно пример?
...
Рейтинг: 0 / 0
14.03.2018, 15:41
| Ответить | Цитировать | Написать  
Отключение скроллинга, когда курсор не на компоненте
    #39614847
чччД
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
чччД
Участник
afordСоколинский БорисИ делай там что хочешь.
Можно пример?
"Делай что хочешь" - то значит, тебя устроит произвольный код?
...
Рейтинг: 0 / 0
14.03.2018, 15:51
| Ответить | Цитировать | Написать  
Отключение скроллинга, когда курсор не на компоненте
    #39614852
Соколинский Борис
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Соколинский Борис
Участник
afordМожно пример?
Код: pascal
1.
2.
3.
4.
5.
procedure TForm1.MouseWheelHandler(var Message: TMessage);
begin
  if NeedScroll //тут решаешь, нужно ли скроллить
    then inherited;
end;
...
Рейтинг: 0 / 0
14.03.2018, 15:56
| Ответить | Цитировать | Написать  
Отключение скроллинга, когда курсор не на компоненте
    #39615990
aford
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
aford
Гость
Спасибо! Все работает
...
Рейтинг: 0 / 0
16.03.2018, 15:07
| Ответить | Цитировать | Написать  
9 сообщений из 9, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Отключение скроллинга, когда курсор не на компоненте
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&msg=39614847&tid=2041142]:
 0ms
get settings:
 8ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 406ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 43ms
get tp. blocked users:
 1ms
others: 218ms
total:  708ms
созд. / загр.: 708ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]