Listview mit on Click und LongTap

[fisipjm]

Test es gerade mit Delphi 11.3 alle anderen Events sind von der Listview entfernt.
Folgender Code liegt auf MousUp

Delphi-Quellcode:

procedure TForm1.ListViewOverviewMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single);
begin
  if Button = TMouseButton.mbRight then
    showmessage('Long')
    // LongPress
  else
    showmessage('Click');
end;

Ich bekomme ausschließlich das "Click" nie "Long".