[Assistant]

Код:

form1.ADOQuery1.SQL.text:='SELECT имя, фамилия, телефон, [Тип адреса], adress FROM Люди, Точка, точка_люди
WHERE Люди.id=точка_люди.id_чел AND Точка.id=точка_люди.id_точки AND точка_люди.id_точки=' + (form2.DBComboBox2.Text);

P.S.: просто нужно убрать ковычки, ковычки нужны для текстовых полей, для числовых - не нужны.