From 3da74a341ce3684bc85a902020dfbccd762b8aa8 Mon Sep 17 00:00:00 2001 From: juha Date: Sun, 18 Sep 2011 21:54:48 +0000 Subject: [PATCH] =?UTF-8?q?IDE:=20Version=20of=20RegisterComponentEditor?= =?UTF-8?q?=20to=20register=20many=20components.=20Issue=20#20281,=20patch?= =?UTF-8?q?=20from=20Silvio=20Cl=C3=A9cio?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: trunk@32413 - --- ideintf/componenteditors.pas | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/ideintf/componenteditors.pas b/ideintf/componenteditors.pas index 14027df061..cbdfd1a46b 100644 --- a/ideintf/componenteditors.pas +++ b/ideintf/componenteditors.pas @@ -400,6 +400,8 @@ var procedure RegisterComponentEditor(ComponentClass: TComponentClass; ComponentEditor: TComponentEditorClass); +procedure RegisterComponentEditor(ComponentClasses: array of TComponentClass; + ComponentEditor: TComponentEditorClass); function GetComponentEditor(Component: TComponent; const Designer: TComponentEditorDesigner): TBaseComponentEditor; @@ -486,6 +488,15 @@ begin RegisterComponentEditorProc(ComponentClass, ComponentEditor); end; +procedure RegisterComponentEditor(ComponentClasses: array of TComponentClass; + ComponentEditor: TComponentEditorClass); +var + I: Integer; +begin + for I := 0 to High(ComponentClasses) do + RegisterComponentEditor(ComponentClasses[I], ComponentEditor); +end; + function GetComponentEditor(Component: TComponent; const Designer: TComponentEditorDesigner): TBaseComponentEditor; var