Delphi   发布时间:2022-04-10  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了delphi – 如何用Open Tools API折叠插入区域?大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
我想在编辑视图中插入一个区域,然后折叠该区域.
// fEditView: IOTAEditView;

var
  writer: IOTAEditWriter;
begin
  writer := fEditView.Buffer.CreateUndoableWriter;
  //...
  writer.Insert('{$REGION ''Documentation''}'#13#10'{$ENDREGION}');
  writer := nil;  // Flush the buffer
  fEditView.Position.GotoLine(lineNo); // go to the line number of the region
  fEditView.Paint;
end;

此代码段将在代码编辑器中插入一个区域.但IDE需要一些操作才能在代码编辑器中生成这样一个区域.

有没有办法强制IDE做这个动作,然后我可以使用

(fEditView as IOTAElideActions).ElideNearestBlock;

折叠吗

解决方法

发现由grubby试错:-)
(fEditView as IOTAElideActions).EnableElisions;
(fEditView as IOTAElideActions).EnableElisions;
(fEditView as IOTAElideActions).ElideNearestBlock;

EnableElisions()似乎实际切换了elisions功能.

再次脱口而出,似乎有所期望的效果.有一些不是非常漂亮的屏幕更新.是否可以抑制我不知道.

大佬总结

以上是大佬教程为你收集整理的delphi – 如何用Open Tools API折叠插入区域?全部内容,希望文章能够帮你解决delphi – 如何用Open Tools API折叠插入区域?所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。
标签: