Comment savoir si dans Listview Checkbox est coché

Version imprimable

Bonsoir,
Y'a t-il une possibilité de savoir si la checkbox d'un Listview est coché ou pas
au momant du clique.
Mon probleme est que si je fait ceci sa fonctionne
Code:

1 2 3 4 5 6 7 8 VL_ItemIndex := ToFrame1.ListViewJob1.ItemIndex; // ou // VL_ItemIndex := ToFrame1.ListViewJob1.Selected.Index; if (ToFrame1.ListViewJob1.items[VL_ItemIndex].Checked) then begin showmessage('Hallo checkbox') end;
mais ceci fonctionne seulement si la ligne est selectionné c'est à dire si il y a un Focused sur la ligne.
Y'a t-il une possibilité de savoir si la box est checked sans selectionné toute la ligne.

Merci pour l'aide.
Salutations
Ardely

15/01/2007, 18h42
Cl@udius

Ben et la fonction Rechercher ! Un, un !!!

http://www.developpez.net/forums/sho...d.php?t=260594

@+ Claudius
15/01/2007, 18h51
Ardely

Oui c'est juste, mais dans cette example il faut faire une boucle sur tout la
Listview à chaque fois si on clique sur la case...
Est-ce le bon raisonement de la faire! Car si j'ai un grand nombre de ligne sa peut duré un certain temps...

Re,

Comme ceci alors:

Code:

1
2
3
4
5
6
 
procedure TForm1.ListView1Change(Sender: TObject; Item: TListItem;
  Change: TItemChange);
begin
  ShowMessage(BoolToStr(Item.Checked, True));
end;

@+ Claudius

15/01/2007, 22h35
Ardely
Selon ton code j'ai fait ceci
Code:

1 2 if Item.Checked = true then
qui fonctionne dans la direction que je cherche.
Mais j'ai encore un petit probleme comme savoir quelle no ligne que j'ai coché?

Pour que cette comande fonctionne
Code:

1 2 .ListView1.ItemIndex
il faut cliquer toute la ligne.
Dans mon cas je ne clique pas la ligne, c'est seulement la case qui est coché...
Merci

Re,

Essaye ceci:

Code:

1
2
3
4
5
6
procedure TForm1.ListView1Change(Sender: TObject; Item: TListItem;
  Change: TItemChange);
begin
  ShowMessage('Item n°:' + IntToStr(Item.Index) +  '; Checked = ' +
                      BoolToStr(Item.Checked, True));
end;

15/01/2007, 23h28
Ardely

(Il est tard je fait le test demain.. Merci beaucoup et bonne nuit!)
15/01/2007, 23h29
Cl@udius

@+ sur les ondes...
16/01/2007, 10h51
Ardely
Bonjours,
Je vient de finir mes tests et il semble que tout fonctionne correctement avec
la commande supplementaire
Code:

1 2 Item.Index // no de ligne coché
Merci pour pour me mettre sur la voie et bonne journée à toi.