Hi David,
I have the same problem with the PAUSE command not centering. I am
running Win98, latest RBWIN version on 1280 x 1024 screen. Like Oma
said- CENTER is not part of the DIALOG command. Your problem #2 I
have never encountered and have no solution. Your last little HELP request
could be resolved by creating a form with individual variables that only take
up one line each. Say you had 5 variables then you can locate them on the
form and change the color of any one or all of them. If you are using a large
text or note field then you can change the color for the entire field. If you
want to change it on-the-fly then you are out of luck. Something like that
may be possible to do in version 7 when it is released.
Best regards,
Mike Young
On Fri, 24 Aug 2001 14:39:12 +0100, David Atkinson wrote:
>I am looking for some help.
>
>R:Base 2000 Win v.6.5 ++ (1.842xRT03)
>Currently development is on a stand-alone machine. Window 98 - Intel
>Celeron
>
>My Control Panel Windows Display Settings are 800 600.
>
>Problem 1
>
>How do I get CENTER CENTER to work as I presume it should.
>Whenever I enter PAUSE or DIALOG 'xxxxx' AT CENTER CENTER,
the box always
>appears in the upper left quadrant of the window. Never anything like
>center center.
>
>Recently upgraded from 6.0A and hoped this would be one of the issues the
>upgrade would resolve, but it hasn't.
>
>Have tried SET RBGSIZE CENTER CENTER 800 600 - no difference.
>Have tried Windows Display set at 1024 768 and SET RBGSIZE - no
difference
>I have to instruct AT 15 30 or whatever, which means testing each
command
>before including it within the command file.
>
>I tired of that over 2 years ago and created the command file below which
>solved the problem.
>The idea came from two unlinked postings, which appeared around that
time.
>One for creating forms for displaying text, the other using the '|'
>character to create 'new lines'.
>I simply combined the two. My thanks once again to the list - 'Taught me
>all I know"
>But it all came about because CENTER CENTER would not do it for me
>
>I first created MESS.CMD - called by... RUN mess.cmd USI 'Hello young
>lovers',1,1
>This worked just fine - centered single line text - but meant running an
>additional command file.
>I then extended this using multiple forms and included '|' to force text
>onto new lines.
>
>Each form has a single variable 'vmessage' drawn as a centralised
>rectangular box.
>The width and height of a box is your choice.
>The form variable is set to black text on yellow background and set to
WRAP.
>The form determines the font to be used.
>A PushButton beneath the variable is set to the predefined EXIT
>
>The variable must be defined before the form is called.
>If you exceed the maximum variable length, RUN another form
>I have several forms each have varying sized centralised boxes.
>
>So - RUN mess.cmd USI '|Hello|Young|||Lovers',8,1
>Calls a form which gives 8 lines of text and the form is centered on the
>screen.
>It places 'Hello' on line 2, 'Young' 1 line below , 'Lovers', appears 3
>lines below that.
>
>--
**************************************************************
**
>-- Mess.rmd - Displays vmessage text on a form
>-- RUN mess.cmd USI 'Hello young lovers',1,1
>-- %1 (vmessage) 'Text to be displayed'
>-- %2 (vbox) Which form size to use
>-- %3 (vcls) IF '1' Clear screen
> --
**************************************************************
**
>--
>SET V vmessage = .%1, vbox = .%2, vcls = .%3
>IF vmessage FAILS THEN
> GOTO Lfin
>ENDIF
>SET V vmessage TEXT = (SRPL(.vmessage,'|',(CHAR(13) + CHAR
(10)),0))
>IF vcls = 1 THEN
> CLS
>ENDIF
>SWITCH (.vbox)
> CASE '1'
> EDI USI messOK1 AT 0,0,800,580
> BREAK
> CASE '2'
> EDI USI messOK2 AT 0,0,800,580
> BREAK
> CASE '4'
> EDI USI messOK4 AT 0,0,800,580
> BREAK
> CASE '6'
> EDI USI messOK6 AT 0,0,800,580
> BREAK
>and so on...
> DEFAULT
> BREAK
>ENDSW
>--
>LABEL Lfin
>CLE V vmessage,vbox,vcls,__-%
>RETURN
>
>I have a similar routine for Dialog
>
>--
**************************************************************
**
>-- DIALOG.CMD - Determine central position for DIALOG boxes
>-- %1 (vdia) = 'Question'
>-- %2 (vdyn) = 'Y' or 'N'
>-- %3 (vdline) = line number
>-- %4 (vdcls) = IF 1 - Clears screen
>-- Example: RUN dialog.cmd USI 'OK to continue ?',Y,13,1
>--
**************************************************************
**
>--
>SET V via TEXT= .%1, vdyn TEXT= .%2, vdline INT= .%3, vdcls INT=
.%4
>IF via FAILS THEN
> RETURN
>ENDIF
>IF vdyn CONT 'Y' THEN
> SET V vyn = 'YES'
>ELSE
> SET V vyn = 'NO'
>ENDIF
>SET V vdlen INT = (SLEN(.via))
>SET V vdpos INT = (((80 - .vdlen)/2) + 5)
>IF vdcls = 1 THEN
> CLS
>ENDIF
>DIA .via vdyn ve .vyn AT .vdline .vdpos
>CLE V %__-%,vdline,vdpos,vdcls,vdyn,via,vdlen
>RETURN
>
>
>My CENTER CENTER workarounds
>
>Problem 2
>This morning - a strange event.
>The top menu option 'Tools' was replaced with '1.R:Base R>Prompt',
>This caused no problems.
>When clicked, all the usual 'Database Designer', 'View Designer',
>'Report...' dropped down
>I exited, rebooted but despite all my attempts, have been unable to
>duplicate it.
>I presume something is corrupt.
>Any considerations before I delete and re-load the R:Base files ?
>
>Finally, OH NO!!
>When displaying a 'Help' message in a form...
>Can the colour of that helpline be changed for more visual impact ?
>
>Thanks in advance - You probably don't realise just what a help you all are.
>
>David Atkinson
>skidbusters.co.uk
>[EMAIL PROTECTED]
>
