Listbox: Wie kann ich auf Änderung des TopIndex' reagieren?

[Nogge]

Jo, Danke...genau das wollte ich haben (Hätte ich auch eigentlich selber drauf kommen müssen o_O)! Allerdings habe ich mir keine Komponente erstellt, da ich die Listbox wohl nur für dieses eine Projekt benötigen werde. Habe stattdessen einen eigenen "Type" deklariert (nur für die, die das selbe Problem haben, wie ich es hatte^^):

Delphi-Quellcode:

type
  TListboxEx = class(TListBox)
  private
    procedure WMNCCalcSize(var Msg: TWMNCCalcSize);  // keine ScrollBar
      message WM_NCCALCSIZE;
    procedure WMMouseWheel(var Msg: TWMMouseWheel);  // Scrollen trotzdem aktivieren
      message WM_MOUSEWHEEL;
    procedure WMVSCROLL(var Msg: TWMScroll);         // aufs Scrollen mit der Maus reagieren
      message WM_VSCROLL;
    procedure WMKeyDown(var Msg:TWMKey);             // aufs Scrollen mit den Tasten reagieren
      message WM_KEYDOWN;
  end;

Vielen Dank Stevie für die Hilfe und Inspiration!