[Lazarus-es] TTimer

[Daniel Cáceres]

Perfecto José, Gracias!

Saludos,
Daniel Cáceres

El 11/10/2012 9:36, Jose Daboin escribió:
> Disculpa, al final no seria =10 en el if o el condicional, seria al 
> llegar a 0cero que se pare el timmer, corrijelo
>
> Aplica lo mismo
>
> var //Variables Globales Del unit
>   a:integer;  //colocas "a" o lo que quieras como integer
>
> En el formcreate o el evento oncreate del formulario como quieres es 
> descontar lo igualas a 10 o lo que quieras
>
> a:=10
>
> y en el timmer// como vas a descontar en vez de sumar restas y cambias 
> los edit por label. Prueba con los dos ejemplos q deje
>
> var b:integer;//variable dentro del timmer
> begin //begin del timer
>   b:=1;
>   a:=a-b;
>   edit3.Text:='';
>   edit3.Text:=IntToStr(a);
>   if a=10 then//para el timer y deja el edit en 1 o 0
>   timer1.Enabled:=false;
>
> El 11 de octubre de 2012 08:03, Jose Daboin <metalbox9000 en gmail.com 
> <mailto:metalbox9000 en gmail.com>> escribió:
>
>     Aplica lo mismo
>
>     var //Variables Globales Del unit
>       a:integer;  //colocas "a" o lo que quieras como integer
>
>     En el formcreate o el evento oncreate del formulario como quieres
>     es descontar lo igualas a 10 o lo que quieras
>
>     a:=10
>
>     y en el timmer// como vas a descontar en vez de sumar restas y
>     cambias los edit por label. Prueba con los dos ejemplos q deje
>
>     var b:integer;//variable dentro del timmer
>     begin //begin del timer
>       b:=1;
>       a:=a-b;
>       edit3.Text:='';
>       edit3.Text:=IntToStr(a);
>       if a=0 then//para el timer y deja el edit en 1 o 0 no lo he probado
>       timer1.Enabled:=false;
>
>
>     El 11 de octubre de 2012 06:25, Daniel Cáceres
>     <daniel en serviceparaguay.com <mailto:daniel en serviceparaguay.com>>
>     escribió:
>
>         Gracias Jose, como no estoy muy metido todavia con Lazarus y
>         Pascal, queria saber si el TTimer tenia alguna propiedad o
>         funcion para mostrar el valor que va tomando,
>         ej. si inicio en 10 segundos, quiero poner un label y que vaya
>         tomando y mostrando esos valores 10, 9, 8, 7... y asi
>
>         Saludos,
>         Daniel C.-
>
>         El 10/10/2012 20:16, Jose Daboin escribió:
>>         Si te entendi lo que quieres es contar el tiempo del timmer
>>
>>         Yo lo haria asi
>>
>>         var //Variable Global
>>           a:integer;
>>
>>         La igualo a cero en el formcreate
>>
>>         y en el timmer
>>
>>         var b:integer;
>>         begin
>>           b:=1;
>>           a:=b+a;
>>           edit3.Text:='';
>>           edit3.Text:=IntToStr(a);
>>           if a=10 then
>>           timer1.Enabled:=false;
>>
>>         No se si eso es lo que quieres
>>
>>         El 10 de octubre de 2012 16:10, Daniel Cáceres
>>         <daniel en serviceparaguay.com
>>         <mailto:daniel en serviceparaguay.com>> escribió:
>>
>>             Buenas, una consulta es posible obtener el valor que va
>>             tomando el TTIMER?
>>
>>             Saludos Cordiales,
>>             Daniel Cáceres
>>
>>             _______________________________________________
>>             Lazarus-es mailing list
>>             Lazarus-es en lists.lazarus.freepascal.org
>>             <mailto:Lazarus-es en lists.lazarus.freepascal.org>
>>             http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>>
>>
>>
>>
>>         -- 
>>         /*Saludos.
>>
>>         Jose Daboin*/
>>
>>
>>
>>         _______________________________________________
>>         Lazarus-es mailing list
>>         Lazarus-es en lists.lazarus.freepascal.org  <mailto:Lazarus-es en lists.lazarus.freepascal.org>
>>         http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>
>
>         _______________________________________________
>         Lazarus-es mailing list
>         Lazarus-es en lists.lazarus.freepascal.org
>         <mailto:Lazarus-es en lists.lazarus.freepascal.org>
>         http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>
>
>
>
>     -- 
>     /*Saludos.
>
>     Jose Daboin*/
>
>
>
>
> -- 
> /*Saludos.
>
> Jose Daboin*/
>
>
>
> _______________________________________________
> Lazarus-es mailing list
> Lazarus-es en lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es

------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20121011/18b07fe0/attachment-0002.html>