在Embarcadero Tools API中的光标位置插入文本

Question

我正在为Embarcadero C ++ Builder IDE编写扩展程序，并希望以编程方式在代码编辑器中的光标位置插入文本。我搜索了Tools API头文件，但只找到了一个允许我在编辑器的开头插入文本的界面。

是否有允许我在指定位置插入文字的界面或功能？如果是这样，你能给我一个代码示例吗？

我在C ++中编写扩展，但Delphi中的代码示例也会这样做。

Answer 1

Bruno Fierens的这份文件，Extending the Delphi IDE：

var
  EditorServices: IOTAEditorServices;
  EditView: IOTAEditView;
  copyright: string;
begin
  copyright := '{ Copyright © 2011 by tmssoftware.com }';
  EditorServices := BorlandIDEServices as IOTAEditorServices;

  EditView := EditorServices.TopView;

  if Assigned(EditView) then
  begin
    // position cursor at 1,1
    EditView.Buffer.EditPosition.Move(1,1);
    // insert copyright notice on top
    EditView.Buffer.EditPosition.InsertText(copyright);
  end;
end;

使用EditView.Buffer.EditPosition.Move()，你应该可以自由地将光标移动到任何位置。