Discussion :

[alheuredudejeuner]

Bonjour,

par quel méthode accède-t-on au clic ou tap de l'accessoire sur un TlistView ?


ici le ">"

Crldt

[Invité]

Avec le ItemClickEx et ItemObject j'obtient TListItemText sur l'item et TListItemAccessory sur l'accessoire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
procedure TForm2.ListView1ItemClickEx(const Sender: TObject; ItemIndex: Integer;
  const LocalClickPos: TPointF; const ItemObject: TListItemDrawable);
begin
   if ItemObject.ClassName = 'TListItemText' then
      showmessage('Item')
   else
      if ItemObject.ClassName = 'TListItemAccessory' then
         showmessage('Accessory')
      else
         ShowMessage(ItemObject.ClassName);
end;