Discussion :

[Zazeglu]

Bonjour,

Qqun sait il comment faire pour personaliser le rectangle créer avec Retcangle ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
hdc = GetDC(hwnd);
Rectangle(hdc,10,10,100,100)

Je voudrait : 1) Pouvoir choisir la couleur du font
2) Choisir la largeur du bord du rectangle

J'ai trouvé ça dans MSDN :

The rectangle is outlined by using the current pen and filled by using the current brush.

Mais je ne sais pas trop ce que ça veut dire

Merci

Zazeglu

[Alcatîz]

Bonjour !

La couleur de fond de ton rectangle est celle du pinceau (Brush) courant défini dans le contexte d'affichage; la couleur et l'épaisseur du bord sont celles du crayon (Pen) courant.

- Pour définir un pinceau personnalisé : CreateSolidBrush;
- Pour définir un crayon personnalisé : CreatePen.
- Pour utiliser ces objets dans le contexte d'affichage : SelectObject.

Attention de bien restaurer les pinceau et crayon d'origine dans le contexte d'affichage avant de libérer ce dernier !

[Zazeglu]

Ok je vais recherche de ce coté ,mais que veux tu dire par :

Attention de bien restaurer les pinceau et crayon d'origine dans le contexte d'affichage avant de libérer ce dernier !

Merci

Zazeglu

[Alcatîz]

La fonction SelectObject renvoie toujours le handle de l'objet précédemment actif dans le contexte d'affichage; il faut sauvegarder ce handle.

Avant de libérer le contexte d'affichage, il faut le restaurer dans son état d'origine. Donc, il faut exécuter à nouveau SelectObject en lui passant le handle sauvegardé.

Voici un petit exemple (en Pascal, mais assez compréhensible je pense) qui dessine un rectangle bleu à fond rouge :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Procedure tFenetre.DESSIN;
Var DC : hDC;
    AncienPinceau, Pinceau : hBrush;
    AncienCrayon, Crayon : hPen;
Begin
  DC:=GetDC(hWindow);
  Pinceau:=CreateSolidBrush(RGB(255,0,0));
  Crayon:=CreatePen(ps_Solid,4,RGB(0,0,128));
  AncienPinceau:=SelectObject(DC,Pinceau);
  AncienCrayon:=SelectObject(DC,Crayon);
  Rectangle(DC,10,10,100,50);
  SelectObject(DC,AncienPinceau);
  DeleteObject(Pinceau);
  SelectObject(DC,AncienCrayon);
  DeleteObject(Crayon);
  ReleaseDC(hWindow,DC);
End;

[Zazeglu]

ouioui ça ira ,le code pascal j'ai déja eu ma dose ...

Je vais m'en sortire avec ça ,l'exemple va bcp m'aider ;

Merci beaucoup !

Zazeglu