FoxPro/Visual FoxPro - Label

Como hago para que un label titile
en dos habia un comando en color que se le ponia un paramegtro i titilaba la palabra que le indicaba puedo hacer eso con un label o como hago para poner una palabra que titele

http://support.microsoft.com/kb/140292

DEFINE CLASS cntlblblink AS container
WIDTH = 194
HEIGHT = 48
NAME = "lblblink"

ADD OBJECT label AS label WITH ;
LEFT = 1, ;
TOP = 2, ;
NAME = "lblBase"

ADD OBJECT timer AS timer WITH ;
TOP = 1, ;
LEFT = 168, ;
NAME = "Tmrbase"

PROCEDURE tmrbase.TIMER
WITH THIS.PARENT.lblbase
.VISIBLE = !.VISIBLE
ENDWITH
ENDPROC
ENDDEFINE


Suerte

Te recomiendo la herramienta Timer, y utiliza la opcion Interval.

En el Load del Form crea una variable publica y en el evento Timer del Timer utiliza un codigo similar a este:

Evento Load del Form:

x=0

Evento Timer de la herramienta Timer:

If x=50
Thisform.label1.Caption="Sistemas Activo"
endif
If x=100
Thisform.label1.caption="Ingrese Datos"
endif

Suerte