Friday, January 5, 2007
Tip of the Day: Using Enhanced Calculator in a Dialog Box
Supported Versions:
. R:BASE 7.6 (Build: 7.6.1.30104 or higher)
. R:BASE C/S:I 7.6 (Build: 7.6.1.30104 or higher)
. R:BASE Turbo V-8 (Build: 8.0.14.30104 or higher)
Did you know that you can bring up the enhanced R:BASE
Calculator by simply double-clicking in a DIALOG box?
This newly introduced enhancement also adapts the R:BASE
Themes, if used as an option for the DIALOG command.
Here' how:
-- Example 01:
-- Dialog_With_Popup_As_Calculator_01.RMD
CLS
CLEAR VAR vValueTxt,vValue,vEndKey
SET VAR vValueTxt TEXT = NULL
SET VAR vValue DOUBLE = NULL
DIALOG 'Enter Value or Double-Click for Calculator' +
vValueTxt=26 vEndKey 1 +
CAPTION 'DIALOG with Calculator Pop-up' ICON APP OPTION +
POPUP_ENABLED TRUE +
|POPUP_DIALOG_TYPE CALCULATOR
SET VAR vValue = .vValueTxt
CLEAR VARIABLE vValueTxt,vEndKey
RETURN
-- Example 02:
-- Dialog_With_Popup_As_Calculator_02.rmd
-- Using THEMENAME as Razzmatazz
-- Notice the dialog box and the matching calculator
CLS
CLEAR VAR vValueTxt,vValue,vEndKey
SET VAR vValueTxt TEXT = NULL
SET VAR vValue DOUBLE = NULL
DIALOG 'Enter Value or Double-Click for Calculator' +
vValueTxt=36 vEndKey 1 +
CAPTION 'DIALOG with Calculator Pop-up' ICON APP OPTION +
POPUP_ENABLED TRUE +
|POPUP_DIALOG_TYPE CALCULATOR +
|THEMENAME Razzmatazz
SET VAR vValue = .vValueTxt
CLEAR VARIABLE vValueTxt,vEndKey
RETURN
-- Example 03:
-- Dialog_With_Popup_As_Calculator_02.rmd
-- Using THEMENAME as R:BASE Rocks!
-- Notice the dialog box and the matching calculator
CLS
CLEAR VAR vValueTxt,vValue,vEndKey
SET VAR vValueTxt TEXT = NULL
SET VAR vValue DOUBLE = NULL
DIALOG 'Enter Value or Double-Click for Calculator' +
vValueTxt=30 vEndKey 1 +
CAPTION 'DIALOG with Calculator Pop-up' ICON APP OPTION +
POPUP_ENABLED TRUE +
|POPUP_DIALOG_TYPE CALCULATOR +
|THEMENAME R:BASE Rocks!
SET VAR vValue = .vValueTxt
CLEAR VARIABLE vValueTxt,vEndKey
RETURN
Enjoy and make sure to have fun!
Very Best R:egards,
Razzak.
--- RBASE-L
================================================
TO POST A MESSAGE TO ALL MEMBERS:
Send a plain text email to [email protected]
(Don't use any of these words as your Subject:
INTRO, SUBSCRIBE, UNSUBSCRIBE, SEARCH,
REMOVE, SUSPEND, RESUME, DIGEST, RESEND, HELP)
================================================
TO SEE MESSAGE POSTING GUIDELINES:
Send a plain text email to [email protected]
In the message SUBJECT, put just one word: INTRO
================================================
TO UNSUBSCRIBE:
Send a plain text email to [email protected]
In the message SUBJECT, put just one word: UNSUBSCRIBE
================================================
TO SEARCH ARCHIVES:
Send a plain text email to [email protected]
In the message SUBJECT, put just one word: SEARCH-n
(where n is the number of days). In the message body,
place any
text to search for.
================================================
