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

added editable option 'autoDotDelay' 

delay before completion menu automatically appears, 0 disables the feature
This commit is contained in:
Basile Burg 2015-05-22 09:23:13 +02:00
parent 4cc3df3e6f
commit 03d7a52218
1 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/ce_editoroptions.pas
View File

@ -38,6 +38,7 @@ type
fFont: TFont;
//
fHintDelay: Integer;
fAutoDotDelay: Integer;
fTabWidth: Integer;
fBlockIdent: Integer;
fLineSpacing: Integer;
@ -58,7 +59,9 @@ type
procedure setTxtSyn(aValue: TPersistent);
procedure setShortcuts(aValue: TCollection);
procedure setHintDelay(aValue: Integer);
procedure setAutoDotDelay(aValue: Integer);
published
property autoDotDelay: integer read fAutoDotDelay write SetautoDotDelay;
property hintDelay: Integer read fHintDelay write setHintDelay;
property bracketMatchColor: TSynSelectedColor read fBracketMatchColor write setBracketMatchColor;
property mouseLinkColor: TSynSelectedColor read fMouseLinkColor write setMouseLinkColor;
@ -146,6 +149,7 @@ begin
fTxtSyn.Assign(TxtSyn);
//
fHintDelay:=200;
fAutoDotDelay:=200;
fSelCol := TSynSelectedColor.Create;
fFoldedColor := TSynSelectedColor.Create;
fMouseLinkColor := TSynSelectedColor.Create;
@ -214,6 +218,7 @@ begin
begin
srcopt := TCEEditorOptionsBase(src);
//
fAutoDotDelay:=srcopt.fAutoDotDelay;
fHintDelay:=srcopt.fHintDelay;
fFont.Assign(srcopt.fFont);
fSelCol.Assign(srcopt.fSelCol);
@ -245,6 +250,13 @@ begin
fHintDelay:=aValue;
end;
procedure TCEEditorOptionsBase.setAutoDotDelay(aValue: Integer);
begin
if aValue > 2000 then aValue := 2000
else if aValue < 0 then aValue := 0;
fAutoDotDelay:=aValue;
end;
procedure TCEEditorOptionsBase.setShortcuts(aValue: TCollection);
begin
fShortCuts.Assign(aValue);
@ -443,6 +455,7 @@ var
shc: TCEPersistentShortcut;
kst: TSynEditKeyStroke;
begin
anEditor.autoDotDelay:=fAutoDotDelay;
anEditor.hintDelay:=fHintDelay;
anEditor.defaultFontSize := font.Size;
anEditor.Font.Assign(font);