Hi Itamar,
Exactly which compiler did you use here?
In UNICODE builds you have to use Set( _SET_CODEPAGE )
to set the CP you use in your app probably.
Maybe other will have better suggestions.
Brgds,
Viktor
On 2009 Oct 17, at 17:04, Itamar Lins wrote:
Hi!
Function Test_Charset
oPrn := win_prn():New(GetDefaultPrinter())
oPrn :LandScape := .f.
oPrn :Copies := 1
if !oPrn:Create()
MsgStop("Fail...")
return nil
endif
if !oPrn:StartDoc("Print...")
MsgStop("Error...")
return nil
else
oPrn:CharSet(255)
oPrn:setfont('Lucida Console',,11,,,,255)
endif
oPrn:TextOut
('ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
»',.t.)
oPrn:EndDoc()
Before run ok show =======, now show wrong results
'ÍÍÍÍÍÍÍÍÍ' in paper of
print.
Best regards,
Itamar M. Lins Jr.
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour