TPrinter:Say() text color doesn't reset itself
Posted: Fri Mar 24, 2006 1:50 pm
Is it expected? The second line of text should not be red in my opinion:
EMG
Code: Select all
#include "Fivewin.ch"
FUNCTION MAIN()
LOCAL oPrn, oFnt
PRINT oPrn PREVIEW
DEFINE FONT oFnt NAME "Arial" SIZE 0, -12 OF oPrn
PAGE
oPrn:Say( 100, 100, "This is a test", oFnt, , CLR_HRED )
oPrn:Say( 500, 100, "This is a test", oFnt )
ENDPAGE
ENDPRINT
RELEASE FONT oFnt
RETURN NIL