For Programmers: Free Programming Magazines  


Home > Archive > Clarion > July 2004 > Blinking text









You are viewing an archived Text-only version of the thread. To view this thread in it's original format and/or if you want to reply to this thread please [click here]

 

Author Blinking text
David Beahan

2004-06-25, 6:50 pm

How would one go about making text 'blinking', 'flashing' or the like.

David Beahan


Andre Engelbrecht

2004-06-25, 6:50 pm

Hello David

Let's say you want ?String1 to contain 'Hello!' to flash every second:

Add a local variable, L:Counter (byte)
Set the timer on the window to 50 (the timer will fire every 50/100th
second)
In the timer embed of that window, add
L:Counter += 1
If L:Counter = 1
?String1{Prop:Text} = 'Hello!'
Elsif L:Counter = 2
?String1{Prop:Text} = ''
L:Counter = 0
End
Display

"David Beahan" <davidb@dbcs.com.au> wrote in message
news:oQrBc.46977$sj4.3237@news-server.bigpond.net.au...
> How would one go about making text 'blinking', 'flashing' or the like.
>
> David Beahan
>
>



Odd Johannesen

2004-06-25, 6:56 pm

Thanks André.

It really works.

Regards

Odd Johannesen
Granli 23
NO- 4550 FARSUND
Norway

oddjoha2@start.no

"Andre Engelbrecht" <fivetalents@telkomsa.net> skrev i melding
news:cb5npn$7gh$1@ctb-nnrp2.saix.net...[color=darkred]
> Hello David
>
> Let's say you want ?String1 to contain 'Hello!' to flash every second:
>
> Add a local variable, L:Counter (byte)
> Set the timer on the window to 50 (the timer will fire every 50/100th
> second)
> In the timer embed of that window, add
> L:Counter += 1
> If L:Counter = 1
> ?String1{Prop:Text} = 'Hello!'
> Elsif L:Counter = 2
> ?String1{Prop:Text} = ''
> L:Counter = 0
> End
> Display
>
> "David Beahan" <davidb@dbcs.com.au> wrote in message
> news:oQrBc.46977$sj4.3237@news-server.bigpond.net.au...



David Beahan

2004-07-02, 3:55 am

Thanks Andre
That gives me exactly what I want.
I did not even know there was a 'timer' function.

David Beahan.

"Andre Engelbrecht" <fivetalents@telkomsa.net> wrote in message
news:cb5npn$7gh$1@ctb-nnrp2.saix.net...
> Hello David
>
> Let's say you want ?String1 to contain 'Hello!' to flash every second:
>
> Add a local variable, L:Counter (byte)
> Set the timer on the window to 50 (the timer will fire every 50/100th
> second)
> In the timer embed of that window, add
> L:Counter += 1
> If L:Counter = 1
> ?String1{Prop:Text} = 'Hello!'
> Elsif L:Counter = 2
> ?String1{Prop:Text} = ''
> L:Counter = 0
> End
> Display
>
> "David Beahan" <davidb@dbcs.com.au> wrote in message
> news:oQrBc.46977$sj4.3237@news-server.bigpond.net.au...
>
>



Sponsored Links







Also available: Server administration forum archive | Web Design forum archive | Software forum archive | Hardware reviews archive

Copyright 2008 codecomments.com