FiveTech Software tech support forums

... a la Class TRcolum (RColum.prg), en los metodos SayTitle y SayData. Si te fijas bien, en el metodo SayData está esta linea: //nWidth := ::oReport:oDevice:GetTextWidth(cText, oFont) // To Review: Why is this line here? No lo he probado, pero que tal si modificas el metodo SayTitle: ... ... ::nCurLine ...

... PrintPage() CLASS TPreview local hMeta := ::oMeta1:hMeta local oDlg, oRad, oPageIni, oPageEnd local nOption := 1, nFirst := 1, nLast := Len( ::oDevice:aMeta ) // DEVICE local oThis := Self local lCancel := .t. if nLast != 1 DEFINE DIALOG oDlg SIZE 400, 183 TITLE FWString( "Printing" ...

... RESOURCE> <cResName> ] ; [ <toPrint: TO PRINTER> ] ; [ <toScreen: PREVIEW> ] ; [ TO FILE <(toFile)> ] ; [ TO DEVICE <oDevice> ] ; [ CAPTION <cName> ]

To all,

since I use the most current version of FW I get randomly white pages in oReport.
As a workaround I shorted the page height in the new method.
Does someone else notice this behavior.
Best regards,
otto


new - method

::nHeight := ::oDevice:nVertRes() - 60 //OTTO

can I determine if the report is landscape or Portrait ?
I saw there is not the variable logic as lportrait or lLandscape
Any Idea ?
I must change a text if the ::odevice if landscape

... PRINTDIALOG IIF( lPreview, .F., .F. )  Although I pass cPrinter rPreview for me is always printing to the standard printer. Somehow oDevice:hDC is the hDC from the standard printer. As a quick solution to go ahead with our yearly updates I use this fix. Best regards, Otto METHOD ...

A ver,

Esto no puede funcionar bien:

::oImageListPages:Add( aBmp[n] )

Porque se espera un objeto bitmap

Sigo sin ver la relación con el oDevice que ya no se destruye en el VALID, y menos con el brush :-S

I tried with oPrn and it make error

oPrn:oDevice:lPrvModal := .T.
oPrn:oDevice:SetPage(9)

then I tried with

oPrn:lPrvModal := .T. also with .f.
oPrn:SetPage(9)

but the dialog is allways on desktop

... una impresora concreta : una brother hl-5350Dn . El problema esta aquí ( en mi caso , codigo en rprinter.prg )          //  nAspect        := ::oDevice:nHorzSize() / ::oDevice:nVertSize()  No sé si es un bug pero a mi no me detecta bien los valores ::odevice:nVertSize() , ::oDevice:nHorzSize() ...

... LPB300: 7 lineas (impresora Laser) Epson LX300+: 8 lineas (impresora matricial) La relacion del valor de nLogPixY por impresora (obtenido con oRpt:oDevice:nLogPixelY()) es: PDFCreator: 600 (estandar definido por windows) Canon IP1700: 600 (estandar definido por windows) Canon LPB300: 600 (estandar ...

Saludos

Inicio con el uso de la clase treport

Tengo la duda de como cambiar tanto los tamaños de la hoja (impresion) como la orientacion de la hoja, de vertical a horizontal.


Resvisando el report.prg, me encuentro esto solamente:

::oDevice:SetLandScape()

Gracias.

... esta definido el bInit, que debo hacer para que mi exportacion a excel desde el preview funcione. Modifico la clase rpreview: function RPreview( oDevice, oReport ) local oPreview := TPreview():New( oDevice ) oPreview:oReport := oReport oPreview:oReport:bInit:={||.t.} // AGREGO ESTA LINEA Y ME ...

... function should also inserted a sysrefresh(). Then i can produce hundreds of pages without Problems! 2. In FWSavePreviwToPDF() before returning oDevice:end() BUT only, when not called from TPreview as the preview deletes the EMFs!!

Linares,

¿Qué significa el nuevo parámetro: oReport en el fwh13.12 rPreview?

METHOD New (oDevice, oReport)

Code: Select all  Expand view

function RPreview( oDevice, oReport )

   local oPreview := TPreview():New( oDevice, oReport )

   oDevice:oPreview := oPreview

   oPreview:Activate()

return nil
 

Linares,

What does oReport in rpreview to the fwh13.12?

METHOD New (oDevice, oReport)

Code: Select all  Expand view

function RPreview( oDevice, oReport )

   local oPreview := TPreview():New( oDevice, oReport )

   oDevice:oPreview := oPreview

   oPreview:Activate()

return nil