FastReport, margenes en run-time

[guillotmarc]

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.