7

使用: Delphi XE2、Windows VCL フォーム アプリケーション、32 ビット

SynEdit コントロールを使用してテキストを表示しています。私はすでに TSynHTMLSyn シンタックス ハイライターとコントロールを使用して、HTML と JS コードを適切にハイライトしています。

また、このテキストと (Angus Johnson の TDiff を使用して) diff を行っており、別のバージョンのテキスト (削除、追加、変更) を見つけています。これらのタイプの変更のそれぞれを異なる色で強調表示する必要があります。つまり、赤は削除、青は追加、緑は変更です。

私の質問:

  1. 実装することは可能ですか?
  2. はいの場合、どのように?

ティア。

4

1 に答える 1

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;
于 2013-11-14T11:41:32.600 に答える