怎么给Unit动态添加注释? Delphi / Windows SDK/APIhttp://www.delphi2007.net/DelphiDB/html/delphi_20061225123529122.html
我想把Unit注释,Procedure注释,写成类似模板的东西，然后遍历文件夹下面的pas文件,自动添加注释，请问如何实现,主要是为了提高注释的效率.
例如:
Unit utlTest
interface
uses
**,**,**
Type
TestClass=Class
procedure testFunction();
end;
implements
////////////
/////注释的模版加在这里
////////////////////
function TestClass.testFunction();
begin
***********************
end;
end.
自己对.pas 逐行分析吧
--------------------------------------------------------------
程序，犹如人生。
如果一行一行分析，效率一定比较低.能给个参考代码看看,分不是问题.
想到一个方法,需要移动很多的行数,不知道有没有跟简单的方法。