急急急，帮忙给看一下啊有毛病吗？

[wlg68]

帮忙看一下有没有错误啊？

void __fastcall TFormchaxun::Edit1Change(TObject *Sender)
{
query1->Active = false;
query1->SQL->Clear();
query1->SQL->Add( "SELECT * FROM A1.db" );
query1->SQL->Add( "WHERE partment = :partment" );
try
{
int partment= StrToInt( Edit1->Text );
query1->ParamByName( "partment" )->AsString = partment;
query1->Open();
if(query1->RecordCount>0 )
{
Edit1->Text = query1->FieldByName( "机械系" )->AsString;

}
query1->Active = false;
}
catch( )
{
Label4->Caption:=（'对不起，没有记录！);
query1->Active = false;
}
catch( )
{
Label4->Caption:=format('记录找到！共有%条记录！,[n]);
query1->Active = false;
}

[qibo999]

发现一句错误：
Label4->Caption:=（'对不起，没有记录！);
Label4->Caption:=format('记录找到！共有%条记录！,[n]);

[gfh_79_0]

什么错误提示？

[wlg68]

catch( )这个函数好象有错误啊

[wlg68]

[C++ Error] Unit4.cpp(56): E2451 Undefined symbol 'Items'
这是错误提示！
这是我的代码 上面的是错误提示！
Query1->Active=false;
Query1->Params->Items[0]->AsString = Edit1->Text;
Query1->Active=true;
if (Items->Active=true)
{
Query1->SQL->Clear();
Query1->SQL->Add("Select *From"F:/gzgl1/A1.db" as s where (s."Name"=Department)");
Query1->Prepare();
Query1->Params->Items[0]->AsString = Edit1->Text;
Query1->Params->Items[1]->AsString = Edit1->Text;
Query1->Params->Items[2]->AsString = Edit1->Text;
Query1->Params->Items[3]->AsString = Edit1->Text;
Query1->ExecSQL();
}
Query1->Open();
if (Query1->RecordCount == 0)
{
Label3->Caption = "对不起，没有记录！";
}
else
{
Query1->RecordCount;
Label3->Caption =Format("记录找到！共有%d条记录!",[n]);
}
}

[IT-司马青衫]

我帮你顶上去
你的问题太多了
看来你得请人过你那里去帮你做毕业设计!!!

实地解决....

[Mr-Chen]

我估计你的错误不止一个吧