Hjælp til RadioButton

Hey.

procedure TForm1.Button1Click(Sender: TObject);
begin
    If RadioButton1.Checked Then
Begin
    Form2.Showmodal;
Begin
    If RadioButton2.Checked Then
Begin
    Form3.showmodal;
end;
end;
end.

Når jeg kører programmet, så vil den ikke vise Form3 når jeg har Checked RafioButton2. Hva er der galt?

MVH Alex