摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB, StdCtrls, ComCtrls, Grids, DBGrids;type PNodeRec=^TNodeRec; TNodeRec=record id: string; name: string; pid: string; end; TForm1 = class(TForm) TreeView1: TTreeView... 阅读全文
posted @ 2012-07-27 00:06 delphi中间件 阅读(464) 评论(0) 推荐(0) 编辑