源码模板专家里有一个问题很不方便
现在添加标准过程头就形成了如下的样子:
{-------------------------------------------------------------------------------
过程名: TForm1.qry1bbbSetText
作者: Luohuachun
日期: 2008.01.14
参数: Sender: TField; const Text: String
返回值: 无
说明:
-------------------------------------------------------------------------------}
procedure TForm1.qry1bbbSetText(Sender: TField; const Text: String);
begin
//ShowMessage(Text);
end;
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
能不能弄成如下这个样子的呢?因为在将上面的代码导入到modelMaker中的时候,过程的注释被丢了顶上去了.再从ModelMaker中导出来的时候,已经弄的面目全非了.这个工程太大了.这么多的注释我只好一个个的放在过程名的第一行下面.累死人!感觉非常不方便.能直接生成当前光标处的过程注释就好了.
procedure TForm1.qry1bbbSetText(Sender: TField; const Text: String);
{-------------------------------------------------------------------------------
过程名: TForm1.qry1bbbSetText
作者: Luohuachun
日期: 2008.01.14
参数: Sender: TField; const Text: String
返回值: 无
说明:
-------------------------------------------------------------------------------}
begin
//ShowMessage(Text);
end;
|