Wieso wird ListView1SelectItem zwei mal ausgeführt? Ein Bug?

[Lemmy]

du meinst so was:

Delphi-Quellcode:

procedure TForm1.ListView1SelectItem(Sender: TObject; Item: TListItem;
  Selected: Boolean);
begin
  if Selected then
    showmessage('test');
end;