Delphi：簡單地突出顯示SynEdit中的文字

Question

我有20個不同的單詞。如何在SynEdit中用不同顏色的單詞突出顯示行？如果無法突出顯示行然後突出顯示這些字詞。

大感謝!!!!!!

Answer 1

要突出顯示一行，必須使用OnSpecialLineColors事件。你可以創建一個函數來找到該行的字（檢查這個問題Is There An Efficient Whole Word Search Function in Delphi?），然後畫線

檢查這個代碼

procedure TFrmMain.SynEditCodeSpecialLineColors(Sender: TObject; 
    Line: integer; var Special: boolean; var FG, BG: TColor); 
begin 
    If LineContainsWord(Line) then //here check if the word is in the line 
    begin 
    FG  := clYellow; //Text Color 
    BG  := clBlue; //BackGround 
    Special := True; //Must be true 
    end;   
end;