Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sieppl,
13. Okt 2004
Ihr habt Recht. Gibt es denn irgendeine Möglichkeit bei OnUpdate an die Komponente zu kommen?
Ich möchte keine 2 Actions anlegen, dass wäre unelegant..
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sieppl,
13. Okt 2004
Das hier funktioniert zum Beispiel definitiv:
procedure TMainForm.AddPicturesActionUpdate(Sender: TObject);
begin
(Sender as TAction).Enabled := ThumbListView.SelCount > 0;
end;
Dadurch werden entweder das TMenuItem oder der Button enabled oder auch nicht.
In meinem 1. Post muss ich halt die Überprüfung je nach Auslöser unterschiedlich
gestalten..
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by sieppl,
13. Okt 2004
Hi!
Guckt euch mal bitte diesen Code an:
procedure TMainForm.AddFolderActionUpdate(Sender: TObject);
begin
if (Sender as TAction).ActionComponent is TMenuItem then //das hier klappt nicht
(Sender as TAction).Enabled := TreeView.PopUpNode <> nil
else
(Sender as TAction).Enabled := TreeView.Selected <> nil;
end;