Re: colored alphabet for string output
- To: mathgroup at smc.vnet.net
- Subject: [mg48266] Re: colored alphabet for string output
- From: bghiggins at ucdavis.edu (Brian Higgins)
- Date: Thu, 20 May 2004 04:03:41 -0400 (EDT)
- References: <c89pot$t2s$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Curt, Here is a slight modification of Jens' solution that makes use
of GridBox instead of RowBox , which then allows one to control the
spacing between the characters by using the ColumnSpacings option
colorString2[str_String] := Module[{ss},
ss = Characters[str];
GridBox[{StyleForm[#, FontColor -> randomColor[]] & /@ ss},
ColumnSpacings -> 0]
]
Cheers,
Brian