From ac4ce76c4bf567de8069d9a14bd0d88d33f3fe4b Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Sat, 25 Apr 2015 04:43:24 +0200 Subject: [PATCH] force rescan on focus --- src/ce_synmemo.pas | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas index 44dadd80..a2042d11 100644 --- a/src/ce_synmemo.pas +++ b/src/ce_synmemo.pas @@ -371,6 +371,7 @@ begin end; // Highlighter := D2Syn; + Highlighter.ResetRange; // fTempFileName := GetTempDir(false) + 'temp_' + uniqueObjStr(self) + '.d'; fFilename := ''; @@ -412,6 +413,11 @@ procedure TCESynMemo.setFocus; begin inherited; checkFileDate; + if (Highlighter <> nil) then + begin + LineTextChanged(nil, 0, Lines.Count); + Highlighter.ScanRanges; + end; identifierToD2Syn; subjDocFocused(TCEMultiDocSubject(fMultiDocSubject), self); end;