索引中首字母大写

Question

我目前正在使用以下索引：

\documentclass[a4paper,11pt,twoside, openleft]{book}

\definecolor{DarkDarkPurple}{RGB}{63, 22, 59}

\usepackage{imakeidx}
\newcommand{\boldindex}[1]{\textcolor{DarkPurple}{\textbf{#1}}\index{#1}}
\makeindex[intoc]

\begin{document}

\boldindex{Test}\\
\boldindex{tEst}\\
\boldindex{teSt}\\
\boldindex{tesT}

\printindex

\end{document}

我怎样才能索引每个以大写字母开头的单词，同时保留文本中的小写字母？

Answer 1

DarkPurple请制作可编译的示例：缺少的定义，并且openleft的选项不存在book。

\documentclass[a4paper,11pt,twoside]{book}
\usepackage{xcolor}
\usepackage{imakeidx}

\makeindex[intoc]

\ExplSyntaxOn
\NewDocumentCommand{\boldindex}{m}
 {
  \textcolor{DarkPurple}{\textbf{#1}}
  \index{\char_titlecase:N #1}
 }
\ExplSyntaxOff

\colorlet{DarkPurple}{purple} % ???

\begin{document}

\boldindex{Test}
\boldindex{tEst}
\boldindex{teSt}
\boldindex{tesT}

\printindex

\end{document}

当然这会不是如果首字母是复合字符，则有效。