Hachurer une case d'un StringGrid

**bandit boy** · 22/01/2007, 15h28

Bonjour, je souhaiterais hachurer les cellules sélectionnées d'un StringGrid le soucis c'est que j'ai esasyé en changeant le style du Brush et j'obtient un fond noir.

Je m'explique: le code suivant hachure les cellules sélectionnées de la colonne 1 mais le trait est blanc est le fond de remplissage est noir.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
  if( ACol == 1 && ARow <= StringGrid->Selection.Bottom && ARow >= StringGrid->Selection.Top)
  { // Concerne la(les) cellule(s) sélectionnée(s).
      StringGrid->Canvas->Brush->Color = clWhite;
      StringGrid->Canvas->Pen->Color   = clWhite;
      StringGrid->Canvas->Pen->Style   = psClear;
      StringGrid->Canvas->Brush->Style = bsFDiagonal;
      StringGrid->Canvas->FillRect(Rect);
      StringGrid->Canvas->Brush->Style = bsSolid;
      StringGrid->Canvas->Pen->Style   = psSolid;
  }

Pour ceux qui me diront d'aller regarder dans la FAQ, j'ai déjà vu ce liens où il est expliqué comment personnaliser une StringGrid dont je me suis très largement inspiré.

mais ce genre de remplissage n'est pas effectué.

Merci pour vos idées, vos pistes ou tout autre indice qui pourrait corriger ce léger bug.

**Masmeta** · 22/01/2007, 17h34

As tu essayé de changer la taille du Pen avec width?

**blondelle** · 22/01/2007, 17h36

Salut bandit boy:
Je pense que tu a le meme probleme que dans le post dont j'ai mis le lien

http://www.developpez.net/forums/sho...ght=stringgrid

et tu fait un dessin de hachures que tu inserre de plus tu peu ecrire dessus.

**Sunchaser** · 22/01/2007, 23h35

Bonsoir,

Un piste peut être :

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
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
void __fastcall TForm2::StringGrid1DrawCell(TObject *Sender, int ACol, int ARow,
	  TRect &Rect, TGridDrawState State)
{
//
TRect nRect;
nRect.Top = Rect.Top;
nRect.Bottom = Rect.Bottom;
nRect.Left = Rect.Left;
//
TRect hRect;
hRect.Left = Rect.Left;
hRect.Right = Rect.Right;
hRect.Top = Rect.Top;
if (ACol == 2 && ARow == 2)
{
//
	int i = 6;
	while (i < (Rect.Right - Rect.Left))
	{
	nRect.Right = Rect.Left + i;
	DrawEdge(StringGrid1->Canvas->Handle, &nRect,EDGE_BUMP , BF_RIGHT );
	i = i + 6;
	}
	//
	i = 6;
	while (i < (Rect.Bottom - Rect.Top))
	{
	hRect.Bottom = Rect.Top + i;
	DrawEdge(StringGrid1->Canvas->Handle, &hRect,EDGE_BUMP , BF_BOTTOM );
	i = i + 6;
	}
 
//
}
}

Bon, c'est pas forcement 'génial' mais bon ...ça doit s'améliorer.

En espérant t'aider,
@ +

**bandit boy** · 23/01/2007, 09h46

Alors, dans l'ordre:
Masmeta, j'ai testé en changeant le Pen->Width mais ca ne change rien.
blondelle, c'est pas tout à fait le truc puisque j'ai déjà des dessins sur le Canvas et donc l'image de fond soit ne se verra pas, soit écrasera la couleur de la cellule.
Sunchaser, c'est ce que je veux faire, mais les hachures ne sont pas sur la case colorié (surement un petit réglage) et reste à les mettres en diagonale pour plus d'esthétique.
J'y travail.

Merci

**bandit boy** · 23/01/2007, 15h22

Merci à tous.
J'ai modifié ton code blondelle pour arriver au suivant:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
      int i = -7;
      while (i < Rect.Right)
      {
           nRect.Left   = nRect.Right;
   	   nRect.Right  = Rect.Left + i;
           nRect.Top    = Rect.Top;
           nRect.Bottom = Rect.Bottom;
	   DrawEdge(StringGrid->Canvas->Handle, &nRect,EDGE_BUMP , BF_DIAGONAL );
	   i += 8;
      }

Avec ca, j'ai des hachures sur les cases sélectionnées, et je supprimes la couleur de fond des cases sélectionnées avant, résultat la sélection est uniquement hachurée, pile poile ce que je voulais.