diff options
author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-07-18 10:24:55 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-07-18 10:24:55 +0200 |
commit | 8855f319683e6b3f81c485ab02c229e3415de7f0 (patch) | |
tree | e5a3069cab30bf574fc3f9c50879771f14540c8d /examples/apps | |
parent | d8c214a8ac04c7a56902155f2c394e7a3d27942d (diff) | |
download | fpGUI-8855f319683e6b3f81c485ab02c229e3415de7f0.tar.xz |
ide: improved default values for TextEdit component at IDE startup
Diffstat (limited to 'examples/apps')
-rw-r--r-- | examples/apps/ide/src/frm_main.pas | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/examples/apps/ide/src/frm_main.pas b/examples/apps/ide/src/frm_main.pas index 150a6ecc..a106d57a 100644 --- a/examples/apps/ide/src/frm_main.pas +++ b/examples/apps/ide/src/frm_main.pas @@ -756,6 +756,9 @@ begin pcEditor.TabPosition := TfpgTabPosition(gINI.ReadInteger(cEditor, 'TabPosition', 0)); FRegex := TRegExpr.Create; FRegex.Expression := cKeywords; + + TextEditor.Clear; + TextEditor.SetFocus; end; procedure TMainForm.FormClose(Sender: TObject; var CloseAction: TCloseAction); @@ -1120,6 +1123,9 @@ begin Name := 'TextEditor'; SetPosition(0, 0, 130, 200); Align := alClient; + GutterVisible := True; + GutterShowLineNumbers := True; + FontDesc := '#Edit2'; end; mnuFile := TfpgPopupMenu.Create(self); |