fix: high CPU load and unresponsiveness through SynEdit highlighter when starting to edit large text in popup editor

Refs #2388

Author: ansgarbecker

source/grideditlinks.pas

@@ -1189,7 +1189,7 @@ function TInplaceEditorLink.BeginEdit: Boolean;
   if Result then begin
     FButton.Visible := ButtonVisible;
     SetBounds(Rect(0, 0, 0, 0));
-    if (Length(FEdit.Text) > SIZE_KB) or (ScanLineBreaks(FEdit.Text) <> lbsNone) then
+    if (Length(FEdit.Text) >= GRIDMAXDATA) or (ScanLineBreaks(FEdit.Text) <> lbsNone) then
       ButtonClick(FTree)
     else begin
       FPanel.Show;

source/texteditor.pas

@@ -142,11 +142,15 @@ procedure TfrmTextEditor.SetText(text: String);
   end;
   if Assigned(Detected) then
     SelectLineBreaks(Detected);
-  if (Length(text) > SIZE_MB) then begin
-    MainForm.LogSQL(_('Auto-disabling wordwrap for large text'));
+  if (Length(text) > SIZE_KB*10) then begin
+    MainForm.LogSQL(_('Auto-disabling wordwrap and syntax highlighter for large text'));
     btnWrap.Enabled := False;
+    comboHighlighter.Enabled := False;
+    btnCustomizeHighlighter.Enabled := False;
   end else begin
     btnWrap.Enabled := True;
+    comboHighlighter.Enabled := True;
+    btnCustomizeHighlighter.Enabled := True;
   end;
 
   MemoText.Text := text;
@@ -380,6 +384,8 @@ procedure TfrmTextEditor.comboHighlighterSelect(Sender: TObject);
   SelStart, SelLength: Integer;
 begin
   // Code highlighter selected
+  if not comboHighlighter.Enabled then
+    Exit;
   SelStart := MemoText.SelStart;
   SelLength := MemoText.SelLength;
   MemoText.Highlighter := nil;