如何對齊圖片文字和內文的基線？

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}

如果您設定\kern-\baselineskip而不是放在\kern0pt內部\vtop，那麼您將把圖片排成一行。

編輯：考慮到評論，我添加了程式碼的第二個版本，其中\baselineskip圖片下的文字可以是任意的，巨集的第一個參數\includegraphics可以是負數。那麼\dimen0是該參數的絕對值，並且\dimen2是新引入的#1正負 1pc（根據的符號添加邊距#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 naruby（第 236 和 237 頁）。本書有完整的 PDF 版本，但只有捷克語版本。

宏的名稱\oblom源自於捷克語「圍繞某物進行排版」。此巨集在下一個段落（或更多段落）中建立白色矩形空間。我的下一個程式碼使用這個巨集（但重命名分隔符詞）。該巨集的用法是：

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

其中<width>是矩形空間的寬度，<linenum1>是縮排的第一行號，<linenum2>是縮排的行數。如果<width>是負數，則矩形空間將位於右側。例如：

\oblom 5cm from 3 indent 5

表示從第三行（包括這一行）開始縮排 5 厘米，共 5 行。前兩行沒有縮進，且處於正常寬度。

巨集\oblom必須在段落之間使用，它會影響下一個或多個段落的形狀。主要優點是您無需將段落恰好停在縮排開始的位置。請注意您之前的範例，您必須這樣做{\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.}

greybox.png從右側下一段的第三行插入帶有給定標題的圖片。圖片的寬度將為7cm減去1pc，因為1pc是圖片和文字之間的邊距。您不需要使用 package figflow。

代碼由三部分組成。第一部分是定義\oblom第一部分是從下列位置複製的巨集TeXbook naruby。此巨集計算\parshape參數並使用\parshape.第二部分定義了\pic插入給定寬度圖片的巨集。這些定義取決於是否使用 XeTeX。第三部分聲明\flowpic哪個使用\oblom和\pic。如果有足夠的空間，flowpic 巨集會將圖片插入到使用它的同一頁中。如果沒有，則 flowpic 會將圖片插入下一頁，其中修改形狀的最後段落結束。

\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

該巨集的限制是：您不能將圖片放置在分頁符號頁面的「邊緣」處。僅在此類分頁之前或之後。您不能在一個段落中插入兩張圖片。\flowpic僅允許在前一個沒有縮排的段落之前使用下一個\flowpic。如果您有很長的段落並且需要\flowpic在此處放置兩個 s，那麼您需要使用已知的技巧 by{\parfillskip=0pt\par}來關閉前面的「不可見」段落。

Answer 1