画像テキストと本文テキストのベースラインを揃えるにはどうすればいいですか?

Question

\figflow写真のための適切なスペースを作成するためだけに使用し、写真の配置を私たちの管理下で行うことをお勧めします。

\def\includegraphics#1#2#3#4{
{\parfillskip=0pt\par}\dimen0=#1
\dimen1=#2
\advance\dimen0 by 1pc
\setbox0=\vbox to #2{\hsize=#1
\XeTeXpicfile #3 width #1 height #2}
\setbox1=\vbox{\hsize=#1{\noindent\it #4\par}}
\advance\dimen1 by \ht1
\divide\dimen1 by \baselineskip
\multiply\dimen1 by \baselineskip
\advance\dimen1 by 1\baselineskip
\setbox2=\vbox to \dimen1{\vfil\box0\vskip2mm\box1}
   % PO changes in OP's code: 
  \figflow{\dimen0}{\dimen1}{}%
  \vtop to0pt{\kern0pt\box2\vss}\nobreak\vskip-\baselineskip
\noindent\ignorespaces}

inside\kern-\baselineskipではなくを設定すると、画像は 1 行上に配置されます。\kern0pt\vtop

編集: コメントを考慮して、コードの 2 番目のバージョンを追加しました。ここでは、\baselineskip画像の下のテキストのは任意で、\includegraphicsマクロの最初のパラメータは負の値にすることができます。すると、は\dimen0このパラメータの絶対値となり、はプラスまたはマイナス 1pc\dimen2として新たに導入されます#1( の符号に応じてマージンを追加します#1)。

