duda sobre cerrar delphi

[granodetoro]

hola a todos.bueno lo que pasa es tengo un form y una imagen.cuando corrra el programa y de click a la imagen quiero que inicie un progressbar y el programa se cierre en 5 segundos

[[Delphius]]

¿Y cual es tu duda, concretamente?
¿En como iniciar un timer? ¿En como hacer que el progressbar avance? ¿En cual será la orden para cerrar la aplicación? ¿O es que no es ninguna de ellas, y en realidad no tienes idea de ninguna de ellas y esperas únicamente que te se diera la solución completita a tu gusto... vale: copy and paste?

Sabes que hay un buscador en el foro, que basta con poner palabras claves como timer, progressbar y/o close o Terminate ya obtienes resultados e hilos que tratan a estos temas. ¿Lo sabías?

Saludos,

[arturom]

Empezado por Delphius

Sabes que hay un buscador en el foro, que basta con poner palabras claves como timer, progressbar y/o close o Terminate ya obtienes resultados e hilos que tratan a estos temas. ¿Lo sabías?

Saludos,

Incluso, sin usar el buscador, el propio vBulletin le proporciona al final de su mensaje varios hilos relacionados con ese mismo tema. Si es que...

[Neftali [Germán.Estévez]]

Empezado por Delphius

¿Y cual es tu duda, concretamente?
¿En como iniciar un timer?
¿En como hacer que el progressbar avance?
¿En cual será la orden para cerrar la aplicación?

+1

Pues estoy igual que Delphius.

[ecfisa]

Hola.

De acuerdo con Delphius en un 100%.

Hay que explicar claramente que resultado se desea obtener y cual es el inconveniente que se tiene despues de haberlo intentado.

granodetoro, cuando alguien lee esto:

tengo un form y una imagen.cuando corrra el programa y de click a la imagen quiero que inicie un progressbar y el programa se cierre en 5 segundos

Y te contesta algo como esto:

Código Delphi [-]
procedure TForm1.Image1Click(Sender: TObject);
var
  i: Integer;
begin
  for i:= ProgressBar1.Min to ProgressBar1.Max do
    ProgressBar1.StepIt;
  Sleep(5000);
  Application.Terminate;
end;

Deberás reconocer que es una respuesta totalmente válida...

Citas:
roman: La calidad de las respuestas es directamente proporcional a la calidad de la pregunta
Neftalí: Más tiempo dedicado a la pregunta=Mejores respuestas.

Saludos