Delphi-PRAXiS - Delphi Scrollbar ersetzten/benutzen?

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi Scrollbar ersetzten/benutzen? (https://www.delphipraxis.net/95573-scrollbar-ersetzten-benutzen.html)

Scrollbar ersetzten/benutzen?

Hi, ich habe eine Komponente, bei welcher ich die Scrollbars ausblenden kann. Gleichzeitig abe ich eine Scrollbarkomponente (mit speziellen Farb-Effekten). Wie kann ich nun die Scrollbarkomponente benutzen (von tscrollbar abgeleitet) um in der ersten Komponente zu scrollen? Auf Deutsch: Wie bringe ich eine tscrollbar dazu zu scrollen?

Danke!

Re: Scrollbar ersetzten/benutzen?

gibt es da nicht irgendein event, das ausgelöst wird wenn man damit scrollt?

Re: Scrollbar ersetzten/benutzen?

Hi,

ich denke dies ist die beste Lösung für dein Problem (an meinem Player erfolgreich getestet):
1. Kopiere die Komponente, welche Scrollbars ausblenden kann.
2. Gib ihr einen leicht veränderten Namen, der z.B. etwas über die Scrollbar aussagt.
3. Nun ist es, da die Scrollbar sowieso ausblendbar ist, nicht schwer, die Scrollbar zu ersetzen.
Beispiel: ScrollBar : TScrollBar. Nun musst du die farbige Scrollbar nur in die uses-Klausel aufnehmen und kannst dann einfach aus der genannten Codezeile z.B. ScrollBar : TFarbigeScrollBar machen. Dann einfach installieren und benutzen.
4. Du musst sie nicht mehr ausblenden :). Dies erspart die spätere Probleme (ab und zu schaut die ausgeblendete ScrollBar bei Auslöung von bestimmten, unbekannten Ereignissen hindurch und bleibt sogar noch im schlimmsten Fall einfach da, statt kurz aufzuflackern) :).