Delphi XE - SynMemo - 突出显示一行并停止光标移动到您单击它的位置

Question

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

我已经安装了SynEdit/SynMemo来取代标准的TMemo。

（a） 我想根据行号突出显示整行。（b） 当我单击第一行时，我希望插入符号转到行首，而不是出现在我单击的位置 - 更像记事本而不是代码编辑器。

任何帮助非常感谢！

Answer 1

要突出显示特定行，您需要使用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属性，否则它可能会覆盖突出显示。