TTreeView & DragAndDrop в Delphi

[russian_gremlin]

Ессть 2 вопроса.
1) Как сделать процедуру(функцию) для перетаскивания файлов из Проводника в ветку TreeView, с последующим сохранением в Базе Данных имени файла и его пути.
procedure TMainForm.FormCreate(Sender: TObject);
begin
DragAcceptFiles(TreeView1.Handle, True);
end;
Дальше этой процедуры дело не пошло.

2) В ActionManager создана процедура которая удаляет ветку из Дерева и из Базы Данных по нажатию Delete. Вобщем-то всё чудесно, но при редактировании имени ветки, если нажать Delete она тоже удаляется. Вопрос в том, как избавиться от этой фигни.