diff --git a/components/ideintf/dbgridcolumnspropeditform.pas b/components/ideintf/dbgridcolumnspropeditform.pas
index caac41507c..5ece698ddd 100644
--- a/components/ideintf/dbgridcolumnspropeditform.pas
+++ b/components/ideintf/dbgridcolumnspropeditform.pas
@@ -51,6 +51,8 @@ type
     FOwnerComponent: TPersistent;
     FOwnerPersistent: TPersistent;
     FPropertyName: String;
+    procedure FillCollectionListBox;
+    procedure SelectInObjectInspector(ForceUpdate, UnselectAll: Boolean);
   protected
     procedure UpdateCaption;
     procedure UpdateButtons;
@@ -59,8 +61,6 @@ type
     procedure PersistentDeleting(APersistent: TPersistent);
     procedure RefreshPropertyValues;
   public
-    procedure FillCollectionListBox;
-    procedure SelectInObjectInspector(ForceUpdate, UnselectAll: Boolean);
     procedure SetCollection(NewCollection: TCollection;
                     NewOwnerPersistent: TPersistent; const NewPropName: String);
     procedure Modified;
diff --git a/components/ideintf/dbpropedits.pas b/components/ideintf/dbpropedits.pas
index 8e4dcfc75a..90b1605e26 100644
--- a/components/ideintf/dbpropedits.pas
+++ b/components/ideintf/dbpropedits.pas
@@ -37,7 +37,7 @@ type
  TDBGridColumnsPropertyEditor = class (TCollectionPropertyEditor)
  public
    class function ShowCollectionEditor(ACollection: TCollection;
-   OwnerPersistent: TPersistent; const PropName: String): TCustomForm; override;
+     OwnerPersistent: TPersistent; const PropName: String): TCustomForm; override;
  end;
 
   { TLookupFieldProperty }