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