Intercalar Forms

[atani123]

Por lo que cuentas parece que a la segunda pantalla la llamas mediante un showmodal.

Yo realmente en este caso utilizaria un show (sin el modal). Asi podras ver online el conteo que dices. Sino quieres verlo todo el rato puedes hacer algo como esto.

Quitando los errores esta es la idea (visible durante 10 seg, cada 5 min)

Nota: Si no quieres tener problemas de visualizacion haz que el form2 sea "StayOnTop"

begin
...
...
tmrTimer1.interval := 300000 (5 min)
tmrTimer1.enabled := true;
...
...
...
end;


procedure OnTimer1;
begin
tmrTimer1.enabled := false;
if (form2 = nil) then
form2 := TForm2.Create( Application);

form2.show;
tmrTimer2.interval := 10000 (10 segs)
tmrTimer2.enabled := true;
end;

procedure OnTimer2;
begin
tmrTimer2.enabled := false;
if not (form2 = nil) then
form2.hide;

tmrTimer1.enabled := true;
end;

[Jorge Hernández]

Muchas gracias intentare usar lo que mencionas.

Saludos

[Jorge Hernández]

Perfecto funciono a la perfección muchas gracias

[Casimiro Noteví]

Empezado por atani123

...

Recuerda poner los tags al código fuente, ejemplo:



Gracias