Discussion :

[ammapro]

bonsoir la communauté
je voudrais colorier une case d'un stringgrid composé de trois cases
J 'ai le code suivant qui me colorie toute la ligne

Code :

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

1
2
stringgrid.canvas.brush.color:=clred;
stringgrid.canvas.fillrect(rect);

quelqu'un maîtrise le sujet merci d'avance

[SergioMaster]

Bonjour,

l'astuce est de connaitre la position de la cellule (CellRect) et de passer par un Rectangle (TRect)
voici un bout de code qui colorie en rouge la cellule colonne 1, ligne 1

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
var ARect : TRect;
...
begin
        ARect.Left:=AStringGrid.CellRect(1,1).Left;
        ARect.Top:=AStringGrid.CellRect(1,1).Top;
        ARect.Right:=AStringGrid.CellRect(1,1).Right;
        ARect.bottom:=AStringGrid.CellRect(1,1).Bottom;
        Astringgrid.canvas.brush.color:=clred;
        AStringGrid.Canvas.FillRect(ARect);
....

notes :
ce code ne vérifie pas l'état de la cellule (gdselected,gdFocused), ce qu'il serait bon de traiter
si quelque chose était écrit dans la cellule , c'est effacé
le "coloriage" dépend également de l'évènement utilisé , par exemple si ce code est exécuté par l'intermédiaire d'un bouton , il disparaitra dés modification, scroll ou autre opération sur le stringgrid

[ammapro]

bonne et heureuse année à tous ceux qui participent au site
un immense merci à SergioMaster qui m'a permis de progresser et de résoudre le problème énoncé

[ammapro]

bonjour à tous
Je n'arrive pas à colorier une case d'un stringgriden passant par l'événement onclic d'un bouton
Je m'explique, j'ai un stringgrid et 3 tedit . Le stringgrid est composé de 9 chiffres et chaque tedit composé d'un chiffres et d'une couleur
Le 1er chiffre du tedit est colorié en rouge, je compare le contenu du 1e tedit avec le contenu de la 1ère case du stringgrid et si les valeurs sont
égales alors je voudrais donner la même couleur à la case du stringgrid. Problème le code d'erreur me marque
aucune version surchargée de 'rect' ne peut être appelé avec ses arguments voici mon code

Code :

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

1
2
3
4
5
6
7
 
procedure Tmonformulaire button1onclic(sender:Tobject);
begin
if MaGrille.cells[1,1]:=edit1.text then begin
MaGrille.canvas.brush.color:=clred;
MaGrille.canvas.fillrect(rect);
MaGrille.canvas.TextRect(Rect,Rect.left,Rect.Top,edit1.text);

si quelqu'un peut m'expliquer le problème je lui serais extrêmement reconnaissant
merci d'avance

[tourlourou]

Il ne faut pas appeler rect un TRect : rect() est une fonction.

[SergioMaster]

Bonjour,

Les fêtes de fin d'année ont du être éprouvantes ?
J'avais déjà répondu à ta question similaire http://www.developpez.net/forums/d14...d/#post8081014 dans ce post