FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Printing with black background white foregrond
Posts: 708
Joined: Fri Oct 28, 2005 09:53 AM
Printing with black background white foregrond
Posted: Mon Apr 23, 2012 07:47 PM

Hello,

Can someone provide an example of printing text using DEFINE PRINTER... that prints text in WHITE and background in black (inverted)?

Thank you,

*~*~*~*~*~*~*~*~*~*
Darrell Ortiz
CDM Software Solutions, Inc.
https://www.cdmsoft.com
Posts: 9020
Joined: Thu Oct 06, 2005 08:17 PM
Re: Printing with black background white foregrond
Posted: Mon Apr 23, 2012 09:21 PM
Code (fw): Select all Collapse
#include "Fivewin.ch"


FUNCTION MAIN()

    LOCAL oPrn

    PRINT oPrn PREVIEW
        PAGE
            SETBKCOLOR( oPrn:hDCOut, CLR_BLACK )
            oPrn:Say( 0, 0, "This is a test", , , CLR_WHITE, 2 )
        ENDPAGE
    ENDPRINT

    RETURN NIL


EMG
Posts: 708
Joined: Fri Oct 28, 2005 09:53 AM
Re: Printing with black background white foregrond
Posted: Tue Apr 24, 2012 12:24 AM

Thank you Enrico

*~*~*~*~*~*~*~*~*~*
Darrell Ortiz
CDM Software Solutions, Inc.
https://www.cdmsoft.com

Continue the discussion