Comparar edit con campo de mi tabla

[el_barto]

el form3 es donde se pide el usuario y la contraseña es decir el form en donde se desarrolla el logueo, lo que quiero es que me siga llamando este form, por que en el project1 libero esta form asi:

Código Delphi [-]
begin
  Application.Initialize;
  Application.CreateForm(TDataModule2, DataModule2);
  DataModule2.IBDatabase1.Params.Values['USER_NAME'] := 'sysdba';
   DataModule2.IBDatabase1.Params.Values['PASSWORD']  := 'masterkey';
   DataModule2.IBDatabase1.open;
   DataModule2.IBTransaction1.Active := True;
   DataModule2.IBDataSet1.Active := True;
  Application.CreateForm(TForm3, Form3);
  if form3.showmodal = mrok then
  begin
    form3.Free;
    Application.CreateForm(TForm1, Form1);
    Application.CreateForm(TForm4, Form4);
    Application.CreateForm(TForm5, Form5);
    Application.CreateForm(TForm6, Form6);
    Application.Run;
  end;
end.

El problema es que si el user esta mal me muestra el mensaje de error pero me deja pasar al menu principal, lo que deseo es que en el codigo anterior cuando entre por el IF me siga llamando esta misma form3

[delphi.com.ar]

Todo depende dónde pongas el código que te he pasado, no tienes que dejar que se ejecute un ModalResult = mrOk, ya sea por código o por la propiedad de algún botón o similar.

[el_barto]

Puessss ahora si que quede confundido.....

Código Delphi [-]
 
if form3.showmodal = mrok then
  begin
    form3.Free;
    Application.CreateForm(TForm1, Form1);
    Application.CreateForm(TForm4, Form4);
    Application.CreateForm(TForm5, Form5);
    Application.CreateForm(TForm6, Form6);
    Application.Run;
  end;

es la primera vez que trabajo con esto y estoy algo perdido y para serte sincero ya recorre en mi la deseperacion dado que no se como hacer para que showmodal sea distinto a mrok y no ingrese a este IF

[delphi.com.ar]

Los formularios modales se cierran automáticamente cuando cambia el ModalResult del mismo, este ModalResult es el resultado del método que has llamado: ShowModal.
Hay dos formas de cambiar este modal result, como Delphi es un verdadero RAD, te permite hacerlo visualente, asignando la propiedad ModalResult de algunos componentes como los TButton. Entonces cuando alguien hace click en ese TButton si no se produce un error en la ejecución del evento, este botón le asignara su ModalResult al formulario automáticamente. Si el botón "Aceptar" de tu loguin tiene ModalResult = mrOk, simplemente en su código podría ser el que escribiste anteriormente, si este botón no tiene ModalResult, simplemente cuando la evaluación del usuario es correcta, podrías asignarselo al Form:

Código Delphi [-]
  ...
  if IBQuery1.IsEmpty then
     raise Exception.Create('Usuario o contraseña inválido')
  else 
     ModalResult := mrOk;

Saludos!

[el_barto]

hayyyyyy Fede yo partiendome la cabeza y lo que pasaba es que el ModalResult de mi boton estaba en MrOK y por eso siempre me dejaba entrarrrrrr, gracias fede y Felicidades, cuando vaya a argentina te invito una cerveza Quilmes que es una de mis preferidas o si hay algo mas fuertecito pues no lo tomamos