Try This:
IF (Chkfunc('MessageBox')) = 0 THEN
-- MsgTYPE , Caption text, MsgString, WndHandle of Parent
STDCALL Function 'MessageBoxA' alias 'MessageBox' +
(INTEGER, PTR TEXT (128), PTR TEXT, INTEGER ) : INTEGER
ENDIF
SET VAR vCaption TEXT = 'Test Message Box Caption With An Impossibly Long
Caption That Runs Almost All Across The Screen'
SET VAR vMsg TEXT = ('ShortMessage')
SET VAR viRes = (DLCALL('User32', 'MessageBoxA', 49, vCaption, vMsg, 0))
RETURN
----- Original Message -----
From: "Bruce A. Chitiea" <[email protected]>
To: "RBASE-L Mailing List" <[email protected]>
Sent: Wednesday, May 29, 2013 11:46 AM
Subject: [RBASE-L] - Pause Command: Window Width
:
:
: All:
:
:
:
: Rbase e9.5(64) su
:
: Win 7 pro
:
:
:
: The following representative PAUSE command:
:
:
:
: PAUSE 2 USING 'Blah Blah' +
:
: CAPTION 'Who writes captions this long??'
:
:
:
: .sizes the PAUSE window for the short message, truncating the caption.
:
:
:
: The same message with the width parameter:
:
:
:
: PAUSE 2 USING 'Blah Blah' =50 +
:
: CAPTION 'Who writes captions this long??'
:
:
:
: .produces the same result, if for no other reason than that there's
nothing
: to wrap.
:
:
:
: No difference if the message and caption are fed through variables.
:
:
:
: Thoughts?
:
:
:
: Bruce Chitiea
:
: SafeSectors, Inc.
:
: eCondoMetrics
:
:
