Hola amigos, pues tengo una duda, y es que quiero hacer lo siguiente, tengo una ventana que me mostrará que la aplicacion se esta inicializando, y kiero que me la muestre mientras se van creando las forms, y antes de hacer apliccation.run que esta ventana se cierre y ya se me muestre la ventana principal:
Código:
Application.Initialize;
Application.Title := 'Hotel Iowa';
Application.CreateForm(TModuloDatos, ModuloDatos);
Application.CreateForm(TV_Principal, V_Principal);
Application.CreateForm(TV_Inicializar, V_Inicializar);
V_Inicializar.Visible:= True;
Application.CreateForm(TV_Base, V_Base);
Application.CreateForm(TV_Entrar_Al_Sistema, V_Entrar_Al_Sistema);
Application.CreateForm(TV_Registrarse_Como_Usuario, V_Registrarse_Como_Usuario);
Application.CreateForm(TV_Cliente, V_Cliente);
Application.CreateForm(TV_Usuario, V_Usuario);
Application.CreateForm(TV_Trabajador, V_Trabajador);
Application.CreateForm(TV_Recepcionista, V_Recepcionista);
Application.CreateForm(TV_Administrador, V_Administrador);
Application.CreateForm(TInform_Base, Inform_Base);
Application.CreateForm(TInform_Reserva, Inform_Reserva);
Application.CreateForm(TInform_Reserva2, Inform_Reserva2);
Application.CreateForm(TInform_Servicios, Inform_Servicios);
V_Inicializar.Visible:= False;
Application.Run;
Creo la ventana de inicializar y al momento quiero que me la muestre mientras se cargan las demas, pero el caso es que al mostrar esta ventana el resto de apliccation.CreateForm ya no se ejecutan, y quiero que lo haga, hay alguna forma?