Design-Problem bei mehreren Forms + Actions

[Volker Z.]

Hallo,

Du könntest Deine Paste-Action Execute / Update ergänzen:

Delphi-Quellcode:

procedure TMDIForm.PasteExecute (Sender : TObject);
begin
  FActiveEdit.PasteFromClipboard
end;

procedure TMDIForm.PasteUpdate (Sender : TObject);
begin
  FActiveEdit := nil oder ActiveMDICild.ActiveControl wenn TCustomEdit
  // Action Paste disabled wenn FActiveEdit nil
end;

Gruß

[generic]

Hast du die Default/Mitgelieferten-Actions für Copy/Paste etc. verwendet oder das selbst implementiert?

[Codewalker]

Die sind selbst implementiert, wobei ich nur Editor.CutToClipboard etc. aufrufe