diff --git a/tools/lazdatadesktop/dicteditor.pp b/tools/lazdatadesktop/dicteditor.pp
index 614758f96f..87cf43dce0 100644
--- a/tools/lazdatadesktop/dicteditor.pp
+++ b/tools/lazdatadesktop/dicteditor.pp
@@ -108,6 +108,8 @@ Type
     procedure ShowSubLists(TV: TTreeView; ParentNode: TTreeNode; AObject: TObject);
     procedure ShowTableObjectList(TV: TTreeView; ParentNode: TTreeNode; ATableDef: TDDTableDef; AObjectType: TEditObjectType);
     procedure ShowGlobalObjectList(TV: TTreeView; ParentNode: TTreeNode; AObjectType: TEditObjectType; AShowSubLists : Boolean = False);
+  Protected
+    procedure CreateHandle; override;
   Public
     Constructor Create(AOwner : TComponent); override;
     Destructor Destroy; override;
@@ -351,7 +353,7 @@ constructor TDataDictEditor.Create(AOwner: TComponent);
 begin
   inherited Create(AOwner);
   FDD:=TFPDataDictionary.Create;
-  //CreateGUI;
+  CreateGUI;
 end;
 
 Procedure TDataDictEditor.CreateGUI;
@@ -412,6 +414,11 @@ begin
     end;
   FTV.Images:=FImgList;
   FMenu.Images:=FImgList;
+end;
+
+procedure TDataDictEditor.CreateHandle;
+begin
+  inherited;
   ShowDictionary;
 end;
 
diff --git a/tools/lazdatadesktop/lazdatadesktop.lpi b/tools/lazdatadesktop/lazdatadesktop.lpi
index e2b336ba49..8ebaae124f 100644
--- a/tools/lazdatadesktop/lazdatadesktop.lpi
+++ b/tools/lazdatadesktop/lazdatadesktop.lpi
@@ -22,8 +22,6 @@
     </BuildModes>
     <PublishOptions>
       <Version Value="2"/>
-      <IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/>
-      <ExcludeFileFilter Value="*.(bak|ppu|ppw|o|so);*~;backup"/>
     </PublishOptions>
     <RunParams>
       <local>