Eigene Standard Action Class (TActionList)

[trashcandesign]

Moin,

ich habe eine TActionList, der ich eine eigene StandardAction hinzufügen möchte.
Also sowas wie TEditCut, TEditCopy usw.

Wenn ich mir jetzt ne eigene Klasse bastel

Delphi-Quellcode:

TMyClass = class(TAction)
public
function Execute: Boolean; override;
end

wie kann ich die als Standard Action Class registrieren?

[dataspider]

Hi,

mit RegisterActions...
Auszug aus meinem Code:

Delphi-Quellcode:

procedure Register;
begin
  // RichEdit
  RegisterActions( 'RW RichEdit',
                 [ TrwRTFIndent,
                   TrwRTFUnIndent,
                   TrwRTFBullets,
                   TrwRTFBold,
                   TrwRTFItalic,
                   TrwRTFUnderLine,
                   TrwRTFStrikeOut,
                   TrwRTFFontName,
                   TrwRTFFontSize,
                   TrwRTFFontColor,
                   TrwRTFAlignBlock,
                   TrwRTFAlignCenter,
                   TrwRTFAlignLeft,
                   TrwRTFAlignRight
                   ], nil);
end;

[EDIT]Man muss natürlich ein Package dafür machen...[/EDIT]
Frank

[trashcandesign]

Kewl,

danke dir, hat funktioniert ;)