Xailer & OZ Software

Juan Jossé,
Suponiendo que con anterioridad hayas añadido un recurso de nombre IMAGEN en
el gestor de recursos. Se haría de la siguiente forma:
Local oReport, oBitmap
oBitmap := TPicture():Load( "imagen" )
REPORT oReport ...
..........
RUN REPORT oReport ON STARTPAGE PrintBitmap( oReport, oBitmap )
oBitmap:Destroy()
//---------------------------------------------------------- --------------------
STATIC FUNCTION PrintBitmap( oReport, oBitmap )
LOCAL nMapMode
WITH OBJECT oReport:oDevice:oCanvas
nMapMode := :nMapMode
:nMapMode := mmHIMETRICS
:DrawPicture( {20, 20, 300, 262}, oBitmap )
:nMapMode := nMapMode
END WITH
RETURN NIL
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Juan José García" <correo@jjgsoft.biz> escribió en el mensaje
news:[email=45520d5d@news.xailer.com...]45520d5d@news.xailer.com...[/email]
>
>

Se puede luego imprimir texto encima del grafico, es decir que el grafico
quede debajo del texto

PILO,
> Se puede luego imprimir texto encima del grafico, es decir que el grafico
> quede debajo del texto
Si no que equivoco, eso es lo que hace el ejemplo.
--
Un saludo,
José F. Giménez
http://www.xailer.com