☰

¿Cómo agregar filas recursivas a una tabla, hasta llegar al final de la página en ConTeXt?

tag-icon • tag-icon tables context recursion
¿Cómo agregar filas recursivas a una tabla, hasta llegar al final de la página en ConTeXt?

Tengo una tabla en ConTeXt como esta:

\starttext
    \chapter{This is a title}

    \bTABLE
    \bTABLEhead
        \bTR \bTD a \eTD \bTD b \eTD \bTD c \eTD \eTR
    \eTABLEhead

    \bTABLEbody
        \dorecurse{100}{%
            \bTR \bTD 1 \eTD \bTD 2 \eTD \bTD 3 \eTD \eTR
        }
    \eTABLEbody
    \eTABLE
\stoptext

¿Cómo puedo configurar la recursividad para que solo repita la celda tanto como llene el resto de la página?

Respuesta1

Un posible algoritmo sería componer la tabla en un bucle, agregando filas hasta que exceda la altura restante disponible en la página. Tenga en cuenta que esto es bastante lento.

\startbuffer[table]
\bTABLE
\bTABLEhead
    \bTR \bTD a \eTD \bTD b \eTD \bTD c \eTD \eTR
\eTABLEhead

\bTABLEbody
    \dorecurse{\the\scratchcounter}{%
        \bTR \bTD 1 \eTD \bTD 2 \eTD \bTD 3 \eTD \eTR
    }
\eTABLEbody
\eTABLE
\stopbuffer

\showframe

\starttext
    \chapter{This is a title}

    \scratchcounter=1
    \scratchdimen=0pt
    \loop\ifdim\scratchdimen<\dimexpr\pagegoal-\pagetotal-2\lineheight\relax % why 2\lineheight?
        \setbox\scratchbox=\vbox{\getbuffer[table]}
        \scratchdimen=\dimexpr\ht\scratchbox+\dp\scratchbox\relax
        \advance\scratchcounter by 1
    \repeat
    \advance\scratchcounter by -1
    \vbox{\getbuffer[table]}
\stoptext

Respuesta2

Esta es la misma idea que la solución de Henri Menke, pero en lugar de agregar las líneas una por una, primero mido la altura de la fila y luego uso el comando incorporado \getrawnoflinespara obtener la cantidad de líneas que caben en el espacio restante. .

\define\calculatelines
    {\setbox\scratchbox\hbox{\bTABLE
        \bTR \bTD 1 \eTD \bTD 2 \eTD \bTD 3 \eTD \eTR
      \eTABLE}%
     \openlineheight=\htdp\scratchbox
     \ifdim\pagegoal=\maxdimen % we are at the beginning of the page
          \scratchdimen=\dimexpr\textheight - 2\openlineheight\relax
      \else
          \scratchdimen=\dimexpr\pagegoal - \pagetotal - 2\openlineheight \relax
      \fi
      \getrawnoflines\scratchdimen}

\define\fillTABLE
    {\blank
     \bgroup
     \calculatelines
     \bTABLE
     \bTABLEhead
         \bTR \bTD a \eTD \bTD b \eTD \bTD c \eTD \eTR
     \eTABLEhead

     \bTABLEbody
         \dorecurse{\the\noflines}
             {\bTR \bTD 1 \eTD \bTD 2 \eTD \bTD 3 \eTD \eTR}
     \eTABLEbody
     \eTABLE
     \egroup}


\setuppapersize[A5]
\showframe

\starttext

\fillTABLE

\page

\section{New section}

\fillTABLE

\page

\section{With some text}

\input knuth

\fillTABLE

\stoptext

información relacionada