之前选择题选项排版的 bug 及改进

色k

话说昨天网友问我选择题选项怎么排版，我就给了《撸题集》里的相关代码。
那段代码依赖两个宏包：calc、ifthen，后来想到，既然作为“零件”使用，代码应尽量不依赖宏包才好，于是决定改写一下。
然而改写完在测试的时候，却发现原先的设计其实存在 bug，只不过一般碰不到，所以在撸题集用这么久都没发现。
请看以下示例：

1. \documentclass{article}
2. \usepackage{calc,ifthen}
3. \newlength\lxxa
4. \newlength\lxxb
5. \newlength\lxxc
6. \newlength\lxxd
7. \newlength\lxxmax
8. \newlength\lhalf
9. \newlength\lhalfhalf
10. \newcommand\xx[4]{%
11. \settowidth\lxxa{A. #1}%
12. \settowidth\lxxb{B. #2}%
13. \settowidth\lxxc{C. #3}%
14. \settowidth\lxxd{D. #4}%
15. \ifthenelse{
16.     \lengthtest{\lxxa > \lxxb}
17. }{%
18.     \setlength\lxxmax\lxxa
19. }{%
20.     \setlength\lxxmax\lxxb
21. }%
22. \ifthenelse{
23.     \lengthtest{\lxxmax < \lxxc}
24. }{%
25.     \setlength\lxxmax\lxxc
26. }{}%
27. \ifthenelse{
28.     \lengthtest{\lxxmax < \lxxd}
29. }{%
30.     \setlength\lxxmax\lxxd
31. }{}%
32. \addtolength\lxxmax{1.5em}%
33. \setlength\lhalf{(\linewidth-\parindent)/2}%
34. \setlength\lhalfhalf{\lhalf/2}%
35. \ifthenelse{
36.     \lengthtest{\lxxmax > \lhalf}
37. }{%
38. A. #1 \par B. #2 \par C. #3 \par D. #4%
39. }{%
40.     \ifthenelse{
41.         \lengthtest{\lxxmax > \lhalfhalf}
42.     }{%
43.         \begin{minipage}{\lhalf}
44.         A. #1
45.         \end{minipage}%
46.         \begin{minipage}{\lhalf}
47.         B. #2
48.         \end{minipage}\par
49.         \begin{minipage}{\lhalf}
50.         C. #3
51.         \end{minipage}%
52.         \begin{minipage}{\lhalf}
53.         D. #4
54.         \end{minipage}%
55.     }{%
56.         \begin{minipage}{\lhalfhalf}
57.         A. #1
58.         \end{minipage}%
59.         \begin{minipage}{\lhalfhalf}
60.         B. #2
61.         \end{minipage}%
62.         \begin{minipage}{\lhalfhalf}
63.         C. #3
64.         \end{minipage}%
65.         \begin{minipage}{\lhalfhalf}
66.         D. #4
67.         \end{minipage}%
68.     }%
69. }}
71. \begin{document}
73. \rule{0.3\linewidth}{1ex}
75. \xx{\rule{0.3\linewidth}{1ex}}234
77. \end{document}

复制代码

结果：


考考大家，为什么同样的 rule 在选项里却变短了呢？


幸好修正它也不难，顺便地，我决定将“四图选项”命令 \fourtuxx 也改写下（原先的只能一行）。

1. \documentclass{article}
2. \usepackage{graphicx}%以下代码不依赖宏包，加它纯粹为演示图形选项
4. %预备
5. \newlength\lxxmax
6. \newlength\lhalf
7. \newlength\lhalfhalf
8. \newsavebox\xxboxa
9. \newsavebox\xxboxb
10. \newsavebox\xxboxc
11. \newsavebox\xxboxd
12. \newcommand\getboxsandmax[4]{%存放内容并获取最大宽
13. \sbox\xxboxa{#1}%
14. \sbox\xxboxb{#2}%
15. \sbox\xxboxc{#3}%
16. \sbox\xxboxd{#4}%
17. \ifdim\wd\xxboxa>\wd\xxboxb
18. \lxxmax\wd\xxboxa\relax
19. \else
20. \lxxmax\wd\xxboxb\relax
21. \fi
22. \ifdim\lxxmax<\wd\xxboxc
23. \lxxmax\wd\xxboxc\relax
24. \fi
25. \ifdim\lxxmax<\wd\xxboxd
26. \lxxmax\wd\xxboxd\relax
27. \fi
28. }
30. %四选项自动排版，用法 \xx{选项}{选项}{选项}{选项}
31. \newcommand\xx[4]{\par
32. \getboxsandmax{A. #1}{B. #2}{C. #3}{D. #4}%
33. \addtolength\lxxmax{1em}%
34. \setlength\lhalf{\dimexpr(\linewidth-\parindent)/2\relax}%
35. \setlength\lhalfhalf{.5\lhalf}%
36. \ifdim\lxxmax>\lhalf
37.     A. #1 \par
38.     B. #2 \par
39.     C. #3 \par
40.     D. #4
41. \else
42.     \ifdim\lxxmax>\lhalfhalf
43.         \begin{minipage}{\lhalf}
44.         \usebox\xxboxa
45.         \end{minipage}%
46.         \begin{minipage}{\lhalf}
47.         \usebox\xxboxb
48.         \end{minipage}\par
49.         \begin{minipage}{\lhalf}
50.         \usebox\xxboxc
51.         \end{minipage}%
52.         \begin{minipage}{\lhalf}
53.         \usebox\xxboxd
54.         \end{minipage}%
55.     \else
56.         \begin{minipage}{\lhalfhalf}
57.         \usebox\xxboxa
58.         \end{minipage}%
59.         \begin{minipage}{\lhalfhalf}
60.         \usebox\xxboxb
61.         \end{minipage}%
62.         \begin{minipage}{\lhalfhalf}
63.         \usebox\xxboxc
64.         \end{minipage}%
65.         \begin{minipage}{\lhalfhalf}
66.         \usebox\xxboxd
67.         \end{minipage}%
68.     \fi
69. \fi
70. }
72. %四图片选项专用（每图不得太宽）
73. \newcommand\fourtuxx[4]{\par\vspace{2ex}%
74. \getboxsandmax{#1}{#2}{#3}{#4}%
75. \addtolength\lxxmax{1em}%
76. \setlength\lhalf{.5\linewidth}%
77. \setlength\lhalfhalf{.5\lhalf}%
78. \ifdim\lxxmax>\lhalf
79. images too big! please change width to less than 0.5linewidth-1em.
80. \else
81.     \ifdim\lxxmax>\lhalfhalf
82.         \noindent
83.         \begin{minipage}[b]{\lhalf}
84.         \centering
85.         \usebox\xxboxa\par A
86.         \end{minipage}%
87.         \begin{minipage}[b]{\lhalf}
88.         \centering
89.         \usebox\xxboxb\par B
90.         \end{minipage}\par\vspace{2ex}%
91.         \noindent
92.         \begin{minipage}[b]{\lhalf}
93.         \centering
94.         \usebox\xxboxc\par C
95.         \end{minipage}%
96.         \begin{minipage}[b]{\lhalf}
97.         \centering
98.         \usebox\xxboxd\par D
99.         \end{minipage}%
100.     \else
101.         \noindent
102.         \begin{minipage}[b]{\lhalfhalf}
103.         \centering
104.         \usebox\xxboxa\par A
105.         \end{minipage}%
106.         \begin{minipage}[b]{\lhalfhalf}
107.         \centering
108.         \usebox\xxboxb\par B
109.         \end{minipage}%
110.         \begin{minipage}[b]{\lhalfhalf}
111.         \centering
112.         \usebox\xxboxc\par C
113.         \end{minipage}%
114.         \begin{minipage}[b]{\lhalfhalf}
115.         \centering
116.         \usebox\xxboxd\par D
117.         \end{minipage}%
118.     \fi
119. \fi
120. }
123. \begin{document}
125. \newcommand\test{test test test test test test test test test test test test test test test test test test test test test test}
127. \rule{0.15\linewidth}{1ex} \test
128. \xx{\rule{0.15\linewidth}{1ex}}234
130. \rule{0.3\linewidth}{1ex} \test
131. \xx{\rule{0.3\linewidth}{1ex}}234
133. \rule{0.5\linewidth}{1ex} \test
134. \xx{\rule{0.5\linewidth}{1ex}}234
136. \begin{itemize}
137. \item\rule{0.15\linewidth}{1ex} \test
138. \xx{\rule{0.15\linewidth}{1ex}}234
140. \item\rule{0.3\linewidth}{1ex} \test
141. \xx{\rule{0.3\linewidth}{1ex}}234
143. \item\rule{0.5\linewidth}{1ex} \test
144. \xx{\rule{0.5\linewidth}{1ex}}234
146. \begin{itemize}
147. \item\rule{0.15\linewidth}{1ex} \test
148. \xx{\rule{0.15\linewidth}{1ex}}234
150. \item\rule{0.3\linewidth}{1ex} \test
151. \xx{\rule{0.3\linewidth}{1ex}}234
153. \item\rule{0.5\linewidth}{1ex} \test
154. \xx{\rule{0.5\linewidth}{1ex}}234
155. \end{itemize}
156. \end{itemize}
159. \test
160. \fourtuxx
161. {\includegraphics[width=0.2\linewidth]{example-image}}
162. {\includegraphics[width=0.2\linewidth]{example-image}}
163. {\includegraphics[width=0.2\linewidth]{example-image}}
164. {\includegraphics[width=0.2\linewidth]{example-grid-100x100pt}}
166. \test
167. \fourtuxx
168. {\includegraphics[width=\dimexpr0.5\linewidth-1em\relax]{example-image}}
169. {\includegraphics[width=\dimexpr0.5\linewidth-1em\relax]{example-image}}
170. {\includegraphics[width=\dimexpr0.5\linewidth-1em\relax]{example-image}}
171. {\includegraphics[width=0.45\linewidth]{example-grid-100x100pt}}
173. The above image width is max, try more 0.01pt will get:
174. \fourtuxx
175. {\includegraphics[width=\dimexpr0.5\linewidth-1em+0.01pt\relax]{example-image-a}}
176. {}{}{}
178. \end{document}

复制代码

代码仍在测试中，效果：

isee

看着就头大，这代码不友好，长。

色k

回复 2# isee

那不过是因为有四个选项，每次总要重复四次才显得长啊，其实原理是很好理解的。

isee

回复  isee

那不过是因为有四个选项，每次总要重复四次才显得长啊，其实原理是很好理解的。 ...
色k 发表于 2017-6-11 17:13

有曾看到过四选自动排列的代码，相对要短些，可惜，现在找不到了。。。。

色k

回复 4# isee

相信原理都差不多的，肯定不会比我改进前的代码短多少。
重点是原理，上面的代码其实要改短也完全可以，比如将 minipage 环境改成 \parbox ，三行变一行，就会短很多，但我懒得改
习惯了用 minipage，尽管和 \parbox 几乎无区别。

isee

话说昨天网友问我选择题选项怎么排版，我就给了《撸题集》里的相关代码。
那段代码依赖两个宏包：calc、ift ...
色k 发表于 2017-6-11 16:04

对了，这是不是最终版了？若是想拿来就用了。。
哈哈，虽然一般不超过二十道选择题，手控。。。。

kuing

回复 6# isee

嗯，发完这帖后就没改过了（而且也没实际用过了，已经好久没录入过什么了，懒得要死……）

isee

回复 7# kuing


    你自己写了个“宏包”。。。。。先标记。。。。

kuing

稍微优化了一下，不用 \newlength\lxxa 什么了，后面直接用 \wd\xxboxa 来代替即可。
不过奇怪的是，这样替换后，赋值时（\lxxmax\wd\xxboxc 等）后面要加 \relax，否则有可能会出现错误的判断，不知为什么。

kuing

又改了一下，当 \lxxmax>\lhalf 时还是用回 A. #1 \par B. #2 \par C. #3 \par D. #4 好了。
这是因为如果选项很长（比 \linewidth 还长）时，用 \usebox 的话它不会换行，导致右突出。

另外，如果想让很长的选项换行时能有悬挂缩进，还可以将其改为用列表环境来写，或者用 \hangafter 、\hangindent 什么的，这里就不写了，碰到再说。