wie in Tcustomcontrol auf Scrollen reagieren??

[Bummi]

Die Klasse etwas aufbohren:

Delphi-Quellcode:

  published
    property OnScrollHorz: TNotifyEvent read FOnScrollHorz write FOnScrollHorz;
    property OnScrollVert: TNotifyEvent read FOnScrollVert write FOnScrollVert;
    property OnWheel: TMyWheelEvent read FOnWheel write FOnWheel;