Tengo Este Codigo,pero Tengo 2 Errores D Tipo Misplaced Else

[Opo]

yo tengo el mismo problema, el codigo que tengo es este.
void __fastcall TForm1::Button4Click(TObject *Sender)
{
int x;
int y;
x = StrToInt(Edit1->Text);
y = StrToInt(Edit2->Text);
if ( y== 0){
MessageDlg("Error División entre 0", mtWarning, TMsgDlgButtons () << mbOK, 0);
else {
y = x / y;}
}
Edit3->Text = IntToStr(y);
}