Hi,

you could do something like this:

drop a container onto your form and name it cntMove.
set cntMove.Anchor to 14.
drop a label into this container and name it lblMove
set lblMove.Autosize to .T.
set lblMove.Tag to "moveright" (for YoYo-Scrolling only)
drop a timer into this container and name it tmrMove
set tmrMove.Interval to 20

put the following Code into tmrMove.Timer for ENDLESS-Scrolling


WITH This.Parent.lblMove
.Left = .Left + 1
IF .Left > .Parent.Width
.Left = .Width * (-1)
ENDIF
ENDWITH


put the following code into tmrMove.Timer for YoYo-Scrolling


WITH This.Parent.lblMove

DO CASE
CASE .Tag = [moveleft]
.Left = .Left - 1
IF .Left + .Width < 1
.Tag = [moveright]
ENDIF
CASE .Tag = [moveright]
.Left = .Left + 1
IF .Left > .Parent.Width
.Tag = [moveleft]
ENDIF
ENDCASE

ENDWITH


>Hi everyone,
>
>I want to do something like this.
>
>When we watching a 'Finance News Report' on TV, a Message-bar will running on the bottom of screen.
>To display some information as NY INDEX, HONG KONG HSI,........
>
>How can i do this effect ?
>
>Many thanks