babuhari123
Visitor
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
04-27-2012
10:53 PM
How to ShowbusyAnimation?
Hi ,
Can any one tell me how to display ShowBusyAnimation when screen is loading
my problem is when ian requesting server url to load poasterscreen for next page in pagination its taking time to load new data for that i need to disply busy animation in between time how can we do
please tell me............
Thanks in advance
Can any one tell me how to display ShowBusyAnimation when screen is loading
my problem is when ian requesting server url to load poasterscreen for next page in pagination its taking time to load new data for that i need to disply busy animation in between time how can we do
please tell me............
Thanks in advance
3 REPLIES 3
destruk
Streaming Star
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
04-28-2012
10:30 AM
Re: How to ShowbusyAnimation?
busydialog=CreateObject("roOneLineDialog")
busydialog.SetMessagePort(screen.GetmessagePort())
busydialog.SetTitle("All I do is think and blink.") 'credit from "I dream of Jeannie"
busydialog.ShowBusyAnimation()
busydialog.Show()
When you're done, use busydialog.Close()
If you are wanting to close the busy animation in a different routine, such as a secondary poster screen, the reference needs to be passed to it - for example -
sub....routine....code...
...blah.blah.blah...
busydialog=CreateObject("roOneLineDialog")
busydialog.SetMessagePort(screen.GetmessagePort())
busydialog.SetTitle("All I do is think and blink.") 'credit from "I dream of Jeannie"
busydialog.ShowBusyAnimation()
busydialog.Show()
ShowPosterScreen2(busydialog)
...rest of current subroutine code...
...end sub
Sub ShowPosterScreen2(busydialog=invalid) 'sets default value to invalid, which allows you to call the routine without the busydialog object required
If type(busydialog<>"Invalid") Then busydialog.close() ' best to stick this line in after the new content parsing is complete.
...sub code here...
End Sub
babuhari123
Visitor
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
04-30-2012
02:00 AM
Re: How to ShowbusyAnimation?
Hi thanks for reply
but can u explain clearly how to use it that snippet posted you . i am Anabel to understand that code
Please..
but can u explain clearly how to use it that snippet posted you . i am Anabel to understand that code
Please..
destruk
Streaming Star
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
04-30-2012
08:05 PM
Re: How to ShowbusyAnimation?
When you type this in does anything happen for you?
busydialog=CreateObject("roOneLineDialog") ' creates a dialog box
busydialog.SetMessagePort(screen.GetmessagePort()) 'sets a message port for the dialog box
busydialog.SetTitle("All I do is think and blink.") 'displays a line of text for the dialog box title
busydialog.ShowBusyAnimation() ' enables a spinning animation
busydialog.Show() ' makes the dialog box and busy animation display
busydialog.Close() ' makes the busy animation and dialog box 'go away'
I don't understand how to make it any more clearer. 🙂
You probably don't need a message port, since you're not monitoring any messages for it. And the title can be left blank too if you just want the spinning animation and nothing else.
busydialog=CreateObject("roOneLineDialog") ' creates a dialog box
busydialog.ShowBusyAnimation() ' enables a spinning animation
busydialog.Show() ' makes the dialog box and busy animation display
That should be the minimalist approach.
busydialog=CreateObject("roOneLineDialog") ' creates a dialog box
busydialog.SetMessagePort(screen.GetmessagePort()) 'sets a message port for the dialog box
busydialog.SetTitle("All I do is think and blink.") 'displays a line of text for the dialog box title
busydialog.ShowBusyAnimation() ' enables a spinning animation
busydialog.Show() ' makes the dialog box and busy animation display
busydialog.Close() ' makes the busy animation and dialog box 'go away'
I don't understand how to make it any more clearer. 🙂
You probably don't need a message port, since you're not monitoring any messages for it. And the title can be left blank too if you just want the spinning animation and nothing else.
busydialog=CreateObject("roOneLineDialog") ' creates a dialog box
busydialog.ShowBusyAnimation() ' enables a spinning animation
busydialog.Show() ' makes the dialog box and busy animation display
That should be the minimalist approach.