
\NewDocumentCommand\foo{>{\SplitList{;}}m}
{
\begin{table}
\begin{tabular}{ \ProcessList{#1} c}
\ProcessList{#1}{\additem}
\end{tabular}
\end{table}}
}
\newcommand\additem[1]{#1 &}
我試圖建立一個動態表,該表將接收列表中盡可能多的參數並輸出到表中,每個項目都是一列。任何幫助將不勝感激。
我的問題是預測表中的列數。並防止
! Package array Error: Illegal pream-token (\ProcessList):
c'使用過。
或者如果我刪除我得到的進程列表
! Extra alignment tab has been changed to \cr.
答案1
目前還不清楚這個命令會做什麼,因為一行表格只是一行,所以tabular
根本不需要:您只需說一下就可以獲得所需的行為
\NewDocumentCommand{\foo}{>{\SplitList{;}}m}{%
\begin{table}
\centering
\ProcessList{#1}{\additem}
\end{table}
}
\newcommand{\additem}[1]{\mbox{\hspace{\tabcolsep}#1\hspace{\tabcolsep}}}
完整的範例,顯式排版相同的表,以便看到輸出完全相同:
\documentclass{article}
\usepackage{xparse}
\NewDocumentCommand{\foo}{>{\SplitList{;}}m}{%
\begin{table}[htp]
\centering
\ProcessList{#1}{\additem}
\end{table}
}
\newcommand{\additem}[1]{\mbox{\hspace{\tabcolsep}#1\hspace{\tabcolsep}}}
\begin{document}
\foo{abc;def;ghijkl;m}
\begin{center}
\begin{tabular}{*{4}{c}}
abc & def & ghijkl & m
\end{tabular}
\end{center}
\end{document}
對於更有用的宏,有一種方法:
\documentclass{article}
\usepackage{xparse}
\ExplSyntaxOn
\NewDocumentCommand{\foo}{m}
{
\bob_make_table:n { #1 }
}
\int_new:N \l_bob_colcount_int
\seq_new:N \l_bob_rows_seq
\seq_new:N \l_bob_temp_seq
\tl_new:N \l_bob_table_tl
\cs_new_protected:Npn \bob_make_table:n #1
{
\seq_set_split:Nnn \l_bob_rows_seq { \\ } { #1 }
\int_zero:N \l_bob_colcount_int
% count the number of columns
\seq_map_inline:Nn \l_bob_rows_seq
{
\seq_set_split:Nnn \l_bob_temp_seq { ; } { ##1 }
\int_compare:nT { \seq_count:N \l_bob_temp_seq > \l_bob_colcount_int }
{
\int_set:Nn \l_bob_colcount_int { \seq_count:N \l_bob_temp_seq }
}
}
% produce the table
\tl_set:Nn \l_bob_table_tl { \begin{tabular}{*{\l_bob_colcount_int}{c}} }
\seq_map_inline:Nn \l_bob_rows_seq
{
\seq_set_split:Nnn \l_bob_temp_seq { ; } { ##1 }
\tl_put_right:Nx \l_bob_table_tl { \seq_use:Nn \l_bob_temp_seq { & } }
\tl_put_right:Nn \l_bob_table_tl { \\ }
}
% print the table
\tl_use:N \l_bob_table_tl
\end{tabular}
}
\ExplSyntaxOff
\begin{document}
\foo{
abc;def\\
ghijkl;m;nopqrs;tu\\
vz
}
\end{document}
行以 分隔\\
,列以 分隔;
。