Переделал вот так
Код:
DataModule1.ADOQuery2.SQL.Text:= 'SELECT * FROM Работники WHERE Подразделение = "' + TreeView1.Items[TreeView1.Selected.Index].Text + '"';
но теперь к примеру при выборе 3 записи в TreeView он отправляет на фильтрацию вторую запись...