diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-04-15 17:14:30 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-04-15 17:14:30 +0200 |
| commit | 9d205e780dca2c96b5197178003160589361afd2 (patch) | |
| tree | 996f6f7adefdafb666c1f54ad0631bd5f027906f /src/gui | |
| parent | 3bf2023bbc715575512faf590fe416d48467c7ff (diff) | |
| download | fpGUI-9d205e780dca2c96b5197178003160589361afd2.tar.xz | |
FilenameEdit: Improved initial size.
Diffstat (limited to 'src/gui')
| -rw-r--r-- | src/gui/fpg_editbtn.pas | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/src/gui/fpg_editbtn.pas b/src/gui/fpg_editbtn.pas index 12c5a8ef..70926c67 100644 --- a/src/gui/fpg_editbtn.pas +++ b/src/gui/fpg_editbtn.pas @@ -73,9 +73,12 @@ uses constructor TfpgFileNameEdit.Create(AOwner: TComponent); begin inherited Create(AOwner); - FIsContainer := True; - FFocusable := False; - FFilter := ''; + FWidth := 140; + FHeight := 24; + FIsContainer := True; + FFocusable := False; + FFilter := ''; + FEdit := TfpgEdit.Create(self); with FEdit do begin @@ -84,6 +87,7 @@ begin FontDesc := '#Edit1'; TabOrder := 0; end; + FButton := TfpgButton.Create(self); with FButton do begin |