Всем добрый вечер! Помогите, пожалуйста! 
программа с базой данных.  в одной из форм (Form6) по нажатии на кнопку BitBtn, открывается новая форма (Form5)- в которой пользователь выбирает из комбобокса нужные параметры, далее в этой форме когда выбраны необходимые параметры - нажимается кнопка и в 6ой форме выполняется sql-запрос. когда запускаю программу - выдает ошибку несоответствие типов в выражении. Подскажите пожалуйста - может ошибка в запросе ? 

void __fastcall TForm6::BitBtn1Click(TObject *Sender)
{
     Form5->Tag=0;
     Form5->ShowModal();
     if (Form5->Tag)
     {

        Form6->Query1->SQL->Add("SELECT Rajon, Tip_zhilya, Kolvo_komnat, Kvadr_metry, Tsena, Tel");
        Form6->Query1->SQL->Add("FROM ':NSamara:NedSamara1.db'");
        Form6->Query1->SQL->Add("WHERE (Rajon='ComboBox1->Items') AND (Tip_zhilya='ComboBox2->Items') AND (Kolvo_komnat='ComboBox3->Items')");
        Form6->Query1->SQL->Add("ORDER BY Tsena");

     Query1->Open();
     DataSource1->DataSet=Query1;
     }
}


а здесь часть из модуля 5ой формы 

void __fastcall TForm5::Button1Click(TObject *Sender)
{
    Tag=1;
    Close();
}