Try-catch-end - Symbol item expected from hb_vmDo()
Posted: Tue Nov 06, 2012 8:59 am
To all,
I am not sure how Try-catch-end should work
I use it like the following code shows but get an error.
(cBuf := DibToStr( hDib) causes the error)
MsgBox with:
Symbol item expected from hb_vmDo()
and the program stops.
Best regards,
Otto
I am not sure how Try-catch-end should work
I use it like the following code shows but get an error.
(cBuf := DibToStr( hDib) causes the error)
MsgBox with:
Symbol item expected from hb_vmDo()
and the program stops.
Best regards,
Otto
- Code: Select all Expand view
- TRY
hBmp2 := CropImage( hBmp, 130, 10, nBmpHeight( hBmp ) - 35, nBmpWidth( hBmp ) - 20 )
DeleteObject( hBmp )
hDib := DibFromBitmap( hBmp2 )
cBuf := DibToStr( hDib )
GlobalFree( hDib )
DeleteObject( hBmp2 )
lRet := BmpBufToJpg( cFileSetExt( cPDF, "jpg" ), cBuf )
cBuf := nil
CATCH
msginfo( procname() + " CATCH " + str(procline()) + " " + str( 1 ) )
END