RE: Text wrapping question

["Booth Martin" <Booth@xxxxxxxxxxxx>]

Delete ththis part:

 (*DSPATR RI)-

A (*CHAR ' '))

A 1 1'- -
and see the default effect that is offered now.   Its very attractive.
Here's an example:

http://www.martinvt.com/Code_Samples/Scroll_Bar/scroll_bar.html



---------------------------------------------------------
Booth Martin http://www.MartinVT.com
Booth@MartinVT.com
---------------------------------------------------------

-------Original Message-------

From: rpg400-l@midrange.com
Date: Thursday, May 23, 2002 06:16:28 PM
To: 'rpg400-l@midrange.com'
Subject: RE: Text wrapping question

Mike,

I know I'm jumping in late, but you didn't say if this was for a report or
an interactive display. If DSPF, have a look at WRDWRAP. Here's a generic
window I sometimes use for warning messages....

--------------------------------
A R PGWARNING

A WINDOW(10 24 7 30 *NOMSGLIN)

A CA12

A CA03

A WDWBORDER((*COLOR RED) (*DSPATR RI)-

A (*CHAR ' '))

A 1 1'- -
A COLOR(RED)

A 1 9'W A R N I N G'

A COLOR(WHT)

A 1 23'
A COLOR(RED)

A $VWARN 150A B 2 1CNTFLD(030)

A WRDWRAP

A CHGINPDFT

A DSPATR(PR)

--------------------------------

Eric DeLong
Sally Beauty Company
MIS-Sr. Programmer/Analyst
940-898-7863 or ext. 1863