Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Text Output

• To: mathgroup at smc.vnet.net
• Subject: [mg106679] Text Output
• From: Chris Degnen <degnen at cwgsy.net>
• Date: Thu, 21 Jan 2010 04:50:38 -0500 (EST)

Hi all,

Can anyone figure out a way to put bold or italics within justified
text.  Below is an example of a text segment as used in my
application.  "Lamh Dearg Abu" should be in italics.

text = Graphics[{White, Rectangle[{0, 0}, {590, 52}], Black,
    Inset[
     TextCell[
      "He said and then lifted he in his rude great brawny \
strengthy hands the medher of dark strong foamy ale and, \
uttering his tribal slogan Lamh Dearg Abu, he drank to the \
undoing of his foes, a race of mighty valorous heroes, rulers \
of the waves, who sit on thrones of alabaster silent as the \
deathless gods.",
      LineSpacing -> {0, 16}, TextJustification -> 1], {0, 0}, {Left,
      Bottom}, {590, Automatic}]}, PlotRange -> {{0, 590}, {0, 52}},
   BaseStyle -> {FontFamily -> "Franklin Gothic Book",
         FontWeight -> "Plain", FontSize -> 13}];
box = Graphics[{LightGray, Rectangle[{0, 0}, {629, 90}],
    Inset[text, {314.5, 45}, {Center, Center}, {590, 52}]},
   PlotRange -> {{0, 629}, {0, 90}}, ImageSize -> 629];
Print[box];

• Follow-Ups:
  • Re: Text Output
    • From: Leonid Shifrin <lshifr@gmail.com>