forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

improve default settings on first run

This commit is contained in:
Basile Burg 2017-07-11 21:13:06 +02:00
parent 2308cf04a4
commit bf964804cc
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
3 changed files with 5 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/ce_editoroptions.pas
View File

@ -242,7 +242,7 @@ begin
fAutoCloseCurlyBrace:= autoCloseOnNewLineLexically; fAutoCloseCurlyBrace:= autoCloseOnNewLineLexically;
fAutoClosedPairs:= [autoCloseSquareBracket]; fAutoClosedPairs:= [autoCloseSquareBracket];
// //
fCompletionMenuWidth:= 250; fCompletionMenuWidth:= 320;
fCompletionMenuLines:= 15; fCompletionMenuLines:= 15;
// //
fLineNumEvery := 5; fLineNumEvery := 5;
@ -251,6 +251,8 @@ begin
blockIndentation := 4; blockIndentation := 4;
fBackground := clWhite; fBackground := clWhite;
fRightEdgeColor := clSilver; fRightEdgeColor := clSilver;
fSmartDdocNewline:=true;
fScrollPreview:=true;
// //
fDscannerEnabled:=true; fDscannerEnabled:=true;
fDscannerDelay:= 2200; fDscannerDelay:= 2200;

7
src/ce_main.pas
View File

@ -1454,14 +1454,9 @@ begin
DockMaster.ManualDock(DockMaster.GetAnchorSite(fFindWidg), DockMaster.GetAnchorSite(fSymlWidg), alBottom, fSymlWidg); DockMaster.ManualDock(DockMaster.GetAnchorSite(fFindWidg), DockMaster.GetAnchorSite(fSymlWidg), alBottom, fSymlWidg);
DockMaster.ManualDock(DockMaster.GetAnchorSite(fPrInpWidg), DockMaster.GetAnchorSite(fFindWidg), alTop, fFindWidg); DockMaster.ManualDock(DockMaster.GetAnchorSite(fPrInpWidg), DockMaster.GetAnchorSite(fFindWidg), alTop, fFindWidg);
DockMaster.ManualDock(DockMaster.GetAnchorSite(fExplWidg), DockMaster.GetSite(fSymlWidg), alClient, fSymlWidg); DockMaster.ManualDock(DockMaster.GetAnchorSite(fExplWidg), DockMaster.GetSite(fSymlWidg), alClient, fSymlWidg);
if GetDockSplitter(DockMaster.GetSite(fFindWidg), akTop, topsplt) then
begin
topsplt.MoveSplitter(40);
topsplt := nil;
end;
if GetDockSplitter(DockMaster.GetSite(fPrInpWidg), akTop, topsplt) then if GetDockSplitter(DockMaster.GetSite(fPrInpWidg), akTop, topsplt) then
begin begin
topsplt.MoveSplitter(40); topsplt.MoveSplitter(50);
topsplt := nil; topsplt := nil;
end; end;
fSymlWidg.showWidget; fSymlWidg.showWidget;

1
src/ce_messages.lfm
View File

@ -25,6 +25,7 @@ inherited CEMessagesWidget: TCEMessagesWidget
Width = 840 Width = 840
Align = alClient Align = alClient
BorderSpacing.Around = 2 BorderSpacing.Around = 2
Font.Style = [fsBold]
HideSelection = False HideSelection = False
Images = imgList Images = imgList
MultiSelect = True MultiSelect = True