mirror of https://gitlab.com/basile.b/dexed.git
fix, status bar cleared when no doc
This commit is contained in:
parent
286636b75a
commit
7a2a57d0fa
|
@ -297,12 +297,15 @@ procedure TCEEditorWidget.UpdateByEvent;
|
||||||
const
|
const
|
||||||
modstr: array[boolean] of string = ('...', 'MODIFIED');
|
modstr: array[boolean] of string = ('...', 'MODIFIED');
|
||||||
begin
|
begin
|
||||||
if fDoc = nil then exit;
|
if fDoc = nil then begin
|
||||||
//
|
editorStatus.Panels[0].Text := '';
|
||||||
editorStatus.Panels[0].Text := format('%d : %d | %d', [fDoc.CaretY, fDoc.CaretX,
|
editorStatus.Panels[1].Text := '';
|
||||||
fDoc.SelEnd - fDoc.SelStart]);
|
editorStatus.Panels[2].Text := '';
|
||||||
|
end else begin
|
||||||
|
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;
|
||||||
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TCEEditorWidget.lexFindToken(const aToken: PLexToken; out doStop: boolean);
|
procedure TCEEditorWidget.lexFindToken(const aToken: PLexToken; out doStop: boolean);
|
||||||
|
|
Loading…
Reference in New Issue