Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

scroll

0 views
Skip to first unread message

D.Moore

unread,
Mar 1, 2003, 5:27:31 PM3/1/03
to
Hi !

Do somebody has a simple code to scroll a text vertically with a given speed
? NOT a bmp, but a normal text.

A BIG Thank you in advance,

Moore

Remy Lebeau (TeamB)

unread,
Mar 1, 2003, 5:41:01 PM3/1/03
to
Can you be a little more specific please? What kind of text? What control
displays it? All TwinControl-derived controls have a ScrollBy() method,
simply call that in a loop that also calls Sleep(), or in a TTimer, to
control the speed.


Gambit

"D.Moore" <coo...@freemail.hu> wrote in message
news:3e61...@newsgroups.borland.com...

D.Moore

unread,
Mar 1, 2003, 5:54:54 PM3/1/03
to
Certainly,

I had tried to use ScrollBy() and also a bit more complicated solution like
:

SendMessage(Memo1->Handle, EM_LINESCROLL, 0, 1);

But how can I LOOP the same text, like continue vertical text scroll ?
Simple text like :

Hello world !
I am scroll box,
I am scrolling great texts, and so on....

ALL THE BEST,

Moore


"Remy Lebeau (TeamB)" <gamb...@yahoo.com> wrote in message
news:3e6134f3$2...@newsgroups.borland.com...

Remy Lebeau (TeamB)

unread,
Mar 2, 2003, 12:05:07 AM3/2/03
to
What does your actual code loop like that didn't work for you? You should
be able to just keep continuously calling ScrollBy() over and over.


Gambit

"D.Moore" <coo...@freemail.hu> wrote in message

news:3e613a3e$1...@newsgroups.borland.com...

D.Moore

unread,
Mar 2, 2003, 6:49:36 PM3/2/03
to
Ok, here it is :

I had placed a Memo1 on a Form1. I had placed a Timer1, also

When OnTimer even fire, this code became active :

//---------------------------------
Memo1->ScrollBy(0,-3);
//---------------------------------

Simply, scrolling vertically up the text is in the memo.

BUT after the text dissapear because it had been scrolled out, it wont come
back on the bottom edge of the Memo1, to scroll up again, like a LOOP.

I tried to explain it clearly, I hope it was successfull, due to my english.

A BIG thank you in advance,

Moore.


"Remy Lebeau (TeamB)" <gamb...@yahoo.com> wrote in message

news:3e618ef9$1...@newsgroups.borland.com...

0 new messages