30 lines
434 B
ObjectPascal
30 lines
434 B
ObjectPascal
|
unit tree;
|
||
|
|
|
||
|
|
interface
|
||
|
|
|
||
|
|
uses
|
||
|
|
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
|
||
|
|
StdCtrls, Buttons, ComCtrls, dxtree;
|
||
|
|
|
||
|
|
type
|
||
|
|
TForm2 = class(TForm)
|
||
|
|
dxTreeView1: TdxTreeView;
|
||
|
|
BitBtn1: TBitBtn;
|
||
|
|
Label1: TLabel;
|
||
|
|
Label2: TLabel;
|
||
|
|
private
|
||
|
|
{ Private declarations }
|
||
|
|
public
|
||
|
|
{ Public declarations }
|
||
|
|
end;
|
||
|
|
|
||
|
|
var
|
||
|
|
Form2: TForm2;
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
{$R *.DFM}
|
||
|
|
|
||
|
|
|
||
|
|
end.
|