FoxPro/Visual FoxPro - Report memo en 2 hojas

 
Vista:

Report memo en 2 hojas

Publicado por JAVIER (3 intervenciones) el 15/11/2018 02:06:10
Hola, tengo un informe con 2 grupos, encabezado, pie de pagina y resumen. En el pie del último grupo tengo que imprimir un campo memo. El problema es que a veces es muy grande y no entra en la página y en la siguiente hoja queda en blanco. No me lo termina de mostrar. Se como contar lineas de un memo, lo que no se es cuantas linea quedan para que termine la hoja. Gracias por la ayuda.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 309
Bronce
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Report memo en 2 hojas

Publicado por santiago (551 intervenciones) el 15/11/2018 22:10:32
Fijate en este ejemplo, Y = controla el maximo numero de lineas de la pagina (66), arranca en una linea X, digamos que en la linea 20, si llega a 66 salta la pagina comienza en la linea 2 e inicializa y en 0.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
y=20
f=prow()
Set memowidth to 23
***********************
lineas_memo = MEMLINES(curricula)
FOR i = 1 TO lineas_memo
    @ f,22 SAY MLINE(curricula,i)
    f=f+1
    y=y+1
    if y>=66
       y=0
       @ 2,20 SAY MLINE(curricula,i)
       f=prow()+1
    endif
ENDFOR
***********************
Set memowidth to 80

Suerte.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar