From 68c6914f21c7827fd61030dfe58e7e97faf94a02 Mon Sep 17 00:00:00 2001 From: Graeme Geldenhuys Date: Tue, 5 Oct 2010 12:03:26 +0200 Subject: After the Align algorithm change Splitter Demo needed a minor fixup. --- examples/gui/splitter/splitter_test.lpr | 29 +++++++++++++---------------- 1 file changed, 13 insertions(+), 16 deletions(-) (limited to 'examples') diff --git a/examples/gui/splitter/splitter_test.lpr b/examples/gui/splitter/splitter_test.lpr index 9aff9293..52486204 100644 --- a/examples/gui/splitter/splitter_test.lpr +++ b/examples/gui/splitter/splitter_test.lpr @@ -84,22 +84,10 @@ begin with spl2 do begin Name := 'spl2'; - SetPosition(165, 90, 257, 8); + SetPosition(164, 90, 257, 8); Align := alTop; end; - mmDest := TfpgMemo.Create(self); - with mmDest do - begin - Name := 'mmDest'; - SetPosition(165, 94, 256, 116); - Lines.Add('Memo2 Line #1'); - Lines.Add('Memo2 Line #2'); - FontDesc := '#Edit1'; - TabOrder := 1; - Align := alClient; - end; - pnlName1 := TfpgPanel.Create(self); with pnlName1 do begin @@ -143,9 +131,18 @@ begin SetPosition(0, 211, 554, 8); Align := alBottom; end; - - // vvzh: the form appears unaligned under Linux, so we have to add the following line: - Self.Realign; + + mmDest := TfpgMemo.Create(self); + with mmDest do + begin + Name := 'mmDest'; + SetPosition(165, 94, 100, 100); + Lines.Add('Memo2 Line #1'); + Lines.Add('Memo2 Line #2'); + FontDesc := '#Edit1'; + TabOrder := 1; + Align := alClient; + end; {@VFD_BODY_END: frmSplitterTest} end; -- cgit v1.2.3-70-g09d2