PARA ANTONIO LINARES- AYUDA... GRACIAS!!!
Posted: Fri Nov 13, 2015 6:10 pm
Estimado Antonio, necesito darle solución a poder poner una imagen en un informe, encontré este ejemplo pero no consigo que me funcione... me podrias ayudar, muchas GRACIAS!!!
function COREL()
LOCAL oPrn, oFont, oIni, oPrinter
PRINTER oPrn PREVIEW
DEFINE FONT oFont NAME "Times New Roman" SIZE 0,-12 OF oPrn
PAGE
#ifdef __CLIPPER__
oPrn:ImportWMF( "Invoice.Wmf" )
#else
oPrn:ImportWMF( "Invoice.emf" )
#endif
oPrn:CmSay( 2.1, 16, "19960001") // invoice
oPrn:CmSay( 4.3, 1.7, "Computer Associates") // company name
function COREL()
LOCAL oPrn, oFont, oIni, oPrinter
PRINTER oPrn PREVIEW
DEFINE FONT oFont NAME "Times New Roman" SIZE 0,-12 OF oPrn
PAGE
#ifdef __CLIPPER__
oPrn:ImportWMF( "Invoice.Wmf" )
#else
oPrn:ImportWMF( "Invoice.emf" )
#endif
oPrn:CmSay( 2.1, 16, "19960001") // invoice
oPrn:CmSay( 4.3, 1.7, "Computer Associates") // company name