Bonjour à tous,
vous serez gentil de m'indiquer comment puis-je colorer les lignes d'un dbgrid. (alterner entre deux couleurs les lignes). Merci
Bonjour à tous,
vous serez gentil de m'indiquer comment puis-je colorer les lignes d'un dbgrid. (alterner entre deux couleurs les lignes). Merci
inspire toi de cet exemple de la![]()
Dans l'événement OnDrawColumnCell
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); var Grid: TDBGrid; begin Grid := TDBGrid(Sender); if not (gdSelected in state) then if ((Grid.DataSource.DataSet.RecNo mod 2) = 0) then Grid.Canvas.Brush.Color := cl3DLight; Grid.DefaultDrawColumnCell(rect, Datacol, column, state); end;
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager