Question about TPrinter?

Question about TPrinter?

Postby JC » Wed Mar 26, 2008 6:34 pm

Hi my friends.... I have a new question for us!

When I'm preview a report.... with this configurations, I get the following images of a preview window under...

PS.: The square in the report should be occupying the whole area of the paper (A4)

The configurations ( the code is incomplete, but this the same ):
Code: Select all  Expand view  RUN
oReport := PrintBegin( "Print Doc", .T., .T., , .T., .T. )

oReport:setFont(  )
oReport:SetSize( 800, 600 )
oReport:SetPage( 9 ) // A4 210 x 297 mm

IF EMPTY( oReport:hDC )
   MsgStop( "Printer is not avaiable!", "Attention!" )
   RETURN .F.
ENDIF

oPen:= TPen():New( , , , oReport )

oReport:StartPage()
nLinha := 0

oReport:Box( nLinha, 0, nMaximaLinha, 1810, oPen )

nLinha += 5
oReport:Say( nLinha, 10, "sample", TFont():New( "Arial", 20, 40,, .T. ), , CLR_BLACK, , , )

nLinha += 50
oReport:Box( nLinha, 12, nMaximaLinha - 15, 1800, oPen )

oReport:EndPage()

printEnd()


Image when a preview dialog is started:
Image

Image when I'm click on Zoom factor:
Image


Why this visualization is so small???

Thanks for all!!
Last edited by JC on Wed Mar 26, 2008 7:46 pm, edited 1 time in total.
Peace and lighting!

Júlio César M. Ferreira

FWH 8.10 / xHB 1.1.0 / xDevStudio 0.72 / Pelles C 5.0.1 / SQLLIB 1.9
User avatar
JC
 
Posts: 445
Joined: Thu Feb 21, 2008 11:58 am
Location: Brazil

Postby Kleyber » Wed Mar 26, 2008 7:33 pm

JC,

What if you cut the line:

oReport:SetSize( 800, 600 )

?


Regards,
Kleyber Derick

FWH / xHb / xDevStudio / SQLLIB
User avatar
Kleyber
 
Posts: 581
Joined: Tue Oct 11, 2005 11:28 am
Location: São Luiz, Brasil

Postby JC » Wed Mar 26, 2008 8:16 pm

Kleyber wrote:JC,

What if you cut the line:

oReport:SetSize( 800, 600 )

?


Regards,


Olá Kleyber... vc é de Slz? Sou de recife, podemos conversar em português ;)

Se vc achar interessante, adicione meu email para conversarmos via MSN tb!
Abraço!

PS.: Tenho família aí em Slz, em Vila dos Nobres!
Peace and lighting!

Júlio César M. Ferreira

FWH 8.10 / xHB 1.1.0 / xDevStudio 0.72 / Pelles C 5.0.1 / SQLLIB 1.9
User avatar
JC
 
Posts: 445
Joined: Thu Feb 21, 2008 11:58 am
Location: Brazil

Postby Kleyber » Wed Mar 26, 2008 8:26 pm

Blz,meu amigo. adicione ai: kleyberderick@hotmail.com

Abraços / Regards,
Kleyber Derick

FWH / xHb / xDevStudio / SQLLIB
User avatar
Kleyber
 
Posts: 581
Joined: Tue Oct 11, 2005 11:28 am
Location: São Luiz, Brasil


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 75 guests