@@ -85,14 +85,6 @@ TActionFactory = class(TNoConstructObject)
8585 @param OnExecHandler [in] Handler for action's OnExecute event.
8686 @return Reference to newly created action.
8787 }
88- class function CreateShowPrefsPageAction (const AOwner: TComponent;
89- const OnExecHandler: TNotifyEvent = nil ): TBasicAction;
90- { Creates a Show Preferences Page action and sets OnExecute handler id
91- provided.
92- @param AOwner [in] Owner of action.
93- @param OnExecHandler [in] Handler for action's OnExecute event.
94- @return Reference to newly created action.
95- }
9688 end ;
9789
9890
@@ -103,8 +95,12 @@ implementation
10395 // Delphi
10496 StdActns,
10597 // Project
106- UCategoryAction, UDetailTabAction, UEditSnippetAction, ULinkAction,
107- UShowPrefsPageAction, USnippetAction, UViewItemAction;
98+ UCategoryAction,
99+ UDetailTabAction,
100+ UEditSnippetAction,
101+ ULinkAction,
102+ USnippetAction,
103+ UViewItemAction;
108104
109105
110106{ TActionFactory }
@@ -168,18 +164,6 @@ class function TActionFactory.CreateLinkAction(const AOwner: TComponent;
168164 Result := CreateAction(TLinkAction, AOwner, OnExecHandler) as TCustomAction;
169165end ;
170166
171- class function TActionFactory.CreateShowPrefsPageAction (
172- const AOwner: TComponent; const OnExecHandler: TNotifyEvent): TBasicAction;
173- { Creates a Show Preferences Page action and sets OnExecute handler id
174- provided.
175- @param AOwner [in] Owner of action.
176- @param OnExecHandler [in] Handler for action's OnExecute event.
177- @return Reference to newly created action.
178- }
179- begin
180- Result := CreateAction(TShowPrefsPageAction, AOwner, OnExecHandler);
181- end ;
182-
183167class function TActionFactory.CreateSnippetAction (const AOwner: TComponent;
184168 const OnExecHandler: TNotifyEvent): TBasicAction;
185169 { Creates a Snippet action and sets OnExecute handler if provided.
0 commit comments