бегущая строка , слева направо а как сделать наоборот ?

[НиколайП]

как заставить эту строку двигаться справо на лево?

Private Sub Timer1_Timer()

If lblRunStr.left > Me.Width Then lblRunStr.left = -lblRunStr.Width
lblRunStr.Move lblRunStr.left + 80, lblRunStr.top
End Sub

меняя параметр lblRunStr.left + 80 на lblRunStr.left -80 строка двигается справо на лево но дойдя до левого края формы больше не повторяется ...., а надо что бы повторялось бесконечно.

[Amed]

Private Sub Timer1_Timer()

If lblRunStr.left < -lblRunStr.Width Then lblRunStr.left = me.width +lblRunStr.Width
lblRunStr.Move lblRunStr.left - 80, lblRunStr.top
End Sub

[НиколайП]

Спасибо !

[НиколайП]

а кстати, можно как нибудь убрать мерцание строки ?

[DirectXManiac]

Это врядле!
Есть специальный контрол.Там текст по буквам выписываеться.Движеться в разные стороны.Только так, а на счёт Labela незанаю!

[keks-n]

Подключать Direct Draw 4 (уж 4-ые иксы веде есть) и делать через него

[Matew]

А если через TextOut делать?

[alibek]

Лучше TextOut в сочетании со ScrollDC, тогда скроллинг очень гладким будет. Только TextOut, естественно, надо в буфер выводить (DC в памяти).