delphi - 如何使用 OpenToolsAPI 在源代码编辑器中突出显示特定行

Question

是否可以在事件编辑器窗口中突出显示特定行，就像 Delphi IDE 在突出显示编译器错误时所做的那样？

Answer 1

如果可以直接转到最顶层编辑器中的某一行，请尝试以下操作:

procedure GotoLine(LineNumber: Integer);
var
  EditorServices: IOTAEditorServices;
  Buffer: IOTAEditBuffer;
  Position: IOTAEditPosition;
begin
  if not Supports(BorlandIDEServices, IOTAEditorServices, EditorServices) then
    Exit;
  Buffer := EditorServices.TopBuffer;
  if not Assigned(Buffer) then
    Exit;
  Position := Buffer.EditPosition;
  if not Assigned(Position) then
    Exit;
  Position.GotoLine(LineNumber);
  Buffer.TopView.Paint;
end;