poner splash screen con progress bar en delphi

[suseLinux]

Vamos a ver que tal anda el truco,
Se agradece.
Salu2

[ixMike]

¡¡¡¡¡¡¡¡¡¡¡Hola!!!!!!!!!!!!

Eso está bastante bien. Pero a veces la necesidad de la ProgressBar es porque el arranque del programa es más o menos lento, y esto suele deberse a que estás cargando una base de datos, o analizando archivos, o registros, u obteniendo datos del PC, o un millón de cosas más que necesita un programa al arrancar.

Quiero decir que lo bueno es (en tiempo de diseño) asignar a la propiedad Max del ProgressBar la cantidad de pasos que va a tener el programa al arrancar (crear FormXXX, analizar archivo1, archivo2....) y llamar al StepIt cada vez que se haya concluído uno de estos pasos.


Y sobre notas estéticas, la Splash se sugiere estar centrada, sin bordes de ningún tipo, con una imagen de fondo, algún dato del programa (nombre, organización, etc) y en el evento OnCloseQuery asignar a la variabla CanClose el valor de False (para evitar que el usuario cierre con Alt+F4 cuando no debe) y para cerrarla en vez de llamar a Close, llamar a Destroy o a Free (aunque el CanClose también podría hacer alguna comprobación del estado del programa).

En fin, que las posibilidades son muchíiiiiiiiiiiiiiiiiiiiiiiiisimas.


Saludos a todo el foro.

[suseLinux]

Muy bueno el truco, con esto además pude controlar el arranque de algunas variable globales dentro del archivo del proyecto...

Muy agradecido por el gran aporte