|
[Date Index]
[Thread Index]
[Author Index]
Re: Coloured strings
- To: mathgroup at smc.vnet.net
- Subject: [mg126250] Re: Coloured strings
- From: David Bailey <dave at removedbailey.co.uk>
- Date: Fri, 27 Apr 2012 06:48:32 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <201204250432.AAA06468@smc.vnet.net> <jnb48n$5ap$1@smc.vnet.net>
On 26/04/2012 10:24, Adriano Pascoletti wrote:
> ToString[<coloured string>] removes colors
> Adriano Pascoletti
>
> 2012/4/25 David Bailey<dave at removedbailey.co.uk>
>
>> If you take an expression such as:
>> "ABCDEFGHIJKLMNOPQRSTUVWXYZ"//FullForm
>>
>> and colour some portions of the string, you obtain:
>>
>> \!\(\*
>> TagBox[
>> StyleBox["\"\<\\!\\(\\*\\nStyleBox[\\(ABC\\*\\n StyleBox[\\\"DEF\\\",\
>> \\nFontColor->RGBColor[1, 0, 0]]GHIJKLMN\\*\\n \
>> StyleBox[\\\"OPQRSTUV\\\",\\nFontColor->RGBColor[0, 0, 1]]WXYZ\\)]\\)\
>> \>\"",
>> ShowSpecialCharacters->False,
>> ShowStringCharacters->True,
>> NumberMarks->True],
>> FullForm]\)
>>
>> I am wondering if anyone knows an easy way to remove the colouring from
>> such a string - other than creating a fairly complicated string pattern
>> (bearing in mind that the original string might contain unpaired quotes,
>> etc!)
>>
>> David Bailey
>> http://www.dbaileyconsultancy.co.uk
>>
>>
Thanks,
what a simple and elegant solution! Somehow I would never have thought
of feeding a string to ToString.
David Bailey
http://www.dbaileyconsultancy.co.uk
Prev by Date:
Re: is there internal variable like $0 in perl?
Next by Date:
Re: is there internal variable like $0 in perl?
Previous by thread:
Re: Coloured strings
Next by thread:
Print out an Expression Letter by Letter on the same line
|