topic-6057

Posts: 1283

Joined: Fri Feb 10, 2006 02:34 PM

Insertar un Metafile en una ventana
Posted: Wed Feb 21, 2007 01:36 PM

Hola,

Estoy intentando insertar una fichero EMF en una ventana, en un objeto Metafile. Se me ocurre esta manera pero no consigo...

Code: Select all Collapse

*------------------------------
STATIC FUNCTION InsEMF( oMeta )
*------------------------------
    LOCAL cFile   := cGetFile( "*.emf" )
    LOCAL hMeta

    IF !File( cFile )
       retu nil
    ENDIF

    SaveDC( oMeta:hDC )

    hMeta := GetEnhMetaFile( cFile )

    PlayEnhMetafile( oMeta:hDC, hMeta,, .t. )
    DeleteEnhMetafile( hMeta )

    RestoreDC( oMeta:hDC )

    oMeta:Refresh()

RETU NIL

Alguien me echa una mano ?

Gracias.

Salutacions, saludos, regards

"...programar es fácil, hacer programas es difícil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
HIX -> https://github.com/carles9000/hix

FiveTech Support Forums

Continue the discussion