Из TreeView в edit

[program123]

пишу прогу и столкнулся вот с чем. Есть 2 поля Edit и есть заполненный TreeView к примеру:
Фрукты + (апельсины,бананы,мандарины)
Овощи + (картошка,помидоры и тд)
Необходимо при событии OnChange компонента TreeView считывать в первое поле только Пукнты (фрукты,овощи) а во второй едит только подпункты. помогите плз

[Скандербег]

procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
  if Node.Level = 0 then Edit1.Text := Node.Text;
  if Node.Level = 1 then Edit2.Text := Node.Text;
end;

[program123]

Огроменное спасибо. не знаком просто с компонентом, а оказывается всё просто, еще раз спасибо