Page 1 of 1

TPrinter:Say() text color doesn't reset itself

PostPosted: Fri Mar 24, 2006 1:50 pm
by Enrico Maria Giordano
Is it expected? The second line of text should not be red in my opinion:

Code: Select all  Expand view
#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


EMG

Re: TPrinter:Say() text color doesn't reset itself

PostPosted: Fri Mar 24, 2006 4:04 pm
by E. Bartzokas
Enrico,
It's been that way since 16-bit.
I hope it's not changed because several of my programs use this concept or retaining the last color until changed again.

Just my opinion of course...

Kind regards
Evans

Re: TPrinter:Say() text color doesn't reset itself

PostPosted: Fri Mar 24, 2006 4:35 pm
by Enrico Maria Giordano
Ok, I agree.

EMG