Scrollen in TWinControl

Hallo,

ich suche eine Möglichkeit, in diversen von TWinControl (zB TMemo, TListBox) abgeleiteten Komponenten an voher gespeicherte Positionen zu scrollen.
Es soll etwa so laufen:
der Benutzer scrollt in dem Element zur gewünschten Position, diese wird gespeichert und später kann direkt zu dieser gespeicherten Position gesprungen werden.
Wer kann helfen?

Gruß
Marc

Guck Dir mal folgendes an:

 ScrollBox1.HorzScrollBar.Position := 100;
 ScrollBox1.VertScrollBar.Position := 100;

Das nützt mir leider nix. Das Scrollen müsste schon in TWinControl-Komponenten (bzw. NAchfolgern von TWinControl) funktionieren. Für die abgeleiteten Klassen von TScrollingWinControl hab ich schon eine Lösung, aber dsa reicht leider nicht.

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Ach so… muß Du gucken hier…
SetScrollPos(Memo1.Handle, 0, 100, true);
ShowMessage(IntToStr(GetScrollPos(Memo1.Handle, 0)));

Vergleiche Windows32-SDK-Referenz und Delphi-Hilfe.