我正在嘗試生成一個文件來比較一堆字體。我想解析一個數組來加載並嘗試它們。
這就是我所做的：
\documentclass{article}
\usepackage{lipsum}
\usepackage{pgffor}
\usepackage{fontspec}
\def\LoadFont#1{\expandafter\newfontface\csname#1\endcsname{#1}}
\def\UseFont#1{\csname#1\endcsname}
\def\FontList{Charter,Lato,Linux Libertine O}
% these work just fine
%\LoadFont{Charter}
%\LoadFont{Lato}
%\LoadFont{Linux Libertine O}
% THIS DOES NOT WORK
\foreach \FontName in \FontList {\LoadFont\FontName}
\begin{document}
\foreach \FontName in \FontList {\UseFont\FontName\lipsum[1]}
\end{document}
雖然 with 的循環\UseFont工作得很好，但 with 的循環\LoadFont卻不行。就其本身而言，\LoadFont可以實現預期的效果。
我認為這可能是個擴展問題，但我不確定它到底在哪裡；盲目的嘗試毫無結果。
加載週期有什麼問題？
答案1
如同已經解釋的，您觀察到的行為來自於\foreach在範圍限制組內進行迭代的既定功能。
這裡是與\xintFor.我切換到另一種字體，因為我沒有安裝 Lato。
\documentclass{article}
\usepackage{lipsum}
\usepackage{xinttools}
\usepackage{fontspec}
\def\LoadFont#1{\expandafter\newfontface\csname#1\endcsname{#1}}
\def\UseFont#1{\csname#1\endcsname}
% original
% \def\FontList{Charter,Lato,Linux Libertine O}
% as I don't have Lato:
\def\FontList {Charter, TeX Gyre Heros, Linux Libertine O}
\xintFor #1 in \FontList \do {\LoadFont {#1}}
\begin{document}
\xintFor #1 in \FontList \do {\UseFont {#1}\lipsum[1]}
\end{document}
% Local Variables:
% TeX-engine: xetex
% End:
答案2
當你這樣做時
\foreach \FontName in \FontList {\LoadFont\FontName}
該\newfontface指令是在群組內執行的，因此一旦群組結束，字體的定義就會遺失。這是 的一個特點\foreach。
這裡有一組宏，expl3可以為您提供一些擴展它們的想法。
\documentclass{article}
\usepackage{fontspec}
\usepackage{lipsum}
\ExplSyntaxOn
\NewDocumentCommand{\LoadFont}{m}
{
\exp_args:Nc \newfontface { #1 } { #1 }
}
\NewDocumentCommand{\LoadFonts}{m}
{
\clist_map_inline:nn { #1 }
{
\LoadFont{##1}
}
}
\NewDocumentCommand{\UseFont}{m}
{
\use:c { #1 }
}
\NewDocumentCommand{\UseFonts}{m +m}
{
\clist_map_inline:nn { #1 }
{
\group_begin:
\UseFont{##1} ##1:~#2
\group_end:
}
}
\ExplSyntaxOff
\LoadFonts{Charter,Lato,Linux Libertine O}
\begin{document}
\UseFonts{Charter,Lato,Linux Libertine O}{\lipsum[2]}
\end{document}
請注意，\exp_args:Nc \newfontface { #1 } { #1 }本質上與
\expandafter\newfontface\csname #1\endcsname{#1}
如果要對清單使用符號名稱，請定義 * 變體：
\documentclass{article}
\usepackage{fontspec}
\usepackage{lipsum}
\ExplSyntaxOn
\NewDocumentCommand{\LoadFont}{m}
{
\exp_args:Nc \newfontface { #1 } { #1 }
}
\NewDocumentCommand{\LoadFonts}{sm}
{
\IfBooleanTF{#1}
{ \clist_map_inline:Nn #2 }
{ \clist_map_inline:nn { #2 } }
{
\LoadFont{##1}
}
}
\NewDocumentCommand{\UseFont}{m}
{
\use:c { #1 }
}
\NewDocumentCommand{\UseFonts}{s m +m}
{
\IfBooleanTF{#1}
{ \clist_map_inline:Nn #2 }
{ \clist_map_inline:nn { #2 } }
{
\group_begin:
\UseFont{##1} ##1:~#3
\group_end:
}
}
\ExplSyntaxOff
%\LoadFonts{Charter,Lato,Linux Libertine O}
\newcommand\FontList{Charter,Lato,Linux Libertine O}
\LoadFonts*{\FontList}
\begin{document}
%\UseFonts{Charter,Lato,Linux Libertine O}{\lipsum[2]}
\UseFonts*{\FontList}{\lipsum[2]}
\end{document}