z
Size: a a a
z
AK
z
AK
AK
z
AK
AK
z
z
AK
z
AK
z
TMyActionListHelper = class helper for TActionList
...
procedure AddMyAction(Action:TZAction);
...
end;
...
procedure TMyActionListHelper.AddMyAction(Action:TZAction);
begin
AddAction(action);
end;
AS
z
AS
z
z
AS