Удаление строки из базы и TreeView

[AllenWolker]

пишу програмку...возникла надобность удаления строки из базы и одновременно из treeview с этим же именем

sql запрос: Select * From Клиенты

var s: string;
begin
if ADOQuery2.RecordCount=0 then
MessageBox(0,'Таблица Клиентов Пуста','Ошибка',MB_OK or MB_ICONERROR)
Else
begin
s:=TreeView1.Selected.Text;
ADOQuery2.Delete;
TreeView1.Selected.Delete;
end;
ADOQuery2.First;
подскажите как правильно условие поставить чтобы проверялась
Столбец Название с элементом TreeView