FastReport, margenes en run-time
Hola.
¿ Alguien me puede ayudar a modificar los margenes de un informe en run-time ?. (Utilizo FastReport 2.5).
He probado con este código :
var MargenPorDefecto: integer;
...
frInforme.LoadFromFile(Archivo);
MargenPorDefecto := frInforme.Pages[0].pgMargins.Top;
frInforme.Pages[0].pgMargins.Top := NuevoMargen;
frInforme.Pages[0].pgMargins.Bottom := frInforme.Pages[0].pgMargins.Bottom + MargenPorDefecto - NuevoMargen;
frInforme.ShowReport;
El espacio que le añado o le quito al Margen superior, se lo asigno al Margen Inferior (por si acaso). Pero aún así la primera hoja sale bien, pero en la siguiente desplaza el contenido a la derecha (¿ aumenta el margen izquierdo ?), hasta que llega una hoja en que no aparece nada.
Gracias por vuestra ayuda.
__________________
Marc Guillot (Hi ha 10 tipus de persones, els que saben binari i els que no).
Última edición por guillotmarc fecha: 24-09-2003 a las 15:50:24.
|