NSB.ShowProgress: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
No edit summary |
||
| Line 5: | Line 5: | ||
NSB.SHOWPROGRESS displays ''message'' to the user near the bottom middle of the screen. It can be dismissed or updated at any time by the program. The user can also dismiss it. Use it to provide the user with information during execution without interrupting execution. | NSB.SHOWPROGRESS displays ''message'' to the user near the bottom middle of the screen. It can be dismissed or updated at any time by the program. The user can also dismiss it. Use it to provide the user with information during execution without interrupting execution. | ||
To dismiss an NSB.showProgress message, call it with | To dismiss an NSB.showProgress message, call it with no arguments. | ||
'''Example''' | '''Example''' | ||
<pre> | <pre> | ||
'This sample shows how to use the NSB. | 'This sample shows how to use the NSB.ShowProgress function | ||
'Set a global counter and call updateMessage every quarter second | 'Set a global counter and call updateMessage every quarter second | ||
| Line 23: | Line 23: | ||
Else | Else | ||
'Clear the progress message and stop calling updateMessage | 'Clear the progress message and stop calling updateMessage | ||
NSB.ShowProgress( | NSB.ShowProgress() | ||
ClearInterval(updateMessage) | ClearInterval(updateMessage) | ||
End If | End If | ||
Revision as of 19:25, 30 July 2012
NSB.SHOWPROGRESS(message)
Description
NSB.SHOWPROGRESS displays message to the user near the bottom middle of the screen. It can be dismissed or updated at any time by the program. The user can also dismiss it. Use it to provide the user with information during execution without interrupting execution.
To dismiss an NSB.showProgress message, call it with no arguments.
Example
'This sample shows how to use the NSB.ShowProgress function
'Set a global counter and call updateMessage every quarter second
Dim count=0
SetInterval(updateMessage,250)
Sub updateMessage()
count=count+1
If count<20 Then
'Display the progress message followed by dots
NSB.ShowProgress("Loading" & String(count,"."))
Else
'Clear the progress message and stop calling updateMessage
NSB.ShowProgress()
ClearInterval(updateMessage)
End If
End Sub
Sub custDone(result)
Text2.value=result
End Sub
Output
(depends on use. See nsbShowProgress sample)
Related Items