Treeview avec case à cocher

**valoji** · 26/01/2006, 17h15

Bonjour,

Je cherche un composant ou une solution pour mettre des case à cocher dans un treeview.

Je m'explique : dans mon treeview j'ai mon arborescense de l'explorateur window, et j'aimerais Cocher certain éléments pour pouvoir faire un traitement derrière.

J'aimerais éviter le multiselect.

Merçi à tous pour vos réponse !!!
VALOJI. 8)

**petitcoucou31** · 26/01/2006, 18h31

salut ,
une solution que j'ai deja utilisé , consiste a gerer les bitmaps du treeview , quand tu cliques sur un element tu changes l'etat du bitmap ( pseudo case a cocher ), et ensuite tu parcours la treeview pour savoir sur quel element agir en fonction de son bitmap.

bye .

**valoji** · 27/01/2006, 08h38

Merçi à petitcoucou31,

Je vais essayer cette solution.

Mais si quelqu'un d'autres à une solution, je suis preneur.

Valoji

**petitcoucou31** · 27/01/2006, 13h45

re salut ..

voila un petit exemple , tu dois ajouter a ta fiche un Imagelist avec 3 images qui represente une case non coché ( image1) et une case coché (image2) , l'image0 n'est pas utilisé.

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
 //procedure permettant de lire l'etat de ton element
procedure TForm1.LectureEtat(Sender: TObject);
var i:integer;
begin
    for i:=0 to TreeView1.Items.Count-1 do
    begin
        if TreeView1.Items[i].StateIndex=2 then
        begin
//           le traitement a faire
        end;
    end;
end;
//-----------------------------------------------------------------------
// commutation de l'etat de l'element
procedure TForm1.TreeView1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
    if htOnStateIcon in TreeView1.GetHitTestInfoAt(X, Y) then
    begin
         if TreeView1.GetNodeAt(X, Y).stateIndex=2 then
               TreeView1.GetNodeAt(X, Y).stateIndex:=1
         else
               TreeView1.GetNodeAt(X, Y).stateIndex:=2;
     end;
end;