Supprimer le focus d'un TCheckListBox

Bonjour,

j'ai un TCheckListBox, et à un moment donné je veux tout décocher, j'utilise donc :

Code:

---

1 2	CheckListBox->CheckAll(cbUnchecked, true, false);

---

mais le dernier rectangle du focus reste sur le dernier item qui a été coché.
Je voudrai l'enlever, voir même ne jamais le voir.

J'ai essayé ça pour le supprimer (dans le onDrawItem):

Code:

---

1 2	State = State << odNoFocusRect;

---

mais sans résultat.

Quelqu'un a t'il une idée ou me dire où je fais une erreur ?

merci,
Pascale38

En fait le odNoFocusRect n'a pas l'air de fonctionner comme ça, en tout cas n'a pas d'effet tel que je l'utilise.
Voilà ce que j'ai trouvé qui fonctionne (à mettre dans la fonction onDrawItem, en ayant bien sélectionné l'option Style = lbOwnerDrawFixed)

Code:

---

1 2 3

CheckListBoxUInp->Canvas->Font->Color = clBlack; CheckListBoxUInp->Canvas->Brush->Color = clWhite;

---

et là plus de carré bleu de focus quand on est sur une check box !!

Par contre si quelqu'un peut m'expliquer pourquoi ma façon d'utiliser le odNoFocusRect ne fonctionne pas, ça m'intéresse !!!

merci
Pascale38