AdoQuery1.SQL.Text := 'select * from PhoneBook where Фамилия=:FirstName'; AdoQuery1.Parameters.ParamValues['FirstName'] := 'Зайцев'; AdoQuery1.Open;