TreeView удалить запись?

[lu_una]

Добрый день
У меня такая проблема, вернее главная проблема в том что я исправляю не свою программу, по работе нужно, вопрос вот такой.. вот это процедура добавления файла в базу. Нужна кнопка удаления файла из базы, как это можно?

procedure TForm2.Button1Click(Sender: TObject);
  var
    fullNameFile : String;
    fileTmp : TTableFileName;
    folderName : String;
    folder : TTableFolder;
    idFolder : Integer;
begin
  fileTmp := TTableFileName.Create;
  logFile.WriteLog('Открытие диалога выбора файла');
  if OpenDialog1.Execute then
    begin
      fullNameFile := OpenDialog1.FileName;
      folderName :=  TreeView1.Selected.Text;
      folder := TTableFolder.Create;
      idFolder := folder.getID(folderName);
      try
        logFile.WriteLog('Добавление документа в базу.');
        fileTmp.insert(fullNameFile,now,idFolder);
      except
        ShowMessage('Документ уже есть в базе');
        logFile.WriteLog('Файл не добавлен. Исключение!');
      end;
      IBQuery2.Close;
      IBQuery2.SQL.Clear;
      if IBTransaction2.InTransaction then
        IBTransaction2.Commit;
      IBQuery2.SQL.Add('SELECT ID,FILE_NAME FROM TABLE_FILE WHERE '
        + '(ID_FOLDER= ' + IntToStr(idFolder) + ');');
      IBTransaction2.StartTransaction;
      IBQuery2.Open;
       DBGridEh1.DataSource.Dataset.Fields[0].Visible := false;
      DBGridEh1.Columns[0].Title.Caption := 'Имя документа';
    end;

end;

[Stilet]

TTableFileName

Что это за класс? Как реализовано fileTmp.insert?
Файлы в базе в BLOB виде?