I. Introduction▲
Nous allons voir l'ascenseur en tant que contrôle. Je parle de celui que l'on utilise pour changer des valeurs et non des ascenseurs associés à certains contrôles pour en faire défiler leur contenu.
Afin de l'implémenter, nous reprendrons l'exemple de la liste déroulante, ou nous remplacerons le groupe de boutons radio destiné à modifier la largeur du trait par un ascenseur horizontal.
II. Mise en œuvre▲
L'ascenseur sera ajouté depuis les ressources et identifié par la constante ID_SB1.
SCROLLBAR ID_SB1, 96
, 24
, 60
, 10
Comme pour l'exemple de la liste déroulante la largeur du trait sera mémorisée dans la variable globale Trait.
Pour utiliser un ascenseur, nous devons définir une structure SCROLLINFO servant de tampon pour transmettre ou récupérer les données de l'ascenseur.
Initialisation des données :
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
static
HWND hsb;
static
SCROLLINFO si;
switch
(
uMsg)
{
case
WM_INITDIALOG:
{
hsb =
GetDlgItem
(
hDlg, ID_SB1);
ZeroMemory
(&
si, sizeof
(
SCROLLINFO));
si.cbSize =
sizeof
(
si);
si.fMask =
SIF_RANGE |
SIF_POS;
si.nMin =
0
;
si.nMax =
10
;
si.nPos =
Trait;
SetScrollInfo
(
hsb, SB_CTL, &
si, FALSE);
SetDlgItemInt
(
hDlg, ID_LT1, Trait, FALSE);
return
TRUE;
}
À l'initialisation de la boîte de dialogue nous remplissons la structure SCROLLINFO, avec le champ fMask initialisé selon l'action que l'on voudra faire, puis le champ nMin avec la valeur mini, le champ nMax avec la valeur maxi et le champ nPos avec la largeur du trait actuelle afin qu'il reflète sa taille sur l'ascenseur. Nous exécutons le transfert des données avec la fonction SetScrollInfo qui reçoit comme paramètre : le handle de fenêtre de l'ascenseur, puis le flag SB_CTL, car c'est un contrôle, puis l'adresse de la variable (SCROLLINFO)si. Le dernier paramètre indique si l'on veut redessiner la barre à l'appel de la fonction.
J'ai rajouté dans la boîte de dialogue un contrôle texte pour afficher la valeur de la largeur du trait. Il est mis à jour avec la fonction SetDlgItemInt qui effectue automatiquement la conversion d'un entier en texte.
Ce contrôle n'est pas le plus simple, car nous devons gérer par programme son positionnement. Quand la position d'un ascenseur est modifiée un message WM_HSCROLL est envoyé à sa fenêtre parent. C'est donc sur ce message que l'on va gérer l'ascenseur.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
case
WM_HSCROLL:
GetScrollInfo
((
HWND)lParam, SB_CTL, &
si);
switch
(
LOWORD
(
wParam))
{
case
SB_PAGEUP:
si.nPos -=
2
;
if
(
si.nPos <
si.nMin) si.nPos =
si.nMin ;
break
;
case
SB_PAGEDOWN:
si.nPos +=
2
;
if
(
si.nPos >
si.nMax) si.nPos =
si.nMax ;
break
;
case
SB_LINEUP:
if
(
si.nPos >
si.nMin) si.nPos--
;
break
;
case
SB_LINEDOWN:
if
(
si.nPos <
si.nMax) si.nPos++
;
break
;
case
SB_THUMBPOSITION:
si.nPos =
HIWORD
(
wParam);
break
;
}
si.fMask =
SIF_POS;
SetScrollInfo
((
HWND)lParam, SB_CTL, &
si, TRUE);
SetDlgItemInt
(
hDlg, ID_LT1, si.nPos, FALSE);
return
TRUE;
Nous récupérons les informations de l'ascenseur en cours de manipulation dans la variable (SCROLLINFO)si, avec la fonction GetScrollInfo (il peut y avoir plusieurs ascenseurs). Le handle de fenêtre de l'ascenseur étant récupéré dans le paramètre lParam du message. Dans le mot de poids faible de son paramètre wParam, il retourne l'action qui a été effectuée sur l'ascenseur.
- SB_PAGEUP : clic sur la zone entre la flèche de gauche ou du haut et le curseur.
- SB_PAGEDOWN : clic sur la zone entre le curseur et la flèche de droite ou du bas.
- SB_LINEUP : clic sur la flèche de gauche ou du haut s'il est vertical.
- SB_LINEDOWN : clic sur la flèche de droite ou du bas s'il est vertical.
- SB_THUMBPOSITION : déplacement du curseur. En ce cas la valeur est retournée par le mot de poids fort du paramètre wParam.
Nous nous en servons pour changer ses positions qui seront effectives après l'appel de la fonction SetScrollInfo. Nous mettons de même à jour le texte reflétant sa valeur avec la fonction SetDlgItemInt.
À la fermeture de la boîte de dialogue par OK :
2.
3.
4.
5.
6.
7.
8.
case
WM_COMMAND:
if
(
LOWORD
(
wParam) ==
IDOK)
{
GetScrollInfo
(
hsb, SB_CTL, &
si);
Trait =
si.nPos;
EndDialog
(
hDlg,DB_OK);
return
TRUE;
}
Nous récupérons sa position à l'aide de GetScrollInfo et nous l'affectons à la variable Trait.
III. Code complet ▲
III-A. resource.h ▲
2.
3.
4.
5.
6.
#define IDM_QUIT 1
#define IDM_PROP 2
#define ID_SB1 101
#define ID_CB1 102
#define ID_LT1 103
III-B. resource.rc ▲
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
#include <windows.h>
#include "resource.h"
LEMENU MENU
BEGIN
POPUP "
Fichier
"
BEGIN
MENUITEM "
Propriétés...
"
, IDM_PROP
MENUITEM SEPARATOR
MENUITEM "
Quitter
"
, IDM_QUIT
END
END
DIALOG1 DIALOG
110
, 0
, 175
, 90
STYLE WS_POPUP |
WS_VISIBLE |
WS_CAPTION |
WS_SYSMENU
CAPTION "
Propriétés de la figure
"
BEGIN
LTEXT "
Figure
"
, -
1
, 35
, 10
, 30
, 10
COMBOBOX ID_CB1, 20
, 24
, 56
, 45
, CBS_DROPDOWNLIST
LTEXT "
Trait
"
, -
1
, 115
, 10
, 30
, 10
SCROLLBAR ID_SB1, 96
, 24
, 60
, 10
LTEXT "
Larg :
"
, -
1
, 110
, 44
, 20
, 10
RTEXT "
0
"
, ID_LT1, 130
, 44
, 10
, 10
DEFPUSHBUTTON "
OK
"
, IDOK, 36
, 65
, 42
, 12
PUSHBUTTON "
Cancel
"
, IDCANCEL, 96
, 65
, 42
, 12
END
III-C. winmain.c ▲
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
85.
86.
87.
88.
89.
90.
91.
92.
93.
94.
95.
96.
97.
98.
99.
100.
101.
102.
103.
104.
105.
106.
107.
108.
109.
110.
111.
112.
113.
114.
115.
116.
117.
118.
119.
120.
121.
122.
123.
124.
125.
126.
127.
128.
129.
130.
131.
132.
133.
134.
135.
136.
137.
138.
139.
140.
141.
142.
143.
144.
145.
146.
147.
148.
149.
150.
151.
152.
153.
154.
155.
156.
157.
158.
159.
160.
161.
162.
163.
164.
165.
166.
167.
168.
169.
170.
171.
172.
173.
174.
175.
176.
177.
178.
179.
180.
181.
182.
183.
184.
185.
186.
187.
188.
189.
190.
191.
192.
193.
194.
195.
196.
197.
#include <windows.h>
#include "resource.h"
#define DB_OK 1
#define ID_CARRE 0
#define ID_CERCLE 1
#define ID_TRIANGLE 2
UINT Forme;
UINT Trait;
HINSTANCE hinst;
LRESULT CALLBACK MainWndProc
(
HWND, UINT, WPARAM, LPARAM);
BOOL APIENTRY Dialog1Proc
(
HWND, UINT, WPARAM, LPARAM);
int
WINAPI WinMain
(
HINSTANCE hinstance, HINSTANCE hPrevInstance,
LPSTR lpCmdLine, int
nCmdShow)
{
HWND hwnd;
MSG msg;
WNDCLASS wc;
hinst =
hinstance;
wc.style =
0
;
wc.lpfnWndProc =
MainWndProc;
wc.cbClsExtra =
0
;
wc.cbWndExtra =
0
;
wc.hInstance =
hinstance;
wc.hIcon =
LoadIcon
(
NULL
, IDI_APPLICATION);
wc.hCursor =
LoadCursor
(
NULL
, IDC_ARROW);
wc.hbrBackground =
(
HBRUSH)(
1
+
COLOR_BTNFACE);
wc.lpszMenuName =
"
LEMENU
"
;
wc.lpszClassName =
"
MaWinClass
"
;
if
(!
RegisterClass
(&
wc)) return
FALSE;
hwnd =
CreateWindow
(
"
MaWinClass
"
, "
Check Box
"
, WS_OVERLAPPED |
WS_SYSMENU,
CW_USEDEFAULT, CW_USEDEFAULT, 400
, 260
,
NULL
, NULL
, hinstance, NULL
);
if
(!
hwnd) return
FALSE;
ShowWindow
(
hwnd, nCmdShow);
UpdateWindow
(
hwnd);
while
(
GetMessage
(&
msg, NULL
, 0
, 0
))
{
TranslateMessage
(&
msg);
DispatchMessage
(&
msg);
}
return
msg.wParam;
}
/**
***************************************************************************
*/
LRESULT CALLBACK MainWndProc
(
HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
switch
(
uMsg)
{
case
WM_CREATE:
Forme =
ID_CARRE;
Trait =
1
;
return
0
;
case
WM_COMMAND:
if
(
LOWORD
(
wParam) ==
IDM_QUIT) PostMessage
(
hwnd, WM_CLOSE,0
,0
);
if
(
LOWORD
(
wParam) ==
IDM_PROP)
{
if
(
DialogBox
(
hinst, "
DIALOG1
"
, hwnd, (
DLGPROC)Dialog1Proc)
==
DB_OK)
InvalidateRect
(
hwnd,NULL
,TRUE);
}
return
0
;
case
WM_PAINT :
{
PAINTSTRUCT ps;
HDC hdc ;
HPEN hpen, hpOld;
POINT ptTriangle[3
];
ptTriangle[0
].x =
20
;
ptTriangle[0
].y =
20
;
ptTriangle[1
].x =
20
;
ptTriangle[1
].y =
170
;
ptTriangle[2
].x =
170
;
ptTriangle[2
].y =
95
;
hdc =
BeginPaint
(
hwnd, &
ps);
hpen =
CreatePen
(
PS_SOLID, Trait, 0
);
hpOld =
SelectObject
(
hdc,hpen);
if
(
Forme ==
ID_CARRE) Rectangle
(
hdc, 20
, 20
, 170
, 170
);
if
(
Forme ==
ID_CERCLE) Ellipse
(
hdc, 20
, 20
, 170
, 170
);
if
(
Forme ==
ID_TRIANGLE) Polygon
(
hdc, ptTriangle, 3
);
SelectObject
(
hdc,hpOld);
DeleteObject
(
hpen);
EndPaint
(
hwnd, &
ps);
return
0
;
}
case
WM_DESTROY:
PostQuitMessage
(
0
);
return
0
;
default
:
return
DefWindowProc
(
hwnd, uMsg, wParam, lParam);
}
}
/**
***************************************************************************
*/
BOOL APIENTRY Dialog1Proc
(
HWND hDlg,UINT uMsg,WPARAM wParam,LPARAM lParam)
{
static
HWND hsb;
static
SCROLLINFO si;
switch
(
uMsg)
{
case
WM_INITDIALOG:
{
SendDlgItemMessage
(
hDlg, ID_CB1, CB_ADDSTRING, 0
, (
LONG)"
Carré
"
);
SendDlgItemMessage
(
hDlg, ID_CB1, CB_ADDSTRING, 0
, (
LONG)"
Cercle
"
);
SendDlgItemMessage
(
hDlg, ID_CB1, CB_ADDSTRING, 0
, (
LONG)"
Triangle
"
);
SendDlgItemMessage
(
hDlg, ID_CB1, CB_SETCURSEL, Forme, 0
);
hsb =
GetDlgItem
(
hDlg, ID_SB1);
ZeroMemory
(&
si, sizeof
(
SCROLLINFO));
si.cbSize =
sizeof
(
si);
si.fMask =
SIF_RANGE |
SIF_POS;
si.nMin =
0
;
si.nMax =
10
;
si.nPos =
Trait;
SetScrollInfo
(
hsb, SB_CTL, &
si, FALSE);
SetDlgItemInt
(
hDlg, ID_LT1, Trait, FALSE);
return
TRUE;
}
case
WM_HSCROLL:
GetScrollInfo
((
HWND)lParam, SB_CTL, &
si);
switch
(
LOWORD
(
wParam))
{
case
SB_PAGEUP:
si.nPos -=
2
;
if
(
si.nPos <
si.nMin) si.nPos =
si.nMin ;
break
;
case
SB_PAGEDOWN:
si.nPos +=
2
;
if
(
si.nPos >
si.nMax) si.nPos =
si.nMax ;
break
;
case
SB_LINEUP:
if
(
si.nPos >
si.nMin) si.nPos--
;
break
;
case
SB_LINEDOWN:
if
(
si.nPos <
si.nMax) si.nPos++
;
break
;
case
SB_THUMBPOSITION:
si.nPos =
HIWORD
(
wParam);
break
;
}
si.fMask =
SIF_POS;
SetScrollInfo
((
HWND)lParam, SB_CTL, &
si, TRUE);
SetDlgItemInt
(
hDlg, ID_LT1, si.nPos, FALSE);
return
TRUE;
case
WM_COMMAND:
if
(
LOWORD
(
wParam) ==
IDOK)
{
GetScrollInfo
(
hsb, SB_CTL, &
si);
Trait =
si.nPos;
Forme =
SendDlgItemMessage
(
hDlg, ID_CB1, CB_GETCURSEL, 0
, 0
);
EndDialog
(
hDlg,DB_OK);
return
TRUE;
}
if
(
LOWORD
(
wParam) ==
IDCANCEL)
{
EndDialog
(
hDlg,0
);
return
TRUE;
}
default
:
return
FALSE;
}
}
J'ai testé les compilations avec C++ Builder et DevC++.
À vos PC.