Contar cambios de color en paneles

[edusus]

Hola amigos, lo que quiero lograr es lo siguiente.
Cada vez que cambie el color de un panel disminuya en 1 la cantidad indicada en un Edit. ¿Cómo puedo hacerlo?
Gracias por la ayuda.

[alapaco]

Como haces para cambiarle la propiedad a un TPanel ??

Tal vez hagas: miPanel.Color := clRed;
Si es así en la línea siguiente podes hacer lo que queres, quedaría así:


miPanel.Color := clRed;
miEdit.Text := IntToStr(StrToIntDef(miEdit.Text, -1) - 1);

[edusus]

Mira lo que hice es un pequeño jueguito para mi hija donde un gif animado va recorriendo la pantalla (lo mueve con las teclas up, down, left, right) y cuando toca unos paneles alargados que simulan barreras estos cambian de color (esto lo sé hacer) pero para agregarle emoción al juego , puse un edit con el texto '10' (puntos) y pretendo que le vaya restando un punto cuando cambia de color un panel. El código lo he puesto en un timer pero en este caso una vez que toca un panel comienza a restar de uno en uno indefinidamente.
¿En qué evento de que componente tendría que poner el código?

[[Lepe]]

Según entiendo, no es cuando cambia de color, sino cuando se produce una colisión del gif con un panel. ¿Como controlas las colisiones? quizás ahí sea el mejor momento para decrementar el Tedit.

Si lo tienes todo en un timer, tendrás que ponerle condiciones:

si gif.top + gif.height >= panelX.top then decrementa(edit1)

En este caso estamos comprobando si el gif ha bajado verticalmente y ha tocado sobre un panel que tiene debajo.

Sería bueno saber como creas los paneles y como estan distribuidos los paneles, si es una carretera, un laberinto, etc.

Saludos