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

update completions on delete while comp menu opened

This commit is contained in:
Basile Burg 2018-10-21 14:43:29 +02:00
parent d6330ed0e4
commit b5c8702cbc
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/ce_synmemo.pas
View File

@ -2765,8 +2765,17 @@ end;
procedure TCESynMemo.completionDeleteKey(sender: TObject); procedure TCESynMemo.completionDeleteKey(sender: TObject);
begin begin
if fCompletionMenuAutoClose and (fCompletion.CurrentString.length < 2) then if fCompletionMenuAutoClose then
fCompletion.TheForm.Close; begin
if fCompletion.CurrentString.length < 2 then
fCompletion.TheForm.Close
end
else if CaretX > 0 then
begin
caretX := CaretX - 1;
getCompletionList();
caretX := CaretX + 1;
end;
end; end;
procedure TCESynMemo.getCompletionList; procedure TCESynMemo.getCompletionList;