Discussion :

[taleb]

bonjour
svp je voudrai savoir comment changer le disign d'un Dbgrid..
je sais que je dois utiliser l'evenement OnDrawColumnCell
par exemple quand je trie suivant une colonne je veux qu'en haut de la colonne une fleche s'affiche et change de direction suivant l'ordre de trie
"comme pour windowsXP" quand on choisit l'option d'affichage des fichiers "avec detail"
pour votre information j'utilise DELPHI7 avec mysql

[Lung]

Un truc de ce genre ?

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
 
procedure TMainForm.DBGridDrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
   procedure FlecheTri;
   var
      i: Integer;
   begin
      DBGridDevis.Canvas.Pen.Color := clNavy;
      for i:=13 downto 5 do
      begin
         DBGridDevis.Canvas.MoveTo(Rect.Right - 9, 12);
         DBGridDevis.Canvas.LineTo(Rect.Right - i, 4);
      end;
   end;
begin
...
 
   Column.Grid.DefaultDrawColumnCell(Rect, DataCol, Column, State);
 
...
 
   //.Si tri
   if TriSurUneColonne then
   begin
      //.Si première colonne.
      if DataCol = 0 then
         FlecheTri;
   end;
end;

C'est pas génial, mais ça peut de donner des idées ...