Eviter une erreur des tlistview

Contenu du snippet

Ce code permet d'éviter l'erreur qui se produit lorsque l'utilisateur clique dans un TListView, qu'il n'y a aucun élément et que le code de l'événement OnClick se sert des propriétés de l'élément selectionné.

Il est à placer au debut de la procedure OnClick de la ListView, comme ci-dessous:

Source / Exemple :


procedure TForm1.ListView1Click(Sender: TObject);
begin
  If ListView1.ItemIndex <> -1 then
  begin
    // vos instructions
  end;
end;

Conclusion :


Voila une mise à jour suite au différentes remarques productives qui ont été postées :D

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.