diff options
Diffstat (limited to 'examples/gui/wulinetest')
-rw-r--r-- | examples/gui/wulinetest/wuline_test.lpr | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/examples/gui/wulinetest/wuline_test.lpr b/examples/gui/wulinetest/wuline_test.lpr index 56241b93..c3db8886 100644 --- a/examples/gui/wulinetest/wuline_test.lpr +++ b/examples/gui/wulinetest/wuline_test.lpr @@ -120,7 +120,7 @@ procedure TMainForm.AfterCreate; begin {@VFD_BODY_BEGIN: MainForm} Name := 'MainForm'; - SetPosition(278, 186, 600, 400); + SetPosition(278, 186, 600, 312); WindowTitle := 'fpGUI Wu Anti-Aliased Line test'; WindowPosition := wpScreenCenter; Sizeable := False; @@ -129,7 +129,7 @@ begin with btnQuit do begin Name := 'btnQuit'; - SetPosition(500, 368, 90, 24); + SetPosition(500, 280, 90, 24); Anchors := [anRight,anBottom]; Text := 'Quit'; FontDesc := '#Label1'; @@ -148,11 +148,10 @@ begin with rbSpokes do begin Name := 'rbSpokes'; - SetPosition(12, 8, 120, 19); + SetPosition(12, 28, 120, 19); Text := 'Spokes'; FontDesc := '#Label1'; GroupIndex := 1; - Checked := True; OnChange := @RadioButtonChanged; end; @@ -160,10 +159,11 @@ begin with rbLines do begin Name := 'rbLines'; - SetPosition(12, 28, 120, 19); + SetPosition(12, 8, 120, 19); Text := 'Lines'; FontDesc := '#Label1'; GroupIndex := 1; + Checked := True; OnChange := @RadioButtonChanged; end; |