Re: 欧文文字間を密着させたい

名前: box
日時: 2005-10-18 20:52:09
IPアドレス: 219.114.172.*

>>38634
ありがとうございます．[蛇足]はかつてやりましたが，
あまり好めません．簡易のため，下のように書きまし
た．残念ながら，enumerate10以降の密着がうまくでき
ませんでした．ところが，\equispace{0.9zw}{12}は
うまく密着でき，目的の箱に収めることができるので
満足です．果たして，enumerate10番以降は密着は無理
なのでしょうか．もし可能であれば，下はどこが間違
っているのでしょうか？



\documentclass{jsarticle}

\makeatletter
\def\equispace#1#2{%
    \hbox to#1{%
       \hfil
        \@tfor\@tempa:=#2\do{%
          \@tempa%
          \hskip 0pt plus 1fil minus1fil}%
       \unskip
       \hfil}}
\makeatother
\makeatletter
\def\labelenumi{%
    \protected@edef\@tempa{\protect\equispace{.1em}{\theenumi}}%
    \@tempa}
\makeatother


\begin{document}

\makeatother

\renewcommand{\labelenumi}{\equispace{0.5zw}{\theenumi}}
\begin{enumerate}
\item あかさたな  
\item はまやらわ    
\item あかさたな
\item はまやらわ
\item あかさたな
\item はまやらわ
\item あかさたな
\item はまやらわ
\item あかさたな
\item はまやらわ
\item あかさたな
\item はまやらわ \equispace{0.9zw}{12} 
\end{enumerate}

\end{document}

この書き込みへの返事：