回车键的问题

[guess1975]

void __fastcall TForm4::Edit1KeyDown(TObject *Sender, WORD &Key,
TShiftState Shift)
{
if (Key==VK_RETURN)
{
if ((Edit1->Text=="")//如果我在Edit上敲一下回车键（什么都不输），那么就能
// 浏览数据库的所有记录

{
Query1->Active=true;
Query1->Prior();
}//我在Edit中输入了拼音 再敲回车键，于是就能找到相应的科室
else if (Edit1->Text!="")
{
Query1->Close();
Query1->SQL->Clear();
Query1->SQL->Add("select * from KSXX");
Query1->SQL->Add("where PINYM='"+Edit1->Text+"'");
Query1->Open();
}
可是，问题就出来了，当我输入完拼音然后敲回车键，找到了相应的记录，然后删除Edit中的数据，（用Backspace键删除），再敲回车键，想浏览整个数据库，可是怎么不能浏览啊？这是怎么回事，如何才能这样实现？

[星光伴月]

按照gloom说的方法做还不行的话，就这样判断好了：

if(Edit1->Text.Trim()=="")
{ ......
}

[ljianq]

Query1->Active=true;
Query1->Prior();
这两句可能会出例外。

[gloom]

{
if ((Edit1->Text=="")//如果我在Edit上敲一下回车键（什么都不输），那么就能
// 浏览数据库的所有记录

{
//加上下面这句
　if(Query1->Active) Query->Close();
Query1->Active=true;
Query1->Prior();
}

[gloom]

应该还要重新设置SQL语句，
if ((Edit1->Text=="")//如果我在Edit上敲一下回车键（什么都不输），那么就能
// 浏览数据库的所有记录

{
//加上下面这句
　if(Query1->Active) Query->Close();
　Query1->SQL->Text="select * from ksxx";
Query1->Active=true;
Query1->Prior();
}

[jb9802]

我想因把
if ((Edit1->Text=="")
改成
if ((Edit1->Text=="\r")