Control Timer

[JoseFco]

"Tolomeo se mudo al Polo Norte"

[[Delphius]]

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]

"Tolomeo se mudo al Polo Norte"

[[coso]]

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]

"Tolomeo se mudo al Polo Norte"

[[coso]]

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

[JoseFco]

"Tolomeo se mudo al Polo Norte"

[[coso]]

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

[JoseFco]

"Tolomeo se mudo al Polo Norte"

[JoseFco]

"Tolomeo se mudo al Polo Norte"

[JoseFco]

"Tolomeo se mudo al Polo Norte"

[[enecumene]]

Empezado por JoseFco

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]

"Tolomeo se mudo al Polo Norte"

[[enecumene]]

Empezado por JoseFco

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.

Saludos.

[JoseFco]

"Tolomeo se mudo al Polo Norte"

[[coso]]

Que chula la form 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]

"Tolomeo se mudo al Polo Norte"

[JoseFco]

"Tolomeo se mudo al Polo Norte"

[[coso]]

falta un 'begin' no?

[JoseFco]

"Tolomeo se mudo al Polo Norte"