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

improved completion, update menu after each keystroke

This commit is contained in:
Basile Burg 2015-03-28 19:52:41 +01:00
parent f74eaa0b75
commit 7510b42031
1 changed files with 4 additions and 0 deletions

4
src/ce_editor.pas
View File

@ -298,6 +298,8 @@ procedure TCEEditorWidget.focusedEditorChanged;
begin begin
if fDoc = nil then exit; if fDoc = nil then exit;
// //
fSyncEdit.Clear;
macRecorder.Clear;
macRecorder.Editor := fDoc; macRecorder.Editor := fDoc;
fSyncEdit.Editor := fDoc; fSyncEdit.Editor := fDoc;
completion.Editor := fDoc; completion.Editor := fDoc;
@ -417,6 +419,8 @@ begin
editorStatus.Panels[0].Text := format('%d : %d | %d', [fDoc.CaretY, fDoc.CaretX, fDoc.SelEnd - fDoc.SelStart]); editorStatus.Panels[0].Text := format('%d : %d | %d', [fDoc.CaretY, fDoc.CaretX, fDoc.SelEnd - fDoc.SelStart]);
editorStatus.Panels[1].Text := modstr[fDoc.modified]; editorStatus.Panels[1].Text := modstr[fDoc.modified];
editorStatus.Panels[2].Text := fDoc.fileName; editorStatus.Panels[2].Text := fDoc.fileName;
//
if completion.IsActive then getCompletionList;
end; end;
end; end;