Delphi - Ventana de Splash y Login en Delphi 7....

Hola compañeros programadores, estoy haciendo una aplicacion de facturacion, y necesito que me ayuden con la ventana de splash y el login, yo la se crear, el problema es que me da error al tratar de correrlo....

la ventana de splash, sale rapido, casi no se ve, uso el SLEEP pero no me funciona....

El login lo hago pero no c pork no me funciona....

No c como van organizados los formularios, ya tengo todos creados, pero no se el orden en que los debo poner para que funcionen la splash y el login....

Necesito ayuda es mi proyecto final de la universidad......

Quiero saber como programar estos tipos de ventanas

Ventana de Splash y Login en Delphi 6....
Quiero saber como programar estos tipos de ventanas

hola chicos.

espero les sea de ayuda.

1) crear formulario para el splash.
2) poner componente timer.
3) si quieres poner el componente progress bar
4) en el evento ontimer. poner esto.
Ejemp.
ontimer
begin
progressbar1.position:=progressbar1.position+1; // esto se hace para que la barra de progreso vaya aumentando 1(esto puede cambiar a 5 o mas) y cuando llegue a 50 entonces presentara el formulario login..

if progressbar1.position = 50 then
login.showmodal;
end;

5) En el evento onShow del formulario Login.

OnShow

begin
splash.hide;
end;

/// el splash no lo puede cerrar ya que es el formulario principal y vendria siendo la aplicacion. y entonces se cerraria completa.

Formulario Login

Usuario
''''''''''''''''''''''''''''''''''''' // Edit1.text // euser.text
'''''''''''''''''''''''''''''''''''''
Clave
'''''''''''''''''''''''''''''''''''' // edit2.text // eclave.text
'''''''''''''''''''''''''''''''''''


Boton Entrar Boton Salir

Boton Entrar

Onclick

Dependiendo donde vayas a trabajar si es con base de datos o solo una busqueda normal.
lo pondre como si fuera para base de datos. de acuerdo.

1)
EnteronClick

begin
tabla1.open;

if tabla1.locate ('user;clave',VarArrayOf([euser.text,eclave.text]),[]) then
begin
// esto si la clave es alfanumerica que acepta letras, de lo contrario tendras que hacer una conversion de string a integer,
fmenu.showmodal;
// si el usuaro y la clave coinciden entonces presentara el menu principal.
end
else
showmessage('Usuario o clave invalida');
endl;


en el menu principal.
en el onshow.
tambien hacer lo mismo que en el login.

OnShow

flogin.hide;

Esta es mi forma de hacer el splash y el login.

espero le sea de ayuda.
si en cualquier cosa le pueda ser ayuda. estamos a la disposicion.

Hola, me podria pasar este source en un proyecto?
Es que estoy en aprendizaje y me gustaria verlo en un proyecto.
Gracias, muy amable. Un saludo.

nesecito realizar un login en delphi

necesito el splash y el loggin