[cstex] Cteni radku ze souboru

[petr-kucera at volny.cz]

Dobrý den,

prosím Vás, potřebuji ze souboru přečíst jeden určitý řádek.
Dělám to pomocí makra

\newcommand{\readln}
{
\chardef\soubor=15
\openin\soubor=pr1.txt
\read\soubor to \radek
\closein\soubor
\radek
}

Toto makro je velice zjednoduseno, ale i tak se chová jinak, než bych
předpokládal. Napíši-li do zdojáku např.:

\noindent Text
\setbox30=\hbox{Text}

\noindent\readln
\setbox31=\hbox{\readln}

\chardef\soubor=15
\openin\soubor=pr1.txt
\read\soubor to \radek
\closein\soubor
\noindent\radek
\setbox32=\hbox{\radek}

\the\wd30::\the\wd31::\the\wd32

tak se sice vypíše 3x "Text", ale pokaždé jinak odsazen a jednotlivé
boxy mají šířky po řadě 20.00003pt, 26.66669pt a 23.33336pt. V
čem je problém?

Děkuji za jakékoliv rady.

Petr Kučera