摘要：
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... 阅读全文
