Form Autocreados al inicio...

[verito_83mdq]

Hola Alecaa!! Como andas?? Primero gracias por ayudarme siempre, segundo lo hice andar. Agrego el código para que lo vean, tengo miedo de que me genere problemas,pero por ahora me anda bien.

Este el el Dpr el pp, lo que hace es mostrar un spash, despues me carga los dos Modulos, el de la base , y el de los Query.

Código Delphi [-]
begin 
 
 
  SplashForm := TSplashForm.Create(Application); 
  SplashForm.Show; 
  SplashForm.Update; 
  Application.Initialize; 
  Application.Title := 'SiTiC'; 
  Application.CreateForm(TBaseDataModule, BaseDataModule); 
  Application.CreateForm(TQueryDataModule, QueryDataModule); 
  SplashForm.Hide; 
  SplashForm.Free; 
  Application.Run; 
 
 
end.

Despues en el Form Create del Base Module tengo este codigo: si anda la conexión me crea el login y sino me manda a otro form para cambiar los datos del Zconex.
Lo que cambie para que ande es:

Esto

Código Delphi [-]
IngresoForm:=TIngresoForm.Create(Application);

Por esto

Código Delphi [-]
Application.CreateForm(TIngresoForm, IngresoForm)

Acá se puede apreciar:

Código Delphi [-]
procedure TBaseDataModule.DataModuleCreate(Sender: TObject); 
begin 
 
          with BaseDataModule.ZConnection1 do 
            begin 
               If Connected then Disconnect; 
               HostName:='localhost'; 
               Catalog:='base'; 
               Database:='base'; 
               Port:=3306; 
               User:='root'; 
               Password:='123'; 
               try 
                     Connected:=True; 
                     if Connected = true then 
                        begin 
                           Application.CreateForm(TIngresoForm, IngresoForm); 
 
                        end; 
 
               except 
 
                    Application.CreateForm(TConexionForm, ConexionForm); 
 
                end; 
 
            end; 
 
 
end; 
 
end.

La duda es: cual es la diferencia entre estas dos Sentencias??

Código Delphi [-]
IngresoForm:=TIngresoForm.Create(Application);

Código Delphi [-]
Application.CreateForm(TIngresoForm, IngresoForm)

Desde ya muchas Gracias!!!!!!