Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Control Timer (https://www.clubdelphi.com/foros/showthread.php?t=58217)

JoseFco 12-07-2008 16:37:41

Control Timer
 
"Tolomeo se mudo al Polo Norte"

Delphius 12-07-2008 17:00:45

Hola JoseFco,
Yo diría que se sobra un Timer. Tranquilamente se puede hacer con uno sólo.

La idea es cambiar el color a cada cierto tiempo, no necesariamente iguales ¿no?
Lo que yo haría es que en el evento OnTimer se disponga de una sentencia condicional y en base a ello se tome tanto el tiempo y se cambie el color.
El truco está en tener una variable bandera que nos determine si hacer una y otra cosa:
Código Delphi [-]
if EsRojo
   then begin
          shape.Brush.Color := clRed
          // tomamos el tiempo para el del otro color
          Timer1.interval := ...
          end
   else begin
         shape.Brush.Color := ...
         // tomamemos el tiempo para el color rojo
        Timer1.interval := ....
        end;

// cambiamos la condición:
EsRojo := NOT EsRojo;

¿Se entiende la idea?

Saludos,

JoseFco 12-07-2008 17:14:59

"Tolomeo se mudo al Polo Norte"

coso 12-07-2008 17:15:26

o bien...
Código Delphi [-]
procedure TForm1.Timer1Timer(Sender: TObject);
begin
        if Shape1.Brush.Color = clRed then 
        Shape1.Brush.Color := clGreen else
        Shape1.Brush.Color := clRed;
end;

JoseFco 12-07-2008 17:38:28

"Tolomeo se mudo al Polo Norte"

coso 12-07-2008 17:40:31

personalmente, uso .ini's para grabar este tipo de datos... lo correcto y lo que se aconseja, por eso, es el registro. Saludos.

JoseFco 12-07-2008 17:52:21

"Tolomeo se mudo al Polo Norte"

coso 12-07-2008 17:53:53

no hay ningun problema, ten en cuenta que tansolo es un archivo de texto

JoseFco 13-07-2008 00:44:16

"Tolomeo se mudo al Polo Norte"

JoseFco 13-07-2008 00:52:06

"Tolomeo se mudo al Polo Norte"

JoseFco 13-07-2008 02:20:22

"Tolomeo se mudo al Polo Norte"

enecumene 13-07-2008 02:33:43

Cita:

Empezado por JoseFco (Mensaje 299893)
Aqui esta la foto del hardware:




Le faltan algunos componentes.;)

Un Saludo

¡que bien le queda esas placas amigo!, Yo que sueño un día poder armar un placa bien hecha. :(

Saludos.

JoseFco 13-07-2008 02:42:21

"Tolomeo se mudo al Polo Norte"

enecumene 13-07-2008 02:47:39

Cita:

Empezado por JoseFco (Mensaje 299928)
Eso no esta muy lejos amigo, con un buen programa para el diseño y luego un buen lugar donde mandar a hacer el pcb.La gente que me hace los pcb ellos te dan el programa gratis y no es dificil de usar.Solo tener en cuenta las medidas de los componentes y un buen electronic digital caliper.Cuando quieras te paso la url para que te bajes el programita y practiques.

Un Saludo.

Vale, yo usaba unos programas llamados EaglePCB, FreePCB, Orcad y Protel, esos dos últimos demasiado avanzados para mí, el problema de esos programas es que no siempre están todos los componentes y debo crearlos, una vez hice una placa con acido ferrico, me quedó chulo pero nunca me llegó a funcionar, pero que se le puede hacer. :D

Saludos.

JoseFco 13-07-2008 02:57:38

"Tolomeo se mudo al Polo Norte"

coso 13-07-2008 12:07:30

Que chula la form :cool: tengo q cambiar un poco el estilo de mis programas...:) No, no hace falta crear otro, tansolo cambia las claves (por ejemplo, ini.writeinteger('vrnum','vrnum1',vrnum1);

PD: desactivar en inglés es disable, no desable

JoseFco 13-07-2008 14:46:16

"Tolomeo se mudo al Polo Norte"

JoseFco 13-07-2008 17:14:50

"Tolomeo se mudo al Polo Norte"

coso 13-07-2008 17:16:31

falta un 'begin' no?

JoseFco 13-07-2008 17:22:42

"Tolomeo se mudo al Polo Norte"


La franja horaria es GMT +2. Ahora son las 13:36:36.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi