Différences

Ci-dessous, les différences entre deux révisions de la page.

--- prog:lazarus:components:scrollbars [08/04/2020 19:15]
thierry [Capter les messages de Scroll]
+++ prog:lazarus:components:scrollbars [09/04/2020 19:16] (Version actuelle)
thierry [Connaitre la taille des Scrollbar]
@@ Ligne 84: / Ligne 84: @@
 Apparemment il y aurait un minimum, c'est a dire que si on défini nPage à 1, la ScrollBox ne s'adapte pas exactement a la taille, elle reste a une taille convenable pour être saisie.
+==== Connaitre la taille des Scrollbar ====
+Les valeurs ci-dessous sont les valeurs relevées sur mon system.
+<code delphi>
+uses windows;
+  GetSystemMetrics(SM_CXHSCROLL) = 17
+  GetSystemMetrics(SM_CYHSCROLL) = 17
+  GetSystemMetrics(SM_CXHTHUMB) = 17
+  GetSystemMetrics(SM_CXVSCROLL) = 17
+  GetSystemMetrics(SM_CXVSCROLL) = 17
+  GetSystemMetrics(SM_CYVTHUMB) = 17
+  GetSystemMetrics(SM_MOUSEHORIZONTALWHEELPRESENT) = 0 // 0 = pas de molette horizontale sur ma souris.
+  GetSystemMetrics(SM_MOUSEWHEELPRESENT) = 1 // 1 = Une molette verticale est presente sur ma souris
+</code>
+Source : [[https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-getsystemmetrics]]
@@ Ligne 98: / Ligne 116: @@
 </code>
+Source : [[https://docs.microsoft.com/en-us/windows/win32/controls/bumper-scroll-bars-reference-functions]]