Friday, May 11, 2007

Tip of the Day: Using New GAUGE Options for PAUSE Command

Supported Versions:

. R:BASE 7.6 for Windows (Build: 7.6.1.30504 or higher)
. R:BASE C/S:I 7.6 for Windows (Build: 7.6.1.30504 or higher)
. R:BASE Turbo V-8 for Windows (Build: 8.0.15.30504 or higher)

If you are running a routine and don't know exactly how long
it is going to take, now you may use the new GAUGE options
to display a cooooool gauge with custom theme and colors.

Here's how:

Example 01:
http://www.rbase.com/rbg76/PAUSE3_GAUGE_Razzmatazz.jpg

-- Start here
CLS
PAUSE 3 USING 'Calculating ... Please Stand By ...' +
CAPTION ' Pause 3 with Gauge ' ICON APP +
OPTION GAUGE_VISIBLE ON +
|GAUGE_COLOR [R218,G228,B246] +
|GAUGE_INTERVAL 10 +
|MESSAGE_FONT_NAME VERDANA +
|MESSAGE_FONT_SIZE 10 +
|MESSAGE_FONT_COLOR BLUE +
|THEMENAME Razzmatazz
 -- Put your code, that takes a lot of time, here ...
 -- Use CLS command to clear the PAUSE 3 with gauge
RETURN
-- End here

Example 02:
http://www.rbase.com/rbg76/PAUSE3_GAUGE_RBASERocks!.jpg

-- Start here
CLS
PAUSE 3 USING 'Calculating ... Please Stand By ...' +
CAPTION ' Pause 3 with Gauge ' ICON APP +
OPTION GAUGE_VISIBLE ON +
|GAUGE_COLOR 2708091 +
|GAUGE_INTERVAL 10 +
|MESSAGE_FONT_NAME VERDANA +
|MESSAGE_FONT_SIZE 10 +
|MESSAGE_FONT_COLOR RED +
|THEMENAME R:BASE Rocks!
 -- Put your code, that takes a lot of time, here ...
 -- Use CLS command to clear the PAUSE 3 with gauge
RETURN
-- End here

Example 03:
http://www.rbase.com/rbg76/PAUSE3_GAUGE_SteelBlue.jpg

-- Start here
CLS
PAUSE 3 USING 'Calculating ... Please Stand By ...' +
CAPTION '                    Pause 3 with Gauge ' +
ICON WINDOWS +
OPTION GAUGE_VISIBLE ON +
|GAUGE_COLOR RED +
|GAUGE_INTERVAL 10 +
|MESSAGE_FONT_NAME VERDANA +
|MESSAGE_FONT_SIZE 10 +
|MESSAGE_FONT_COLOR WHITE +
|THEMENAME Steel Blue
 -- Put your code, that takes a lot of time, here ...
 -- Use CLS command to clear the PAUSE 3 with gauge
RETURN
-- End here

Have fun implementing GAUGE options in your R:BASE 7.6
and Turbo V-8 applications!

Very Best R:egards,

Razzak.

Reply via email to