Bonjour à tous,
Savez-vous comment on peut modifier par programme la couleur du texte d'un TTreeNode sélectionné dans un TTreeview ?
Merci
Bonjour à tous,
Savez-vous comment on peut modifier par programme la couleur du texte d'un TTreeNode sélectionné dans un TTreeview ?
Merci
Il faut utiliser onCustomDrawItem ou onAdvancedCustomDrawItem
Il faut utiliser l'evenement OnCustomDrawItem, voila un bout de code que j'ai trouvé sur Internet, j'ai pas le temps de le tester ni de le traduire.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 ... Savecolor := Sender.canvas.font.color; if node.tag = 1 then begin Sender.canvas.font.color := clRed; end else begin Sender.canvas.font.color := clBlack; end; Sender.canvas.font.color := Savecolor;
Salut,
Réponse un peu tardive :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 procedure TfratmetAc.TVAcAdvancedCustomDrawItem(Sender: TCustomTreeView; Node: TTreeNode; State: TCustomDrawState; Stage: TCustomDrawStage; var PaintImages, DefaultDraw: Boolean); var ... begin // Coloration des noeuds if <Condition> then TVAc.Canvas.Font.Color := clRed else TVAc.Canvas.Font.Color := clBlack; end; 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