Detener timer de form1 cuando se abre el form2
Hola buenos días.
Resulta que tengo un form1 en el cual se esta ejecutando un timer, Tengo un form2 donde se ejecuta otro timer diferente. Lo que quiero es que si estoy en el form 1 y paso al form2. entonces que se detenga el timer del form1. He probado el siguiente código en el evento onshow y también en onactivate del form2 pero igual no me funciona: Form1.timer1.enabled:=false; |
Hola.
Con el OnAativate debería funcionar. Compartenos el código que usa para que así pueda ser mas fácil ayudar. |
Hola
// form1 //
var segundos: integer procedure TForm1.FormCreate(Sender: TObject); begin timer1.Enabled:=true; //Ejecuto el timer// end; procedure TForm1.FormShow(Sender: Object); begin segundos:=10; //valor de la variable segundos end; procedure TForm1.Timer1Timer(Sender: TObject); begin segundos:=segundos-1; label1.caption:=IntToStr(segundos); //label donde se muestran los segundos if segundos=0then begin quitavidas; segundos:=10; end; // Form2 // lo he probado en este evento y no lo detiene procedure TForm2.FormActivate(Sender: Object); begin form1.timer1.enabled:=false; end; // Form2 // también lo he probado en este evento y no lo detiene procedure TForm2.FormShow(Sender: Object); begin form1.timer1.enabled:=false; end; |
He probado tu código con el form2.Show y funciona perfectamente.
O falta algo más que no has puesto, y que es el que está interfiriendo en el funcionamiento normal, o de otra forma debería ejecutarse sin problemas Saludos |
Gracias
La verdad que ayer volví a probar y si funciono. No se porque antes no quiso. Gracias por sus respuestas.
|
La franja horaria es GMT +2. Ahora son las 06:21:36. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi