Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Как правильно переопределить методы OnMouseWheelUp

Автор: GenaNa 16.12.2009, 17:56

Подскажите, пожалуйста, как переопределить (override) методы - реакции на события OnMouseWheelUp, OnMouseWheelDown компонента TStringGrid

Попытка :

Код


....
protected

     procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);override;

....
implementation
....

Выдает ошибку: метод родительского класса не найден

Автор: THandle 16.12.2009, 20:29

GenaNa,

Если тебе нужно переопределить реакцию на OnMouseWheelUp, OnMouseWheelDown, то смотри на методы TControl.DoMouseWheelUp, TControl.DoMouseWheelDown.

Автор: Beltar 17.12.2009, 08:33

Собственно переопределяться должны не сами обработчики, а процедуры диспетцеризации. Имена у них начинаются с Do, или просто отбрасывается префикс on.

У меня почему-то на:

Код


  TGrid=class(TStringGrid)
    protected
    procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);override;
  end;

Не ругается.

Автор: GenaNa 20.12.2009, 21:29

Действительно не ругается... smile

В программе забыл отбросить префикс "On" перед объявлением функции, а вот в вопрос написал без него.
Спасибо.