怎么给Unit动态添加注释?

jobs002 2006-12-25 12:35:29
我想把Unit注释,Procedure注释,写成类似模板的东西,然后遍历文件夹下面的pas文件,自动添加注释,请问如何实现,主要是为了提高注释的效率.
例如:

Unit utlTest

interface

uses
**,**,**
Type
TestClass=Class
procedure testFunction();

end;

implements
////////////

/////注释的模版加在这里
////////////////////
function TestClass.testFunction();
begin
***********************
end;
end.
...全文
190 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
jobs002 2006-12-25
  • 打赏
  • 举报
回复
想到一个方法,需要移动很多的行数,不知道有没有跟简单的方法。
jobs002 2006-12-25
  • 打赏
  • 举报
回复
如果一行一行分析,效率一定比较低.能给个参考代码看看,分不是问题.
cangwu_lee 2006-12-25
  • 打赏
  • 举报
回复
自己对.pas 逐行分析吧

--------------------------------------------------------------
程序,犹如人生。

2,507

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