FiveTech Software tech support forums

... 0 ( rango de -255 a 255 ) :nContrast init 0 ( rango de -100 a 100 ) :nAlpha init 255 ( rango de 0 a 255 ) :nBlur init 0 ( rango 0 y superiores ) :lGray init .F. ( .T. o .F. ) * Generación de PDF: Hasta la versión anterior, los pdf generados mediante Harupdf y Microsoft Word, mostraban las imágenes ...

... init 0 ( range -255 to 255 ) :nContrast init 0 ( range -100 to 100 ) :nAlpha init 255 ( range 0 to 255 ) :nBlur init 0 ( range 0 and above ) :lGray init .F. ( .T. or .F. ) * PDF generation: Till previous version, PDFs generated using harupdf and msword, were displaying images printed with ...

Marc, when I use: :lFastDraw := .T. without AUTOFIT(), it causes a SIDE EFFECT on XBROWSE() that does not look good commercially. Could you, just for the sake of testing uncomment ALL items that have to do with the looks ? like oLbx:nClrPane := { || IIF( ( oLbx:cAlias )->( OrdKeyNo() ) %2 == 0, ...

... => PRNIMAGE( 409 ) I cal this method with oPrn:PrintImage( nRow,nCol,cImage,nWidth,nBottom,; lStretch, nAlpha, lTransp, lGray,; cUnits, cAlign) where is the error ?

use this oPrn:PrintImage( nTop, nLeft,cFile,nRight,nBottom, lStretch, nAlpha, lTransp, lGray ) see on email Hi Silvio, it's still the same error. The image position is different with PRINT oPrn NAME "prv_test" PREVIEW and PRINT oPrn NAME "prv_test" ...

use this oPrn:PrintImage( nTop, nLeft,cFile,nRight,nBottom, lStretch, nAlpha, lTransp, lGray ) see on email Hi Silvio, it's still the same error. The image position is different with PRINT oPrn NAME "prv_test" PREVIEW and PRINT oPrn NAME "prv_test" ...

use this
oPrn:PrintImage( nTop, nLeft,cFile,nRight,nBottom, lStretch, nAlpha, lTransp, lGray )

see on email

... be treated as deprecated for future development. Syntax: METHOD PrintImage( nRow, nCol, uImage, nWidth, nHeight, lStretch, nAlpha, lTransp, lGray, cUnits, cAlign, cURL )  FWPdf ignores nAlpha, lTransp and lGray TPrinter ignores cURL 1,2,4,5) nRow, nCol, nWidth, nHeight specify the ...

... Optional. Set to .T. to read as GDIP Image. * Drawing Images: Method oWnd:DrawImage( uImage, [aRect], [lTransp := .t.], [nResizeMode], [lnAlpha], [lGray], [cAlign], [aColorMap] ) --> nLastRow function FW_DrawImage( oWnd/hDC, uImage, <other params same as above> ) oWnd can be any window, ...

... to english. With the used < Units > it works perfect now. PrintImage( nRow, nCol, uImage, nWidth, nHeight, lStretch, nAlpha, lTransp, lGray, cUnits ) I'm working on some more functions like 1. selecting any DBF and define the fields to be printed ( for the moment customer.dbf is used ...

... < units > added to METHOD PrintImage in release FWH 16.4 METHOD PrintImage( nRow, nCol, uImage, nWidth, nHeight, lStretch, nAlpha, lTransp, lGray, cUnits ) CLASS TPrinter => PIXEL,MM,CM,INCHES that makes the image-painting easy, using the same center-vars from the textpositions. The calculations ...

... Left = 0.5 * A4-height aCoord1 := oPRINT:Cmtr2Pix( @nRow, @nCol ) // PrintImage( nRow, nCol, uImage, nWidth, nHeight, lStretch, nAlpha, lTransp, lGray ) oPRINT:PrintImage( nRow - nImgSize / 2, nCol - nImgSize / 2, c_Pfad1 + "Test.bmp", nImgSize, nImgSize, .T.) regards Uwe :D

FWH 16.03: Please use the method:

PrintImage( nRow, nCol, cImage, nWidth, nHeight, lStretch, nAlpha, lTransp, lGray ) // All units in pixels

Ex:
oPrn:PrintImage( 100,100, "c:\fwh\bitmaps\olga1.jpg", 5000,7000 )

... ] ; [<unit: PIXEL,MM,CM,INCHES>] ; [<lStr: STRETCH>] ; [ ALPHALEVEL <nAlpha>] ; [<lNoTrn: NOTRANSPARENT>] ; [<lGray: GRAY> ] ; [LASTROW <lrow>] ; => ; [<lrow> := ] <prn>:PrintImage( <nRow>, <nCol>, <img>, [<nWidth>], ...

... The return value can be used to continue printing next lines. oPrn:PrintImage( nRow, nCol, uImage, nWidth, nHeight, lStretch, nAlpha, lTransp, lGray ) --> nLastRow printed uImage can be any image source. For those who like, I suggest trying this sample program: #include "fivewin.ch"//----------------------------------------------------------------------------//function ...