Description
Opens the wait dialog with a specified title and display a specified message
Syntax
call DBWShell("WaitDialogOpen Title Message [Xleft, Ytop, Xsize, Ysize]")
Parameters
Title |
It is the title for the dialog box |
|---|---|
Message |
It is the message to display |
Xleft |
Optional. Left coordinate for progress bar |
Ytop |
Optional. Top coordinate for progress bar |
Xsize |
Optional. Progress bar width |
Ysize |
Optional. Progress bar height |
Remarks
When coordinates parameters are specified, a compat dialog is shown instead of the common one.
No Title or message are dispalyed in compact dialog.
See also
WaitDialogClose
WaitDialogSetMessage
WaitDialogOpen
WaitDialogPoll
Example
...
'get the totalCount number of records to read
...
actionCanceled = false
recCount = 0
DBWShell("WaitDialogOpen " & replace("Local Checkout Mode Database Synchronization"," ","|") & " " & replace("Synchronization in progress ..."," ","|") )
While recset.EOF = false and actionCanceled = false
= recset.Fields(0).Value
= recset.Fields(1).Value
...
DBWShell("WaitDialogPoll " & Clng((recCount*100)/totalCount) )
actionCanceled = DBWResult("@CANCELED")
DBWShell("WaitDialogSetMessage " & replace("Reading record #" & recCount," ","|"))
recCount = recCount+1
recSet.MoveNext
Wend
DBWShell("WaitDialogClose")
...
Example2
Here below it is the call for a compact dialog
...
DBWShell("WaitDialogOpen " & replace("Test"," ","|") & " " & replace("Test in progress ..."," ","|") & " 500,300,600,30" )
...