DBGRID - alterner les couleurs une ligne / 2

Version imprimable

bonjour,

J'ai un DBGRid avec des données provenant d'une DB, j'aimerai pour améliorer l'aspect visuel, changer la couleur de mes lignes de mon DBGrid.

Avoir une ligne en blanc et l'autre en vert pale par exemple.

Alors en cherchant sur le forum j'ai trouvé ce code:
Code:

1 2 3 4 5 6 7 8 9 10 11 if (!DBGrid->SelectedRows->CurrentRowSelected) { if ((DBGrid->DataSource->DataSet->RecNo % 2) == 0) { DBGrid->Canvas->Brush->Color = clCream; DBGrid->Canvas->Font->Color = clBlack; } } DBGrid->DefaultDrawColumnCell(Rect, DataCol, Column, State);
Le problème est que chez moi il ne fonctionne visiblement pas, ou tout du moins, je ne sais peut être pas l'utiliser ou il faut.
A savoir pour info que je code sur c++ builder 5 et que j'ai mis ce code dans un "DrawColumnCell" de mon DBGrid.

Si je change la valeur dans le if suivant:
Code:

1 2 if ((DBGrid->DataSource->DataSet->RecNo % 2) == 0)
par celle ci :

Code:

if ((DBGrid->DataSource->DataSet->RecNo % 2) == -1)

cela ma modifié toutes les lignes de mon dbgrid...

merci d'avance !

25/02/2009, 14h19
totoche76

Hello,

Il semblerait que tu te retrouves systématiquement avec DBGrid->DataSource->DataSet->RecNo = -1 ?
Il semble que RecNo n'est supporté que pour Paradox et DBase dans le BDE.

A moins d'utiliser une couche de base de données qui gère RecNo, tu peux toujours essayer de rajouter dans ta requête un colonne du genre RowNum (par ex avec Oracle), dont tu pourras ensuite relire la valeur au moment du dessin:

Code:

if ((DBGrid->DataSource->DataSet->FieldByName("ROWNUM")->AsInteger % 2) == 0)

Mais là ça dépend de ta base de données.
25/02/2009, 14h22
Freud44

Je suis sur MySQL.

Le truc qui est possible serait de compter le nbre de lignes devant s'afficher et ensuite de modifier mes couleurs en fonction?
25/02/2009, 14h35
totoche76
Pour chaque ligne tu veux calculer le nombre de lignes déjà affichées ?? ouch

Avec MySQL, ceci devrait marcher:
Code:

1 2 select @rownum:=@rownum+1 rownum, mytable.* from (select @rownum:=0) r, mytable;
25/02/2009, 14h42
Freud44

Si tu veux, mon DBGrid me sert à faire une recherche multi-critère sur ma base.

Donc dans mon code, je récupère à un endroit le nombre d'enregistrement/lignes que mon dbgrid possèdera.

Par conséquent, c'est pas compliqué pour moi de retrouver ce nbre de lignes .

Donc si 'jai ce nombre de lignes, je dois pouvoir dire "par rapport à NbreTotalLigne, changer la couleur des lignes, 1 sur 2" ...non?

Le hic c'est que je ne sais pas trop comment faire..
25/02/2009, 15h35
totoche76

Citation:

Donc si 'jai ce nombre de lignes, je dois pouvoir dire "par rapport à NbreTotalLigne, changer la couleur des lignes, 1 sur 2" ...non?

Ouaip, mais on en revient au problème de départ: savoir sur quel enregistrement (ou quelle ligne de la grille) on se trouve lors du DrawColumnCell...

Une solution pas terrible qui ne se base que sur la position dans la grille:

Code:

if ((Rect.Top / (Rect.Height()+1) % 2))

Bof bof quand tu scrolle verticalement dans ta grille
25/02/2009, 16h41
Freud44

peut être que l'on peut se placer sur la première ligne par défaut ?

Sachant qu'a chaque modification de mes critères de recherches, le DrawColumnCell sera ré appelé...
25/02/2009, 17h17
totoche76
Pour le scroll dans la grille ?

Evénement OnDataChange de l'objet TDataSource:
Code:

1 2 3 4 void __fastcall TForm1::ds1DataChange(TObject *Sender, TField *Field) { dbgrd1->Invalidate(); }

Code:

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
void __fastcall MyGraphics::DBG_BiColor(TObject *Sender,
      const TRect &Rect, TField *Field, TGridDrawState State)
{
    try
    {
        if(State.Contains(gdSelected))  //Enregistrement sélectionné
        {
                dynamic_cast<TDBGrid *>(Sender)->Canvas->Brush->Color = clHighlight;
                dynamic_cast<TDBGrid *>(Sender)->Canvas->Font->Color = clHighlightText;
                dynamic_cast<TDBGrid *>(Sender)->Canvas->FillRect(Rect);
 
        }
        else
        {
        if (dynamic_cast<TDBGrid *>(Sender)->DataSource->DataSet->RecNo % 2 == 0) //Un enregistrement sur 2 est coloré
            {
               dynamic_cast<TDBGrid *>(Sender)->Canvas->Brush->Color = (TColor)0x00f8ffff;
               dynamic_cast<TDBGrid *>(Sender)->Canvas->Font->Color = clBlack;
               dynamic_cast<TDBGrid *>(Sender)->Canvas->FillRect(Rect);
            }
        else
            {
               dynamic_cast<TDBGrid *>(Sender)->Canvas->Brush->Color = (TColor)0x00fbf0e9;
               dynamic_cast<TDBGrid *>(Sender)->Canvas->Font->Color = clBlack;
               dynamic_cast<TDBGrid *>(Sender)->Canvas->FillRect(Rect);
            }
        }
        dynamic_cast<TDBGrid *>(Sender)->DefaultDrawDataCell(Rect, Field, State);
 
 
    }
    catch(Exception &E)
    { //Do Nothing
    }
}

et tu l'appelles MyGraphics::DBG_BiColor(Sender, Rect, Field, State); dans le OnDrawDataCell de ton DBGrid

Citation:

Il semble que RecNo n'est supporté que pour Paradox et DBase dans le BDE.

pas que je sache...et en l'occurrence, je bosse avec PostgresSQL