From 54ecf26800ee3a818d77dc1bb4173b771ae83c2b Mon Sep 17 00:00:00 2001
From: "Jean-Marc.Levecque" <jmarc.levecque@bbox.fr>
Date: Mon, 6 Jul 2015 22:54:13 +0200
Subject: Anchors edtHeight in case of resizing

Signed-off-by: Jean-Marc.Levecque <jmarc.levecque@bbox.fr>
---
 examples/gui/tabtest/tabtest.lpr | 1 +
 1 file changed, 1 insertion(+)

diff --git a/examples/gui/tabtest/tabtest.lpr b/examples/gui/tabtest/tabtest.lpr
index 75d23dfe..52f7ec17 100644
--- a/examples/gui/tabtest/tabtest.lpr
+++ b/examples/gui/tabtest/tabtest.lpr
@@ -162,6 +162,7 @@ begin
   CreateLabel(self, 390, 325, 'Height:');
   edtHeight := CreateEditInteger(self, 435, 320, 30, 24, False);
   edtHeight.Value := 0;
+  edtHeight.Anchors := [anBottom, anLeft];
   edtHeight.Hint := 'Tab height';
   edtHeight.OnChange := @edtHeightChanged;
 end;
-- 
cgit v1.2.3-70-g09d2