来自 indesign 的精美列表

Question 1

编辑

我的第一个解决方案是破坏枚举项对齐标签和项目文本，所以我做了一些修改，以便现在使用该enumitem \SetLabelAlign命令。事实上，这比我以前做的稍微容易一些。

这里有一个不同的方法，我定义了一个新的enumerate类似环境，称为underrated-- 因为我们under在枚举rate环境中排列：

\newlist{underrated}{enumerate}{1}% define a new eumerate-like environment
\setlist[underrated]{%
    before=\let\item\underlineItem, % Set \item -> \underlineItem
    align=underline,% use underline "style" above
    label=\alph*),
    ref=\alph*,
    leftmargin=40mm,
    labelwidth=42mm,
}

这个想法是定义一种新的“对齐样式” underline，将线条放在项目标签之前。但是，有一个问题，当有一些文本需要下划线时，比如在underline me中\item[underline me]，我们需要将这些文本“传递”\item回样式underline。这是通过劫持命令\item并将其替换为来完成的\underlineItem：

\let\realItem\item% save the original \item command for later use
\newcommand\underlineItem[1][]{%
   \def\underratedText{#1}%  
   \realItem\ignorespaces%
 }

因此，这实际上所做的就是定义\underratedText，它用于新的标签对齐样式，然后调用 real \item。要定义这种样式，我们基本上只需在文本下划线，按照手册中的示例enumitem：

\SetLabelAlign{underline}{\parbox[t]\labelwidth{%
   \underline{\hbox to 36mm{\quad\texttt{\underratedText}}}\space#1}%
}

为了更好地衡量，我还为这些组定义了一个新的枚举类环境MyGroup。通过此设置，代码：

  \begin{MyGroup}
    \item\mbox{}
      \begin{underrated}
        \item A lunar eclipse is an omen of a coming disaster
        \item Superstitions have been around forever
        \item[an answer] People hold many superstitious beliefs about
        the moon
        \item[another answer] It is made of green cheese
      \end{underrated}

    \item\mbox{}
      \begin{underrated}
        \item The history of astronomy is interesting
        \item Ice age people recorded the appearance of new moons by
        making scratches in animal bones
        \item For example, Stonehenge in Britain,m build 3500 years
        ago to track the movement of the sun
        \item Ancient people observed and recorded lunar and solar
        events in different ways
      \end{underrated}
  \end{MyGroup}

生产

后面\mbox的 's\item是强制enumerate开始新行所必需的；参见在枚举环境中，强制在项目编号后换行。

完整代码如下：

\documentclass{book}
\usepackage{enumitem}

\let\realItem\item% save the original \item command for later use
\newcommand\underlineItem[1][]{%
   \def\underratedText{#1}\realItem\ignorespaces%
}
\SetLabelAlign{underline}{%
   \parbox[t]\labelwidth{%
      \underline{\hbox to 36mm{\quad\texttt{\underratedText}}}%
      \space#1%
   }%
 }

\newlist{underrated}{enumerate}{1}% define a new eumerate-like environment
\setlist[underrated]{%
    before=\let\item\underlineItem, % Set \item -> \underlineItem
    align=underline,% use underline "style" above
    label=\alph*),
    ref=\alph*,
    leftmargin=40mm,
    labelwidth=42mm,
}
\newlist{MyGroup}{enumerate}{1}
\setlist[MyGroup]{
   label=\bfseries Group \arabic*:,
   style=nextline,
   leftmargin=*,
   labelsep=2em,
   itemsep=2em
}

\begin{document}
  \begin{MyGroup}
    \item\mbox{}
      \begin{underrated}
        \item A lunar eclipse is an omen of a coming disaster
        \item Superstitions have been around forever
        \item[an answer] People hold many superstitious beliefs about
        the moon
        \item[another answer] It is made of green cheese
      \end{underrated}

    \item\mbox{}
      \begin{underrated}
        \item The history of astronomy is interesting
        \item Ice age people recorded the appearance of new moons by
        making scratches in animal bones
        \item For example, Stonehenge in Britain,m build 3500 years
        ago to track the movement of the sun
        \item Ancient people observed and recorded lunar and solar
        events in different ways
      \end{underrated}
  \end{MyGroup}
\end{document}

Answer

编辑