Re: 段落中の虫食い部分の枠線（解決）

名前: .
日時: 2009-07-28 20:34:10
IPアドレス: 59.134.169.*

>>53424
とりあえず，サンプルを挙げます．

%%% 例 1（lineno パッケージ使用時：lineno パッケージの内部処理を利用）
\documentclass{jarticle}
\usepackage{calc,lineno}
\newdimen\PreSize

\makeatletter
%%% 次の \MakeLineNo に対する変更は，
%%%   Package: lineno 2005/11/02 line numbers on paragraphs v4.41
%%% に基づく．
\def\MakeLineNo{%
   \@LN@maybe@normalLineNumber
   \boxmaxdepth\maxdimen\setbox\z@\vbox{\unvbox\@cclv}%
%%% added part
   \setbox\tw@\vbox{\unvcopy\z@
      \setbox\tw@\lastbox
      \ifhbox\tw@
         \setbox\tw@\hbox{\unhbox\tw@\unskip\unskip}%
      \fi
      \global\PreSize\wd\tw@}%
%%% end of added part
   \@tempdima\dp\z@ \unvbox\z@
   \sbox\@tempboxa{\hb@xt@\z@{\makeLineNumber}}%
   \stepLineNumber
   \ht\@tempboxa\z@ \@LN@depthbox
   \@LN@do@vadjusts
   \count@\lastpenalty
   \ifnum\outputpenalty=-\linenopenaltypar
     \ifnum\count@=\z@ \else
       \xdef\@LN@parpgbrk{%
         \penalty\the\count@
         \global\let\noexpand\@LN@parpgbrk
                      \noexpand\@LN@screenoff@pen}%
     \fi
   \else
     \@tempcnta\outputpenalty
     \advance\@tempcnta -\linenopenalty
     \penalty \ifnum\count@<\@tempcnta \@tempcnta \else \count@ \fi 
   \fi}
\makeatother

\newcommand{\穴開始}{%
   \par
   \nobreak \vskip-\baselineskip \vskip-\parskip
   \addtocounter{linenumber}{-1}%
   \noindent \advance\PreSize by 1zw
   \smash{\rule[-4pt]{\PreSize}{.6pt}}\kern-.6pt
   \rule[-4pt]{.6pt}{14pt}%
   \leaders \hrule height 10pt depth-9.4pt\hfill
   \rule[-4pt]{.6pt}{14pt}\par}

\newcommand{\穴途中行}[1][]{\noindent\smash{\rule[-4pt]{.6pt}{\baselineskip}}\hfill#1\hfill\smash{\rule[-4pt]{.6pt}{\baselineskip}}\par}

\newcommand{\穴終了}[1]{\noindent\smash{\rule[-4pt]{.6pt}{\baselineskip}}\kern-.6pt\smash{\rule[-4pt]{#1}{.6pt}}\smash{\rule[-4pt]{.6pt}{\baselineskip}}%
   \smash{\kern-.6pt\rlap{\rule[\baselineskip-4pt]{\linewidth - #1}{.6pt}}}\hspace{1zw}}

\begin{document}

\linenumbers

あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ

あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ\穴開始
\穴途中行
\穴途中行[ここを埋めましょう]
\穴途中行
\穴終了{20zw}あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
\end{document}

%%% 例 2（lineno パッケージ不使用時：\predisplaysize を利用）
\documentclass{jarticle}
\usepackage{calc}
\newdimen\PreSize

\newcommand{\穴開始}{%
   \begingroup\predisplaypenalty=10000
   \abovedisplayskip=0pt \abovedisplayshortskip=0pt
   \belowdisplayskip=0pt \belowdisplayshortskip=0pt
   $$\dimen0=\predisplaysize \advance\dimen0 by -2em
     \global\PreSize=\dimen0 $$\par\endgroup
   \nobreak \vskip-2\baselineskip
   \noindent \advance\PreSize by 1zw
   \smash{\rule[-4pt]{\PreSize}{.6pt}}\kern-.6pt
   \rule[-4pt]{.6pt}{14pt}%
   \leaders \hrule height 10pt depth-9.4pt\hfill
   \rule[-4pt]{.6pt}{14pt}\par}

\newcommand{\穴途中行}[1][]{\noindent\smash{\rule[-4pt]{.6pt}{\baselineskip}}\hfill#1\hfill\smash{\rule[-4pt]{.6pt}{\baselineskip}}\par}

\newcommand{\穴終了}[1]{\noindent\smash{\rule[-4pt]{.6pt}{\baselineskip}}\kern-.6pt\smash{\rule[-4pt]{#1}{.6pt}}\smash{\rule[-4pt]{.6pt}{\baselineskip}}%
   \smash{\kern-.6pt\rlap{\rule[\baselineskip-4pt]{\linewidth - #1}{.6pt}}}\hspace{1zw}}

\begin{document}

あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ

あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ\穴開始
\穴途中行
\穴途中行[ここを埋めましょう]
\穴途中行
\穴終了{20zw}あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
あいうえおかきくけこあいうえおかきくけこ
\end{document}

この書き込みへの返事：