printing in color

[fagg]

I am a non professional fivetech user
I program the print jobs with ' print oprn...'
How can I print fonts in colors??
Thanks for any help
José Deschutter, Belgium

[Antonio Linares]

Jose,

Class TPrinter Method Say() supports the use of colors:

Code: Select all | Expand

METHOD Say( nRow, nCol, cText, oFont,;
        nWidth, nClrText, nBkMode, nPad ) CLASS TPrinter

where nClrText is the desired color to use:

oPrinter:Say( 2, 2, "Hello world", oFont, 100, CLR_RED )

There are some predefined colors CLR_... or you can specify the one that you want using:
nRGB( nRedValue, nGreenValue, nBlueValue )
i.e.:
nRGB( 128, 100, 50 )