alle Eintrage in TListView mit STRG+A makieren

[idontwantaname]

Würde ich auch meinen, da bei mir

Delphi-Quellcode:

procedure TForm1.ListBox1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Shift = [ssCtrl] then
    if Key = Ord('A') then
      ListBox1.SelectAll;
end;

problemlos funktioniert, auch mit Popup-Menü