Fixed EditEntryForm Template AdjustSize

ibv · Dec 29, 2017 · ec771ec · ec771ec
1 parent 9629a7e
commit ec771ec
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/ChangeLog.md b/ChangeLog.md
@@ -1,6 +1,7 @@
 * Thu Dec 28 2017 Ivo <ivo.brhel at gmail.com>
 ---------------------
 + Fixed Template AdjustSize
++ Fixed EditEntryForm Template AdjustSize
 
 
 * Mon Dec 4 2017 Ivo <ivo.brhel at gmail.com>

diff --git a/Source/TemplateCtrl.pas b/Source/TemplateCtrl.pas
@@ -593,7 +593,7 @@ procedure THeaderPanel.SetRolled(const Value: Boolean);
 procedure THeaderPanel.SetTemplatePanel(APanel: TTemplatePanel);
 begin
   fTemplatePanel := APanel;
-  fTemplatePanel.Parent := Self;
+  fTemplatePanel.Parent := Self.Parent;
   fTemplatePanel.Width := Width;
   AdjustHeight;
 end;