diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2009-08-27 17:16:23 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2009-08-27 17:18:19 +0200 |
| commit | c217d32c4effb70bf013b16eaf21156ac04686b5 (patch) | |
| tree | f5ae98d29de34eac40bea9b22d05d1c6f9b14408 /extras/tiopf/gui/tiDialogs.pas | |
| parent | c5946c14e6517ed3c08aae4978d083ede6dc9d10 (diff) | |
| download | fpGUI-c217d32c4effb70bf013b16eaf21156ac04686b5.tar.xz | |
Fix default size of tiShowString() form.
Signed-off-by: Graeme Geldenhuys <graeme@mastermaths.co.za>
Diffstat (limited to 'extras/tiopf/gui/tiDialogs.pas')
| -rw-r--r-- | extras/tiopf/gui/tiDialogs.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/extras/tiopf/gui/tiDialogs.pas b/extras/tiopf/gui/tiDialogs.pas index 5a59c088..fe75a749 100644 --- a/extras/tiopf/gui/tiDialogs.pas +++ b/extras/tiopf/gui/tiDialogs.pas @@ -98,6 +98,8 @@ begin lMemo := TfpgMemo.Create(lForm); try lForm.WindowTitle := pHeading; + lForm.Width := 300; + lForm.Height := 300; lForm.WindowPosition := wpScreenCenter; lForm.Name := 'FormShowStrings'; lMemo.Lines.Assign(AStrings); |