Determine image dimensions

[avista]

Hi all,
Please for solution how to determine dimensions of image (.jpg) file
and what is the best way to print image (i use fwh 14.12)
Best regards,

[avista]

Anyone ?

[Antonio Linares]

Here you have an example:

Code: Select all | Expand

#include "FiveWin.ch"function Main()   local oImg    DEFINE IMAGE oImg FILENAME "..\bitmaps\olga1.jpg"   MsgInfo( oImg:nWidth )      MsgInfo( oImg:nHeight )   oImg:End()return nil

[Antonio Linares]

To print it:

Code: Select all | Expand

#include "FiveWin.ch"function Main()   local oImg, oPrn   DEFINE IMAGE oImg FILENAME "..\bitmaps\olga1.jpg"   PRINT oPrn NAME "Test" PREVIEW      PAGE         oPrn:SayImage( 0, 0, oImg, oImg:nWidth * 4, oImg:nHeight * 4 )              ENDPAGE   ENDPRINT      oImg:End()return nil