Использование фокуса

[prikolist]

Программисты! Подскажите пожалуйста, как используя фокус, сделать переход с поля Edit1 в Edit2, при нажатии клавиши ENTER, только тогда, когда в поле Edit1 что-то введено, если в нём ничего не введено, тогда при нажатии клавищи Enter чтоб курсор мыши оставался, и не переходил в Edit 2 я вот сделал так, ниже код, но проблемма, что при нажатии на Enter хоть и в поле Edit1 и ничего не введено, курсор переходит в Edit2. подскжаите пожалуйста, как исправить код.

if((Key == VK_RETURN) && ((Edit1->Text) != 0))
{
Edit2->SetFocus();
}

[Sazary]

void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
 if(Key==VK_RETURN && Edit1->Text.Length()!=0)
  Edit2->SetFocus();
}