delphi - SynEdit：如何在给定开始和停止位置的情况下对多个文本区域进行背景突出显示？

Question

使用：Delphi XE2，Windows VCL 窗体应用程序，32 位

我正在使用 SynEdit 控件来显示文本。我已经在使用带有控件的 TSynHTMLSyn 语法高亮器来正确高亮 HTML 和 JS 代码。

我也在对这个文本（使用 Angus Johnson 的 TDiff）与另一个版本的文本进行比较，以查找：删除、添加和更改。我需要用不同的颜色突出显示这些类型的更改，即红色表示删除，蓝色表示添加，绿色表示更改。

我的问题：

1. 是否可以实施？
2. 如果是，那么如何？

TIA。

Answer 1

Try to use TSynEdit.onSpecialLineColors event, e.g.

procedure TfmRunScript.EditorSpecialLineColors(Sender: TObject;
  Line: Integer; var Special: Boolean; var FG, BG: TColor);
begin
 if Line = ErrorLine then
  begin
   Special := True;
   BG := clMaroon;
   FG := clWhite;
  end;
end;