Intercalar Forms
 

Primero que nada un saludo soy nuevo en Delphi y estoy trabajando en un sistema de conteo, en el primer form tengo la interfaz en la que el usuario trabaja y funciona correctamente, mi problema es que la primera form crea la siguiente cuando se presiona un botón, hasta este punto todo bien.

El problema real es que debo de presentar una grafica que muestre como va dicho conteo contra lo esperado, esta se debe mostrar cierto tiempo y depues regresar a la pantalla anterior, todo esto sin que el usuario intervenga en el sistema.

Use un Timer para llamar a la form donde esta la grafica pero después no se como regresar a mi form anterior y en su caso destruir la de la grafica hasta utilizarla nuevamente, espero puedan ayudarme. Por cierto trabajo con Delphi 7

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;

Muchas gracias intentare usar lo que mencionas.

Saludos

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



Gracias :)

Perfecto funciono a la perfección muchas gracias