PDA

Ver la Versión Completa : Como agregar objeto memo por codigo en fastreport


marco3k
16-10-2019, 22:07:26
Buen dia Foro, tengo una consulta repecto a la creación de objetos por codigo en FastReport.

El asunto es el siguiente hay una aplicacion de boletas de pago donde se hace consultas y muestra los datos en un grid y mediante un checkbox enlazado a una columna se selecciona las boletas de pago a imprimir (figura 001). Luego hay un reporte de boletas de pago que sale 2 boletas en 1 hoja vertical, hasta ahi todo bien, el problema es que me pidieron que le ponga un sello en cada boleta pues lo que hice, es agregar una banda overlay y puse ahi los dos sellos en un objeto pictureview del FastReport y funcionó sale impreso cada boleta con su sello en una hoja vertical; el problema viene cuando se imprime boletas en cantidad impar por ejemplo 1, 3, 5, etc boletas.

Cuando se selecciona 1 boleta de pago se muestra en el reporte con el sello y en la otra mitad de la hoja sale el sello y eso no se ve bien, entonces lo que se me ocurrio es agregar por código en la ultima pagina un objeto que oculte el segundo sello para que no se imprima en la segunda parte de la hoja (figura 002). EL codigo que use lo aplique en el reporte y quedo asi (figura 003):

var Memo : TfrxMemoView;
begin
Memo := TfrxMemoView.Create(page1);
Memo.SetBounds(330, 0, 200, 150);
Memo.Color := clgreen;
Memo.top := 810;
end.

Al aplicar ese código como se ve en la figura 002 (le puse color verde al objeto memo para ver donde es ubica, ya despues lo cambiare a color blanco) se queda en la pagina 1, pense que si le pongo un valor alto a la propiedad top se iria a la segunda página, pero no sucede eso, se pierde en la primera pagina y no se que hacer para que pase a la segunda pagina. En conclusion quiero que el objeto memo apareza al final del reporte cuando haya el numero total impar de boletas para que tape el segundo sello. Gracias de antemano por cualquier ayuda que me puedan brindar.

figura 001:
https://1drv.ms/u/s!Aux601Sf-JcbggI37-FiA7R9g8Is?e=c7QMEB

figura 002:
https://1drv.ms/u/s!Aux601Sf-JcbggQZoVATHXHNz0kI?e=RDb19o

figura 003:
https://1drv.ms/u/s!Aux601Sf-JcbggMxCp6ujSVLTKZK?e=cHNdQ7

Nota: no puedo agregar imagenes ni vinculos, asi que junten los espacios en h t t p para poder ver las imagenes de referencia.