[jose.ignacio.ve]

hola tengo un problema. tengo un sistema de Gestion de alumnos. la primera pantalla que se tiene que mostrar es la de inicio de sesion. tengo este codigo

Código Delphi [-]
program P_rujas;

uses
  Vcl.Forms,
  controls,
  Uprincipal in 'Uprincipal.pas' {fprincipal},
  Umod in 'Umod.pas' {fmodulo: TDataModule},
  Ualumnos in 'Ualumnos.pas' {FAlumnos},
  Ulistado_alumnos in 'Ulistado_alumnos.pas' {flistado_alumnos},
  Ureportes in 'Ureportes.pas' {freportes: TDataModule},
  Ulistado_usuarios in 'Ulistado_usuarios.pas' {flistado_usuarios},
  Uusuarios in 'Uusuarios.pas' {fusuarios},
  Ulogin in 'Ulogin.pas' {Flogin},
  Uclave in 'Uclave.pas' {fclave},
  Uprincipal1 in 'Uprincipal1.pas' {Fprincipal1};

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TFprincipal1, Fprincipal1);
  if flogin.ModalResult = mrcancel  then
       Application.Terminate  ;



     Application.Run;


end.

los otros formularios tengo los creo a la hora de llamarlo. me da error con ese codigo. Cuando lo los creaba automaticamente no me daba error. en tiempo de ejecucion. Pero si el sistema esta abierto mas de un dia me un error que no se de que es.