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 à certain contrôle 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.
Mise en oeuvre :
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 :
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;
}
A 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 champs 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 transfère 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 éffectue 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é un message WM_HSCROLL est envoyé
à sa fenêtre parent. C'est donc sur ce message que l'on va gérer l'ascenseur.
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é sur l'ascenseur.
SB_PAGEUP : Click sur la zone entre la flèche de gauche ou du haut et le curseur.
SB_PAGEDOWN : Click sur la zone entre le curseur et la flèche de droite ou du bas.
SB_LINEUP : Click sur la flèche de gauche ou du haut s'il est vertical.
SB_LINEDOWN : Click 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.
A la fermeture de la boîte de dialogue par Ok :
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.
Code complet :
resource.h :
#define IDM_QUIT 1
#define IDM_PROP 2
#define ID_SB1 101
#define ID_CB1 102
#define ID_LT1 103
resource.rc :
#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
winmain.c :
#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++.
A vos PC.
CGi
|
