Kerning dengan xcolor

Question

Pertanyaan saya, dalam varian, saya melihat, ditanyakan berkali-kali di sini, tetapi saya tidak bisa menyelesaikan masalah.
Jika kami menggunakan \textcolor{FirstLetter}SecondAndOtherLettersOfWord, kami kehilangan font kerning antara huruf pertama dan kedua.
Dengan \showoutputmasuk kami memiliki \special{color push rgb 1 0 0}dan \special{color pop}instruksi.
Bagaimana kita perlu menggabungkan \bgroup,, \egroupdll. (Dari jawaban sebelumnya) dalam hal ini (teks biasa, dan seringkali hanya diwarnai huruf pertama dalam kata)?

XeLateX . Tidak dapat menggunakan luacolor dan LuaLatex.

MWE:

\documentclass{article}
\usepackage{polyglossia}
\usepackage{xcolor}
\begin{document}
\textcolor{red}{V}AR

VAR
\end{document}

Answer 1

Ukur kerning antara bagian kata. Saya telah menambahkan dukungan juga untuk sesuatu sebelum pewarnaan.

\documentclass{article}
\usepackage{xcolor}

\newcommand{\kerncolor}[4]{%
  % #1 = color, #2 = before, #3 = colored part, #4 = after
  \sbox0{#2#3}\sbox2{\mbox{#2}\mbox{#3}}%
  \dimen0=\dimexpr\wd0-\wd2\relax
  \sbox0{#3#4}\sbox2{\mbox{#3}\mbox{#4}}%
  \dimen2=\dimexpr\wd0-\wd2\relax
  #2\kern\dimen0 \textcolor{#1}{#3}\kern\dimen2 #4%
}

\begin{document}

\kerncolor{red}{}{V}{AR}

VAR

\sbox0{\kerncolor{red}{}{V}{AR}}\the\wd0

\sbox0{VAR}\the\wd0

\itshape

\kerncolor{red}{}{V}{AR}

VAR

\sbox0{\kerncolor{red}{}{V}{AR}}\the\wd0

\sbox0{VAR}\the\wd0

\end{document}