Problema al ejecutar aplicacion cliente servidor

[[Lepe]]

En principio no es buena idea crear todas las ventanas desde el principio de la aplicación, es una sobrecarga innecesaria. Lo óptimo es crear dinámicamente las ventanas que vas abriendo y cuando se cierre, que se libere la memoria. Así aligeramos la carga de la aplicación y además no supone "esperas" cuando se crea una ventana determinada, (no tarda tanto como se suele suponer).

Pasando un poco de ese tema, vamos al grano. No se trata de esa ventana, sino de la filosofía que usas:

Código Delphi [-]
 SplashScreen:=TSplashScreen.Create(application);
  SplashScreen.Show;
  SplashScreen.Hide;
  SplashScreen.Free;

En la primera línea estas diciendo que el objeto "Application" es el encargado de destruir la ventana Splash, sin embargo, en la última línea, te encargas tú de liberarla, por tanto, cuando la aplicación se cierre al completo, irá a destruir un objeto que ya fue liberado con el error que te da.

Hay varias formas para solventar esto, te comento ambas porque te será necesario.

Lo que no me gusta, pero funciona sin problemas:

Código Delphi [-]
 SplashScreen:=TSplashScreen.Create(application);
  SplashScreen.Show;
  SplashScreen.Hide;
  FreeAndNil(SplashScreen);

Aqui decimos que el objeto Application será el encargado de destruir el Splash, pero nosotros (que necesitamos liberarlo antes de que se cierre la aplicación), lo liberamos con FreeAndNil (mira la ayuda). De esta forma, cuando el objeto Application vaya a destruir a Splash, se "da cuenta" de que ya ha sido liberada y no hace nada (no provoca el error de antes).

Lo que si me gusta y uso a menudo (me gusta tener el control de todo ):

Código Delphi [-]
 SplashScreen:=TSplashScreen.Create(nil);
  SplashScreen.Show;
  SplashScreen.Hide;
  FreeAndNil(SplashScreen);

Ahora en la primera línea le decimos a Delphi que nadie (nil) se encargará de destruir la ventana, porque yo mismo me encargo de ello.

Además uso FreeAnNil como respaldo, es decir, si necesito mostrar el splashScreen en un momento dado, puedo preguntar si ha sido creado o no:

Código Delphi [-]
  if not Assigned(SplashScreen) then //  (si no ha sido creada, la creo yo)
    SplashScreen := TSplashScreen.Crete(nil);

  SplashScreen.Show; // por último se muestra

Tendrás que mirar estos detalles, por si liberas alguna forma / informe de quickreports / etc antes que el objeto Application.

Saludos

[Choclito]

Muchas gracias por la respuesta Lepe especialmente por tus sugerencias pero te comento que el codigo que puse estaba en el proyecto de la aplicacion, luego que para no tener problemas con el Splashscrenn lo puse como comentario para asi no me muestre y confirme si el causante del error es la creacion del Splashcreen y te comento q me sigue dando el error
Como puedo saber donde estoy cometiendo el error??pues me sigue marcando el error:

Código Delphi [-]
  if FOwner <> nil then FOwner.RemoveComponent(Self);
  inherited Destroy;

Porfavor quisiera q me den una ayuda o sugerencia para poder encontrar el error pues cuando lo llevo a otras maquinas cuando cierro la aplicacion me sale un error de envio de error
Y muchas gracias por el comentario que lo tendre muy encuenta
Para que la aplicacion no sea pesada la creacion dinamica de forms como tendria q hacerla un pequeño ejemplo podria ser??? disculpa por lo novato de lo pregunto pero comentarles q recien me estoy iniciando en desarrollar aplicaciones

[[Lepe]]

El error no está en el código, el error es de concepto. Lo dije para el SplashScreen, pero es aplicable a todas las ventanas / objetos que usas en tu aplicación.

Para la creación dinámica, puedes usar este hilo, como otros tantos que hay en el foro.

Saludos

[Choclito]

Muchas gracias por el comentario Lepe q lo tomare en cuenta de ahora en adelante, pero que truco o como puedo hacer para q ya no me salga ese error debido a q son muchas las formas y lo unico q faltaba a la aplicacion era lo de seleccionar el Servidor de base de datos.
El cambiar de concepto y las razones las comprendi pero lo quieren ya nomas y como lo puedo arreglar
Muchas gracias por las sugerencias y ayuda q me brinden