Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#3

Re: TListView - auf Doppelklick und Enter reagieren

  Alt 13. Okt 2005, 13:19
Hallo Dominik,

füge deiner Form eine ActionList zu, wenn du das noch nicht gemacht hast. Im ActionListEditor definierst du dann eine ListOpenAction mit dem ShortCut "Enter" und der Caption "Open", der du deinen Code zum Öffnen des Berabeitungsdialogs zuweist. Jetzt musst du noch deiner ListView ein PopupMenu zuordnen und darin einem neuen Item die ListOpenAction. Im Event-Handler für ListView.OnDoubleClick rufst du dann ListOpenAction.Execute auf und damit du nicht erst im Action-Code überprüfst, ob überhaupt ein Item selektiert ist, machst du diese Überprüfung in der OnIdle-Routine deiner Application, die du im FormCreate initialisierst:

Delphi-Quellcode:
procedure TDemoForm.AppIdle(Sender: TObject; var done: boolean);
begin
  ListOpenAction.Enabled := Assigned(ListView.Selected);
end;
Grüße vom marabu
  Mit Zitat antworten Zitat