imágenes intermitentes

[miarcod]

Hola, alguien me puede dar una idea de como hacer para que una imageno un botón que aparece en un dialogo tenga un aspecto intermitente.

[Willi Quintana]

Mediante un timer cambiar de BMP al boton cada cierto tiempo:
...
oImag1 := LoadBitMap(GetResources(),"Imagen1")
oImag2 := LoadBitMap(GetResources(),"Imagen2")
n:=2

DEFINE TIMER tImag OF oWnd3 INTERVAL 1000 ACTION (If(n=1, (oBoton:setBmp(oImag1), n= 2), (oBoton:SetBmp(oImag2), n= 1))
ACTIVATE TIMER tImag

..
...
REDEFINE BTNBMP oBoton RESOURCE "Imagen1" ACTION MsgInfo() ID 105 OF oDlg
...
..
(ojo, esta escrito al vuelo.... pero alli va la idea)

Salu2