Printing with black background white foregrond

Printing with black background white foregrond

Postby cdmmaui » Mon Apr 23, 2012 7: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
User avatar
cdmmaui
 
Posts: 689
Joined: Fri Oct 28, 2005 9:53 am
Location: Houston ∙ Chicago ∙ Los Angeles ∙ Miami ∙ London ∙ Hong Kong

Re: Printing with black background white foregrond

Postby Enrico Maria Giordano » Mon Apr 23, 2012 9:21 pm

Code: Select all  Expand view
#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
User avatar
Enrico Maria Giordano
 
Posts: 8713
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: Printing with black background white foregrond

Postby cdmmaui » Tue Apr 24, 2012 12:24 am

Thank you Enrico
*~*~*~*~*~*~*~*~*~*
Darrell Ortiz
CDM Software Solutions, Inc.
https://www.cdmsoft.com
User avatar
cdmmaui
 
Posts: 689
Joined: Fri Oct 28, 2005 9:53 am
Location: Houston ∙ Chicago ∙ Los Angeles ∙ Miami ∙ London ∙ Hong Kong


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 100 guests