\def\includegraphics#1#2#3#4{%
   {\parfillskip=0pt\par}
   \dimen0=#1 \ifdim#1<0pt \dimen0=-\dimen0 \fi
   \dimen1=#2 
   \dimen2=#1 \advance\dimen2 by \ifdim#1<0pt-\fi 1pc
   \setbox0=\vbox {\XeTeXpicfile #3 width\dimen0 height #2}
   \setbox1=\vbox{\hsize=\dimen0 \noindent\it #4\par} 
   \advance\dimen1 by \ht1
   \divide\dimen1 by \baselineskip
   \multiply\dimen1 by \baselineskip
   \advance\dimen1 by 1\baselineskip
   \setbox2=\vbox to\dimen1{\vss\box0\vskip2mm\box1}
   \figflow{\dimen2}{\dimen1}{}%
   \line{\ifdim#1<0pt\hfill\fi\vtop to0pt{\kern0pt\box2\vss}\hfil}
   \nobreak\vskip-\baselineskip
   \noindent\ignorespaces}

編集2:\oblomあなたの質問の更新を考慮して、私の本のマクロを試してみることにしましたTeXbook ナルビー(236 ページと 237 ページ) この本の完全な PDF 版はチェコ語でのみ利用可能です。

このマクロの名前は、\oblomチェコ語の「何かの周りにタイプセットを行う」に由来しています。このマクロは、次の段落 (または複数の段落) に白い長方形のスペースを作成します。次のコードでは、このマクロを使用しています (ただし、区切り文字の名前は変更しています)。このマクロの使用方法は次のとおりです。

\oblom <width> from <linenum1> indent <linenum2>

ここで、<width>は長方形のスペースの幅、<linenum1>はインデントされる最初の行番号、は<linenum2>インデントされる行の数です。が<width>負の場合、長方形のスペースは右側になります。例:

\oblom 5cm from 3 indent 5

は、5 行が 3 行目から 5cm インデントされることを意味します (この行を含む)。最初の 2 行はインデントされず、通常の幅のままです。

マクロは\oblom段落間で使用し、次の 1 つ以上の段落の形状に影響します。主な利点は、段落をインデントの開始位置で正確に停止する必要がないことです。{\parfillskip=0pt\par}複雑化を招く前に実行する必要がある例に注意してください。

次のコードでは\oblom、マクロを使用して定義します\flowpic。

\flowpic from <linenum> width <width> {<picfile>} {<caption>}

例えば

\flowpic from 3 width -7cm {greybox.png}
    {Lorem ipsum dolor sit amet, consectetur adipiscing elit. Donec a diam lectus.}

次の段落の 3 行目から、指定されたキャプションが付いた画像をgreybox.png右側に挿入します。画像の幅は 7cm から 1pc を引いたものになります。1pc は画像とテキストの間の余白です。パッケージを使用する必要はありませんfigflow。

コードは3つの部分から構成されています。最初の部分は\oblom、TeXbook ナルビーこのマクロは\parshapeパラメータを計算し、を使用します\parshape。2 番目の部分は、指定された幅の画像を挿入するためのマクロを定義します\pic。定義は、XeTeX が使用されているかどうかによって異なります。3 番目の部分は、とを\flowpic使用するものを宣言します。flowpic マクロは、十分なスペースがある場合、画像が使用されている同じページに画像を挿入します。十分なスペースがない場合、flowpic は、形状が変更された最後の段落が終了する次のページに画像を挿入します。\oblom\pic

\newcount\shapenum \newcount\tempnum \newcount\globpar
\newdimen\ii \newdimen\ww
\newdimen\picwidth  \newbox\picbox
\catcode`\@=11  
\def\oblom #1 from #2 indent #3 {\par \ii=#1 \ww=\hsize
   \ifdim\ii>\z@ \advance\ww by-\ii      
   \else \advance\ww by\ii \ii=\z@ \fi
   \shapenum=1 \tempnum=0 \def\shapelist{}
   \loop \ifnum\shapenum<#2 \edef\shapelist{\shapelist\z@\hsize}
      \advance\shapenum by1 \repeat
   \loop \edef\shapelist{\shapelist\ii\ww}
      \advance\tempnum by1 \ifnum\tempnum<#3 \repeat
   \advance\shapenum by#3 \edef\shapelist{\shapelist\z@\hsize}
   \doshape}  
\catcode`\@=12
\def\doshape{\globpar=0 \def\par{\ifhmode\shapepar\fi}}
\def\shapepar{\prevgraf=\globpar \parshape\shapenum\shapelist
   \endgraf \globpar=\prevgraf
   \ifnum \prevgraf<\shapenum\else \global\let\par=\endgraf \doshapeA \fi}

\ifx\XeTeXpicfile\undefined 
   \def\pic #1{\hbox{\pdfximage width\picwidth {#1}\pdfrefximage\pdflastximage}}
\else
   \def\pic #1{\hbox{\XeTeXpicfile #1 width\picwidth}}
\fi

\def\flowpic from #1 width #2 #3#4{\par
   \dimen0=#2 \ifdim\dimen0<0pt \dimen0=-\dimen0 \fi
   \advance\dimen0 by -1pc %(margin around picture)
   \picwidth=\dimen0
   \setbox0=\vbox{\hsize\dimen0 \pic{#3}\kern 2mm 
                  \emergencystretch=2em \noindent\it #4}
   \dimen0=\ht0 
   \divide\dimen0 by\baselineskip \advance\dimen0 by1sp
   \oblom #2 from #1 indent \dimen0 
   \multiply\dimen0  by\baselineskip
   \setbox\picbox=\vbox to\dimen0{\vss\box0}
   \dimen0=\pagegoal \ifdim\pagegoal=\maxdimen \dimen0=\vsize\fi   
   \advance\dimen0 by-\pagetotal \advance\dimen0 by-#1\baselineskip
   \ifdim\dimen0<0pt 
      \def\doshapeA{\tempnum=\prevgraf \advance\tempnum by-#1 \advance\tempnum by2
         \line{\ifdim#2<0pt \hfill\fi \vbox to0pt{\vss\vtop to0pt{\kern0pt\box\picbox\vss}%
                   \kern\the\tempnum\baselineskip}\hfil}
         \nobreak\vskip-\baselineskip
      }
   \else \def\doshapeA{}
      \line{\ifdim#2<0pt \hfill\fi 
            \vtop to0pt{\kern-2\baselineskip\kern#1\baselineskip\box\picbox\vss}\hfil}
      \nobreak\vskip-\baselineskip
   \fi
}
\parindent=0pt \raggedbottom % we need the grid

このマクロの制限は、ページ区切りがあるページの「端」に画像を配置できないことです。そのようなページ区切りの前または後にのみ配置できます。1 つの段落に 2 つの画像を挿入することはできません。次のの使用は、\flowpic前のによってインデントされた行がない段落の前でのみ許可されます\flowpic。段落が非常に長く、ここに 2 つのを配置する必要がある場合は、前の「見えない」段落を閉じるために\flowpicによる既知のトリックを使用する必要があります。{\parfillskip=0pt\par}

Answer 1