给PD增加对类型的支持

现在我们看PD中各种语言中，不管版型选择什么，都会把其当成class，其实这是不对的，当一个版型为type，就表明了这个类其实是type类型的。我们需要在代码中，生成

 TmyType = record

   Attri: string;

  End;

这样的结果。

 

方法很简单，在class节点中，增加一个小节。名为definition<<type>>

内容为

%Code% = record

[  %attributes(-)%\n]\

[  %attributes(#)%\n]\

[  %attributes(+)%\n]\

[  %attributes(*)%\n]\

end;

就行。