[el_barto]

Hola Fede mira como deje el codigo y funciona muy bien pero lo que no se como hacer es que para cuando entra por el IF me siga mostrando la form3

Código Delphi [-]
IBQuery1.SQL.Clear;
   IBQuery1.Close;
   IBQuery1.Sql.Text := 'select * from usuarios where user_name =' + Quotedstr (Edit1.text) + 'and user_pass =' + Quotedstr (Edit2.text);
   IBQuery1.Open;
   IBQuery1.Active:=True;
  if IBQuery1.IsEmpty then
     raise Exception.Create('Usuario o contraseña inválido')
  else begin
     MessageDlg ('SU USER O PASSWORD es correcto', mtWarning,[mbyes],0)