[Uniq!]

Код:

    cxGrid1: TcxGrid;
    procedure dxBarButton1Click(Sender: TObject);
    procedure cxTreeView1Expanding(Sender: TObject; Node: TTreeNode;
      var AllowExpansion: Boolean);
    procedure cxTreeView1Change(Sender: TObject; Node: TTreeNode);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

А здесь это как выглядеть будет?