
Need URGENT help on Microfocus Netexpress Screen
Quote:
> > Hi there,
> > I am using Microfocus Netexpress 2.0 on windows 95/NT PCs. I ahve a "screen
> > section" to define my screen layout and the screen variables. This is only a
> > TEXT screen -- NOT a GUI.
> > I am not able to do:
> > (1) I want all input fields to be underlined. I can make them reverse-video
> > using Adis BUT underlining is easier on the eyes. HOW???
> When I last attempted this, I too failed. MicroFocus has the best
> screen section I have worked with, but I never could get underline
> support to work. It's not supported for DOS/WINDOWS that I can see.
Various people have pointed out that a Windows console will not support
underline. However, if you run your Micro Focus application as a
graphical app, the text console is emulated by the COBOL Runtime System.
Within this emulation, it *is* possible to have underline support in
addition to the regular VGA set of attributes.
A caveat of this functionality is that you must be careful when using
the CBL_ calls to read/write the screen attributes, as they have a
one-byte-attribute interface which defaults to the VGA attribute byte
and thus do not have underline support. There are CBL_ calls which
will set up custom attributes in the palette if you wish to read/write
them with the CBL_ one-byte-attribute interfaces.
As an example, try running the following program first using
"run prog.int" (Windows console), then "runw prog.int" (RTS emulation).
procedure division.
display "Reverse" at 1010 with reverse-video
display "Underline" at 1110 with underline
.
Cheers, Kev.