Delphi XE - SynMemo - 突出显示一行并将光标停在您单击它的位置

时间:2015-04-22 22:54:29

标签: delphi synedit

我今天使用Delphi XE(我玩的四个版本之一:)

我已安装SynEdit / SynMemo来替换标准的TMemo。

(a)我想基于其行号突出显示整行。 (b)当我点击第一行时,我希望插入符号的行开头不会出现在我点击的位置 - 更像是记事本而不是代码编辑器。

非常感谢任何帮助!

1 个答案:

答案 0 :(得分:2)

要突出显示特定行,您需要使用OnSpecialLineColors事件。

试试这段代码:

procedure TfrmMain.SynMemo1SQLSpecialLineColors(Sender: TObject; Line: Integer;
  var Special: Boolean; var FG, BG: TColor);
begin
  // Change highlight for the first line.
  if Line = 1 then
  begin
    BG := clBlack;
    FG := clGreen;
  end;
end;

此外,请确保未设置Highlighter属性,否则可能会覆盖您的突出显示。