05 2016 档案

摘要://快速初始化功能树procedure InitTree;var doc: IXMLDOMDocument; Node, ChildNode: IXMLDOMNode; NodeList: IXMLDOMNodeList; i, Index: Integer; id,mc,parentid,leve 阅读全文
posted @ 2016-05-26 09:05 BCDLL 阅读(1560) 评论(0) 推荐(0)
摘要:编译变量$REGION,用于在delphi2006以后版本的折叠代码显示,非常方便。 procedure TForm1.Button1Click(Sender: TObject);var uStr: UnicodeString;begin{$REGION '显示uStr变量内容'} uStr := 阅读全文
posted @ 2016-05-24 09:20 BCDLL 阅读(1726) 评论(0) 推荐(0)