Différences

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

--- prog:lazarus:components:scrollbars [09/04/2020 18:59]
thierry [Autres fonctions]
+++ prog:lazarus:components:scrollbars [09/04/2020 19:16] (Version actuelle)
thierry [Connaitre la taille des Scrollbar]
@@ Ligne 87: / Ligne 87: @@
 ==== Connaitre la taille des Scrollbar ====
+Les valeurs ci-dessous sont les valeurs relevées sur mon system.
 <code delphi>
-  GetSystemMetrics(SM_CXHSCROLL)
+uses windows;
-  GetSystemMetrics(SM_CYHSCROLL)
-  GetSystemMetrics(SM_CXHTHUMB)
+  GetSystemMetrics(SM_CXHSCROLL) = 17
-  GetSystemMetrics(SM_CXVSCROLL)
+  GetSystemMetrics(SM_CYHSCROLL) = 17
-  GetSystemMetrics(SM_CXVSCROLL)
+  GetSystemMetrics(SM_CXHTHUMB) = 17
-  GetSystemMetrics(SM_CYVTHUMB)
+  GetSystemMetrics(SM_CXVSCROLL) = 17
-  GetSystemMetrics(SM_MOUSEHORIZONTALWHEELPRESENT)
+  GetSystemMetrics(SM_CXVSCROLL) = 17
-  GetSystemMetrics(SM_MOUSEWHEELPRESENT)
+  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 112: / Ligne 116: @@
 </code>
+Source : [[https://docs.microsoft.com/en-us/windows/win32/controls/bumper-scroll-bars-reference-functions]]