Welkom bij de Tweaking4All gemeenschapsforums!
Voor je gaat deelnemen, bekijk de Forum Regels!
Specifieke onderwerpen: Start het onderwerp met de naam van het programma of systeem.
Bijvoorbeeld “MacOS X – Jouw vraag“, of bijvoorbeeld “MS Word – Jouw Tip of Truc“.
Merk op: Omschakelen naar een andere taal zal niet werken als je een post aan het lezen bent aangezien er waarschijnlijk geen vertaling beschikbaar is.
Soms wil je weten hoe breed of hoe hoog een scrollbalk/scrollbar is van een bepaalde control (b.v. TStringGrid, TDBGrid, etc).
Vooral voor een crossplatform toepassing kan dit lastig zijn, zeker met de verschillende OS versies, en mogelijk gebruik van thema's, omdat deze waarde geen vaste waarde is.
Hier een voorbeeld hoe je deze waarden kunt bepalen zonder veel moeite (zou moeten werken onder Windows, MacOS, Linux/GTK, QT):
uses
LCLIntf, LCLType;
var
h, b: Integer;
...
h := GetSystemMetrics(SM_CYHSCROLL); // scrollbar hoogte
b := GetSystemMetrics(SM_CXVSCROLL); // scrollbar breedte
