FiveTech Software tech support forums

...  , .F. )  StartDoc(oDevice:hDC, oDevice:cDocument )   StartPage( oDevice:hDC )     hMeta := GetEnhMetaFile(aFiles[nFor])PlayEnhMetaFile( oDevice:hDC, hMeta,, .t. )oDevice:hDCOut := oDevice:hDC        ...

Antonio, aquí la segunda parte: Error: Unresolved external '_HB_FUN_DRAWTHEMED' referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|DIALOG Error: Unresolved external '_HB_FUN_GETDLGBASEUNITS' referenced from P:\32BITS\FWH\LIB\FIVEHX.LIB|DIALOG Error: Unresolved external '_HB_FUN_CDLG2CHR' referenced from P...

... )   local hBmp := CreateCompatibleBitmap( hDC1, nWidth, nHeight )   local hOldBmp := SelectObject( hDC, hBmp )   local hEMF := GetEnhMetaFile( cEmf )   Rectangle( hDC, 0, 0, nHeight, nWidth )   MyPlayEnhMetaFile( hDC, hEMF, 0, 0, nHeight, nWidth )   CloseEnhMetafile( ...

Marcelo,
it seems not so! If I change in function create_minipage() closeenhmetafile(hEMF) to deleteenhmetafile(hEmf) the files are deleted at end of preview. (or getenhmetafile(cFile) not releases the handle from cFile??)
Have you a new version?

... aFiles[ nFor ] ) PlayMetaFile( oDevice:hDC, hMeta ) DeleteMetafile( hMeta ) EndPage( oDevice:hDC ) #else StartPage( oDevice:hDC ) hMeta := GetEnhMetaFile( aFiles[ nFor ] ) PlayEnhMetaFile( oDevice:hDC, hMeta,, .t. ) DeleteEnhMetafile( hMeta ) EndPage( oDevice:hDC ) #endif next case nOption ...

... := GetMetaFile(aFiles[nFor]) PlayMetaFile( oDevice:hDC, hMeta ) DeleteMetafile(hMeta) EndPage(oDevice:hDC) #else StartPage(oDevice:hDC) hMeta := GetEnhMetaFile(aFiles[nFor]) PlayEnhMetaFile( oDevice:hDC, hMeta,, .t. ) DeleteEnhMetafile(hMeta) EndPage(oDevice:hDC) #endif NEXT case nOption == 2 ...

... := GetMetaFile(aFiles[nFor]) PlayMetaFile( oDevice:hDC, hMeta ) DeleteMetafile(hMeta) EndPage(oDevice:hDC) #else StartPage(oDevice:hDC) hMeta := GetEnhMetaFile(aFiles[nFor]) PlayEnhMetaFile( oDevice:hDC, hMeta,, .t. ) DeleteEnhMetafile(hMeta) EndPage(oDevice:hDC) #endif NEXT case nOption == 2 ...

Antonio Acabo de ordenar e instalar xHB 99.70, el tutor01.prg já me arranca, agora o meu projeto apresenta estes erros : xLINK: error: Unresolved external symbol '_HB_FUN_PEEKBYTE'. xLINK: error: Unresolved external symbol '_HB_FUN__LASTKEY'. xLINK: error: Unresolved external symbol '_HB_FUN_ISWIN64...

... top, bottom ) CLASS TPrinter Local hMeta,oRect Local aData:=PrnGetSize( ::hDC ) IF ! FILE( cFile ) Return nil Endif SaveDC( ::hDCOut ) hMeta:=GetEnhMetaFile( cFile ) ::SetIsoTropicMode() ::SetWindowExt( aData[1], aData[2] ) ::SetViewPortExt( aData[1], aData[2] ) SetViewOrg( ::hDCOut, -1, -1 ...