src/richtext/richtextstyles.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/richtext/richtextstyles.cpp
   3 // Purpose:     Style management for wxRichTextCtrl
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     2005-09-30
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #ifdef __BORLANDC__
  16   #pragma hdrstop
  17 #endif
  18
  19 #if wxUSE_RICHTEXT
  20
  21 #include "wx/richtext/richtextstyles.h"
  22
  23 #ifndef WX_PRECOMP
  24   #include "wx/wx.h"
  25 #endif
  26
  27 #include "wx/filename.h"
  28 #include "wx/clipbrd.h"
  29 #include "wx/wfstream.h"
  30 #include "wx/settings.h"
  31
  32 #include "wx/richtext/richtextctrl.h"
  33
  34 IMPLEMENT_CLASS(wxRichTextStyleDefinition, wxObject)
  35 IMPLEMENT_CLASS(wxRichTextCharacterStyleDefinition, wxRichTextStyleDefinition)
  36 IMPLEMENT_CLASS(wxRichTextParagraphStyleDefinition, wxRichTextStyleDefinition)
  37 IMPLEMENT_CLASS(wxRichTextListStyleDefinition, wxRichTextParagraphStyleDefinition)
  38
  39 /*!
  40  * A definition
  41  */
  42
  43 void wxRichTextStyleDefinition::Copy(const wxRichTextStyleDefinition& def)
  44 {
  45     m_name = def.m_name;
  46     m_baseStyle = def.m_baseStyle;
  47     m_style = def.m_style;
  48     m_description = def.m_description;
  49 }
  50
  51 bool wxRichTextStyleDefinition::Eq(const wxRichTextStyleDefinition& def) const
  52 {
  53     return (m_name == def.m_name && m_baseStyle == def.m_baseStyle && m_style == def.m_style);
  54 }
  55
  56 /// Gets the style combined with the base style
  57 wxTextAttr wxRichTextStyleDefinition::GetStyleMergedWithBase(const wxRichTextStyleSheet* sheet) const
  58 {
  59     if (!m_baseStyle.IsEmpty())
  60     {
  61         wxRichTextStyleDefinition* baseStyle = sheet->FindStyle(m_baseStyle);
  62         if (baseStyle)
  63         {
  64             wxTextAttr baseAttr = baseStyle->GetStyleMergedWithBase(sheet);
  65             baseAttr.Apply(m_style, NULL);
  66             return baseAttr;
  67         }
  68     }
  69     return m_style;
  70 }
  71
  72 /*!
  73  * Paragraph style definition
  74  */
  75
  76 void wxRichTextParagraphStyleDefinition::Copy(const wxRichTextParagraphStyleDefinition& def)
  77 {
  78     wxRichTextStyleDefinition::Copy(def);
  79
  80     m_nextStyle = def.m_nextStyle;
  81 }
  82
  83 bool wxRichTextParagraphStyleDefinition::operator ==(const wxRichTextParagraphStyleDefinition& def) const
  84 {
  85     return (Eq(def) && m_nextStyle == def.m_nextStyle);
  86 }
  87
  88 /*!
  89  * List style definition
  90  */
  91
  92 void wxRichTextListStyleDefinition::Copy(const wxRichTextListStyleDefinition& def)
  93 {
  94     wxRichTextParagraphStyleDefinition::Copy(def);
  95
  96     int i;
  97     for (i = 0; i < 10; i++)
  98         m_levelStyles[i] = def.m_levelStyles[i];
  99 }
 100
 101 bool wxRichTextListStyleDefinition::operator ==(const wxRichTextListStyleDefinition& def) const
 102 {
 103     if (!Eq(def))
 104         return false;
 105     int i;
 106     for (i = 0; i < 10; i++)
 107         if (!(m_levelStyles[i] == def.m_levelStyles[i]))
 108             return false;
 109
 110     return true;
 111 }
 112
 113 /// Sets/gets the attributes for the given level
 114 void wxRichTextListStyleDefinition::SetLevelAttributes(int i, const wxTextAttr& attr)
 115 {
 116     wxASSERT( (i >= 0 && i < 10) );
 117     if (i >= 0 && i < 10)
 118         m_levelStyles[i] = attr;
 119 }
 120
 121 const wxTextAttr* wxRichTextListStyleDefinition::GetLevelAttributes(int i) const
 122 {
 123     wxASSERT( (i >= 0 && i < 10) );
 124     if (i >= 0 && i < 10)
 125         return & m_levelStyles[i];
 126     else
 127         return NULL;
 128 }
 129
 130 wxTextAttr* wxRichTextListStyleDefinition::GetLevelAttributes(int i)
 131 {
 132     wxASSERT( (i >= 0 && i < 10) );
 133     if (i >= 0 && i < 10)
 134         return & m_levelStyles[i];
 135     else
 136         return NULL;
 137 }
 138
 139 /// Convenience function for setting the major attributes for a list level specification
 140 void wxRichTextListStyleDefinition::SetAttributes(int i, int leftIndent, int leftSubIndent, int bulletStyle, const wxString& bulletSymbol)
 141 {
 142     wxASSERT( (i >= 0 && i < 10) );
 143     if (i >= 0 && i < 10)
 144     {
 145         wxTextAttr attr;
 146
 147         attr.SetBulletStyle(bulletStyle);
 148         attr.SetLeftIndent(leftIndent, leftSubIndent);
 149
 150         if (!bulletSymbol.IsEmpty())
 151         {
 152             if (bulletStyle & wxTEXT_ATTR_BULLET_STYLE_SYMBOL)
 153                 attr.SetBulletText(bulletSymbol);
 154             else
 155                 attr.SetBulletName(bulletSymbol);
 156         }
 157
 158         m_levelStyles[i] = attr;
 159     }
 160 }
 161
 162 /// Finds the level corresponding to the given indentation
 163 int wxRichTextListStyleDefinition::FindLevelForIndent(int indent) const
 164 {
 165     int i;
 166     for (i = 0; i < 10; i++)
 167     {
 168         if (indent < m_levelStyles[i].GetLeftIndent())
 169         {
 170             if (i > 0)
 171                 return i - 1;
 172             else
 173                 return 0;
 174         }
 175     }
 176     return 9;
 177 }
 178
 179 /// Combine the list style with a paragraph style, using the given indent (from which
 180 /// an appropriate level is found)
 181 wxTextAttr wxRichTextListStyleDefinition::CombineWithParagraphStyle(int indent, const wxTextAttr& paraStyle, wxRichTextStyleSheet* styleSheet)
 182 {
 183     int listLevel = FindLevelForIndent(indent);
 184
 185     wxTextAttr attr(*GetLevelAttributes(listLevel));
 186     int oldLeftIndent = attr.GetLeftIndent();
 187     int oldLeftSubIndent = attr.GetLeftSubIndent();
 188
 189     // First apply the overall paragraph style, if any
 190     if (styleSheet)
 191         attr.Apply(GetStyleMergedWithBase(styleSheet));
 192     else
 193         attr.Apply(GetStyle());
 194
 195     // Then apply paragraph style, e.g. from paragraph style definition
 196     attr.Apply(paraStyle);
 197
 198     // We override the indents according to the list definition
 199     attr.SetLeftIndent(oldLeftIndent, oldLeftSubIndent);
 200
 201     return attr;
 202 }
 203
 204 /// Combine the base and list style, using the given indent (from which
 205 /// an appropriate level is found)
 206 wxTextAttr wxRichTextListStyleDefinition::GetCombinedStyle(int indent, wxRichTextStyleSheet* styleSheet)
 207 {
 208     int listLevel = FindLevelForIndent(indent);
 209     return GetCombinedStyleForLevel(listLevel, styleSheet);
 210 }
 211
 212 /// Combine the base and list style, using the given indent (from which
 213 /// an appropriate level is found)
 214 wxTextAttr wxRichTextListStyleDefinition::GetCombinedStyleForLevel(int listLevel, wxRichTextStyleSheet* styleSheet)
 215 {
 216     wxTextAttr attr(*GetLevelAttributes(listLevel));
 217     int oldLeftIndent = attr.GetLeftIndent();
 218     int oldLeftSubIndent = attr.GetLeftSubIndent();
 219
 220     // Apply the overall paragraph style, if any
 221     if (styleSheet)
 222         attr.Apply(GetStyleMergedWithBase(styleSheet));
 223     else
 224         attr.Apply(GetStyle());
 225
 226     // We override the indents according to the list definition
 227     attr.SetLeftIndent(oldLeftIndent, oldLeftSubIndent);
 228
 229     return attr;
 230 }
 231
 232 /// Is this a numbered list?
 233 bool wxRichTextListStyleDefinition::IsNumbered(int i) const
 234 {
 235     return (0 != (GetLevelAttributes(i)->GetFlags() &
 236                    (wxTEXT_ATTR_BULLET_STYLE_ARABIC|wxTEXT_ATTR_BULLET_STYLE_LETTERS_UPPER|wxTEXT_ATTR_BULLET_STYLE_LETTERS_LOWER|
 237                     wxTEXT_ATTR_BULLET_STYLE_ROMAN_UPPER|wxTEXT_ATTR_BULLET_STYLE_ROMAN_LOWER)));
 238 }
 239
 240 /*!
 241  * The style manager
 242  */
 243
 244 IMPLEMENT_CLASS(wxRichTextStyleSheet, wxObject)
 245
 246 wxRichTextStyleSheet::~wxRichTextStyleSheet()
 247 {
 248     DeleteStyles();
 249
 250     if (m_nextSheet)
 251         m_nextSheet->m_previousSheet = m_previousSheet;
 252
 253     if (m_previousSheet)
 254         m_previousSheet->m_nextSheet = m_nextSheet;
 255
 256     m_previousSheet = NULL;
 257     m_nextSheet = NULL;
 258 }
 259
 260 /// Initialisation
 261 void wxRichTextStyleSheet::Init()
 262 {
 263     m_previousSheet = NULL;
 264     m_nextSheet = NULL;
 265 }
 266
 267 /// Add a definition to one of the style lists
 268 bool wxRichTextStyleSheet::AddStyle(wxList& list, wxRichTextStyleDefinition* def)
 269 {
 270     if (!list.Find(def))
 271         list.Append(def);
 272     return true;
 273 }
 274
 275 /// Remove a style
 276 bool wxRichTextStyleSheet::RemoveStyle(wxList& list, wxRichTextStyleDefinition* def, bool deleteStyle)
 277 {
 278     wxList::compatibility_iterator node = list.Find(def);
 279     if (node)
 280     {
 281         wxRichTextStyleDefinition* def = (wxRichTextStyleDefinition*) node->GetData();
 282         list.Erase(node);
 283         if (deleteStyle)
 284             delete def;
 285         return true;
 286     }
 287     else
 288         return false;
 289 }
 290
 291 /// Remove a style
 292 bool wxRichTextStyleSheet::RemoveStyle(wxRichTextStyleDefinition* def, bool deleteStyle)
 293 {
 294     if (RemoveParagraphStyle(def, deleteStyle))
 295         return true;
 296     if (RemoveCharacterStyle(def, deleteStyle))
 297         return true;
 298     if (RemoveListStyle(def, deleteStyle))
 299         return true;
 300     return false;
 301 }
 302
 303 /// Find a definition by name
 304 wxRichTextStyleDefinition* wxRichTextStyleSheet::FindStyle(const wxList& list, const wxString& name, bool recurse) const
 305 {
 306     for (wxList::compatibility_iterator node = list.GetFirst(); node; node = node->GetNext())
 307     {
 308         wxRichTextStyleDefinition* def = (wxRichTextStyleDefinition*) node->GetData();
 309         if (def->GetName().Lower() == name.Lower())
 310             return def;
 311     }
 312
 313     if (m_nextSheet && recurse)
 314         return m_nextSheet->FindStyle(list, name, recurse);
 315
 316     return NULL;
 317 }
 318
 319 /// Delete all styles
 320 void wxRichTextStyleSheet::DeleteStyles()
 321 {
 322     WX_CLEAR_LIST(wxList, m_characterStyleDefinitions);
 323     WX_CLEAR_LIST(wxList, m_paragraphStyleDefinitions);
 324     WX_CLEAR_LIST(wxList, m_listStyleDefinitions);
 325 }
 326
 327 /// Insert into list of style sheets
 328 bool wxRichTextStyleSheet::InsertSheet(wxRichTextStyleSheet* before)
 329 {
 330     m_previousSheet = before->m_previousSheet;
 331     m_nextSheet = before;
 332
 333     before->m_previousSheet = this;
 334     return true;
 335 }
 336
 337 /// Append to list of style sheets
 338 bool wxRichTextStyleSheet::AppendSheet(wxRichTextStyleSheet* after)
 339 {
 340     wxRichTextStyleSheet* last = after;
 341     while (last && last->m_nextSheet)
 342     {
 343         last = last->m_nextSheet;
 344     }
 345
 346     if (last)
 347     {
 348         m_previousSheet = last;
 349         last->m_nextSheet = this;
 350
 351         return true;
 352     }
 353     else
 354         return false;
 355 }
 356
 357 /// Unlink from the list of style sheets
 358 void wxRichTextStyleSheet::Unlink()
 359 {
 360     if (m_previousSheet)
 361         m_previousSheet->m_nextSheet = m_nextSheet;
 362     if (m_nextSheet)
 363         m_nextSheet->m_previousSheet = m_previousSheet;
 364
 365     m_previousSheet = NULL;
 366     m_nextSheet = NULL;
 367 }
 368
 369 /// Add a definition to the character style list
 370 bool wxRichTextStyleSheet::AddCharacterStyle(wxRichTextCharacterStyleDefinition* def)
 371 {
 372     def->GetStyle().SetCharacterStyleName(def->GetName());
 373     return AddStyle(m_characterStyleDefinitions, def);
 374 }
 375
 376 /// Add a definition to the paragraph style list
 377 bool wxRichTextStyleSheet::AddParagraphStyle(wxRichTextParagraphStyleDefinition* def)
 378 {
 379     def->GetStyle().SetParagraphStyleName(def->GetName());
 380     return AddStyle(m_paragraphStyleDefinitions, def);
 381 }
 382
 383 /// Add a definition to the list style list
 384 bool wxRichTextStyleSheet::AddListStyle(wxRichTextListStyleDefinition* def)
 385 {
 386     def->GetStyle().SetListStyleName(def->GetName());
 387     return AddStyle(m_listStyleDefinitions, def);
 388 }
 389
 390 /// Add a definition to the appropriate style list
 391 bool wxRichTextStyleSheet::AddStyle(wxRichTextStyleDefinition* def)
 392 {
 393     wxRichTextListStyleDefinition* listDef = wxDynamicCast(def, wxRichTextListStyleDefinition);
 394     if (listDef)
 395         return AddListStyle(listDef);
 396
 397     wxRichTextParagraphStyleDefinition* paraDef = wxDynamicCast(def, wxRichTextParagraphStyleDefinition);
 398     if (paraDef)
 399         return AddParagraphStyle(paraDef);
 400
 401     wxRichTextCharacterStyleDefinition* charDef = wxDynamicCast(def, wxRichTextCharacterStyleDefinition);
 402     if (charDef)
 403         return AddCharacterStyle(charDef);
 404
 405     return false;
 406 }
 407
 408 /// Find any definition by name
 409 wxRichTextStyleDefinition* wxRichTextStyleSheet::FindStyle(const wxString& name, bool recurse) const
 410 {
 411     wxRichTextListStyleDefinition* listDef = FindListStyle(name, recurse);
 412     if (listDef)
 413         return listDef;
 414
 415     wxRichTextParagraphStyleDefinition* paraDef = FindParagraphStyle(name, recurse);
 416     if (paraDef)
 417         return paraDef;
 418
 419     wxRichTextCharacterStyleDefinition* charDef = FindCharacterStyle(name, recurse);
 420     if (charDef)
 421         return charDef;
 422
 423     return NULL;
 424 }
 425
 426 /// Copy
 427 void wxRichTextStyleSheet::Copy(const wxRichTextStyleSheet& sheet)
 428 {
 429     DeleteStyles();
 430
 431     wxList::compatibility_iterator node;
 432
 433     for (node = sheet.m_characterStyleDefinitions.GetFirst(); node; node = node->GetNext())
 434     {
 435         wxRichTextCharacterStyleDefinition* def = (wxRichTextCharacterStyleDefinition*) node->GetData();
 436         AddCharacterStyle(new wxRichTextCharacterStyleDefinition(*def));
 437     }
 438
 439     for (node = sheet.m_paragraphStyleDefinitions.GetFirst(); node; node = node->GetNext())
 440     {
 441         wxRichTextParagraphStyleDefinition* def = (wxRichTextParagraphStyleDefinition*) node->GetData();
 442         AddParagraphStyle(new wxRichTextParagraphStyleDefinition(*def));
 443     }
 444
 445     for (node = sheet.m_listStyleDefinitions.GetFirst(); node; node = node->GetNext())
 446     {
 447         wxRichTextListStyleDefinition* def = (wxRichTextListStyleDefinition*) node->GetData();
 448         AddListStyle(new wxRichTextListStyleDefinition(*def));
 449     }
 450
 451     SetName(sheet.GetName());
 452     SetDescription(sheet.GetDescription());
 453 }
 454
 455 /// Equality
 456 bool wxRichTextStyleSheet::operator==(const wxRichTextStyleSheet& WXUNUSED(sheet)) const
 457 {
 458     // TODO
 459     return false;
 460 }
 461
 462
 463 #if wxUSE_HTML
 464 /*!
 465  * wxRichTextStyleListBox: a listbox to display styles.
 466  */
 467
 468 IMPLEMENT_CLASS(wxRichTextStyleListBox, wxHtmlListBox)
 469
 470 BEGIN_EVENT_TABLE(wxRichTextStyleListBox, wxHtmlListBox)
 471     EVT_LEFT_DOWN(wxRichTextStyleListBox::OnLeftDown)
 472     EVT_LEFT_DCLICK(wxRichTextStyleListBox::OnLeftDoubleClick)
 473     EVT_IDLE(wxRichTextStyleListBox::OnIdle)
 474 END_EVENT_TABLE()
 475
 476 wxRichTextStyleListBox::wxRichTextStyleListBox(wxWindow* parent, wxWindowID id, const wxPoint& pos,
 477     const wxSize& size, long style)
 478 {
 479     Init();
 480     Create(parent, id, pos, size, style);
 481 }
 482
 483 bool wxRichTextStyleListBox::Create(wxWindow* parent, wxWindowID id, const wxPoint& pos,
 484         const wxSize& size, long style)
 485 {
 486     return wxHtmlListBox::Create(parent, id, pos, size, style);
 487 }
 488
 489 wxRichTextStyleListBox::~wxRichTextStyleListBox()
 490 {
 491 }
 492
 493 /// Returns the HTML for this item
 494 wxString wxRichTextStyleListBox::OnGetItem(size_t n) const
 495 {
 496     if (!GetStyleSheet())
 497         return wxEmptyString;
 498
 499     wxRichTextStyleDefinition* def = GetStyle(n);
 500     if (def)
 501         return CreateHTML(def);
 502
 503     return wxEmptyString;
 504 }
 505
 506 // Get style for index
 507 wxRichTextStyleDefinition* wxRichTextStyleListBox::GetStyle(size_t i) const
 508 {
 509     if (!GetStyleSheet())
 510         return NULL;
 511
 512     if (i >= m_styleNames.GetCount() /* || i < 0 */ )
 513         return NULL;
 514
 515     return GetStyleSheet()->FindStyle(m_styleNames[i]);
 516 }
 517
 518 /// Updates the list
 519 void wxRichTextStyleListBox::UpdateStyles()
 520 {
 521     if (GetStyleSheet())
 522     {
 523         int oldSel = GetSelection();
 524
 525         SetSelection(wxNOT_FOUND);
 526
 527         m_styleNames.Clear();
 528
 529         size_t i;
 530         if (GetStyleType() == wxRICHTEXT_STYLE_ALL || GetStyleType() == wxRICHTEXT_STYLE_PARAGRAPH)
 531         {
 532             for (i = 0; i < GetStyleSheet()->GetParagraphStyleCount(); i++)
 533                 m_styleNames.Add(GetStyleSheet()->GetParagraphStyle(i)->GetName());
 534         }
 535         if (GetStyleType() == wxRICHTEXT_STYLE_ALL || GetStyleType() == wxRICHTEXT_STYLE_CHARACTER)
 536         {
 537             for (i = 0; i < GetStyleSheet()->GetCharacterStyleCount(); i++)
 538                 m_styleNames.Add(GetStyleSheet()->GetCharacterStyle(i)->GetName());
 539         }
 540         if (GetStyleType() == wxRICHTEXT_STYLE_ALL || GetStyleType() == wxRICHTEXT_STYLE_LIST)
 541         {
 542             for (i = 0; i < GetStyleSheet()->GetListStyleCount(); i++)
 543                 m_styleNames.Add(GetStyleSheet()->GetListStyle(i)->GetName());
 544         }
 545
 546         m_styleNames.Sort();
 547         SetItemCount(m_styleNames.GetCount());
 548
 549         Refresh();
 550
 551         int newSel = -1;
 552         if (oldSel >= 0 && oldSel < (int) GetItemCount())
 553             newSel = oldSel;
 554         else if (GetItemCount() > 0)
 555             newSel = 0;
 556
 557         if (newSel >= 0)
 558         {
 559             SetSelection(newSel);
 560             SendSelectedEvent();
 561         }
 562     }
 563 }
 564
 565 // Get index for style name
 566 int wxRichTextStyleListBox::GetIndexForStyle(const wxString& name) const
 567 {
 568     return m_styleNames.Index(name);
 569 }
 570
 571 /// Set selection for string
 572 int wxRichTextStyleListBox::SetStyleSelection(const wxString& name)
 573 {
 574     int i = GetIndexForStyle(name);
 575     if (i > -1)
 576         SetSelection(i);
 577     return i;
 578 }
 579
 580 // Convert a colour to a 6-digit hex string
 581 static wxString ColourToHexString(const wxColour& col)
 582 {
 583     wxString hex;
 584
 585     hex += wxDecToHex(col.Red());
 586     hex += wxDecToHex(col.Green());
 587     hex += wxDecToHex(col.Blue());
 588
 589     return hex;
 590 }
 591
 592 /// Creates a suitable HTML fragment for a definition
 593 wxString wxRichTextStyleListBox::CreateHTML(wxRichTextStyleDefinition* def) const
 594 {
 595     // TODO: indicate list format for list style types
 596
 597     wxString str;
 598
 599     bool isCentred = false;
 600
 601     wxTextAttr attr(def->GetStyleMergedWithBase(GetStyleSheet()));
 602
 603     if (attr.HasAlignment() && attr.GetAlignment() == wxTEXT_ALIGNMENT_CENTRE)
 604         isCentred = true;
 605
 606     if (isCentred)
 607         str << wxT("<center>");
 608
 609
 610     str << wxT("<table><tr>");
 611
 612     if (attr.GetLeftIndent() > 0)
 613     {
 614         wxClientDC dc((wxWindow*) this);
 615
 616         str << wxT("<td width=") << wxMin(50, (ConvertTenthsMMToPixels(dc, attr.GetLeftIndent())/2)) << wxT("></td>");
 617     }
 618
 619     if (isCentred)
 620         str << wxT("<td nowrap align=\"center\">");
 621     else
 622         str << wxT("<td nowrap>");
 623
 624 #ifdef __WXMSW__
 625     int size = 2;
 626 #else
 627     int size = 3;
 628 #endif
 629
 630     // Guess a standard font size
 631     int stdFontSize = 0;
 632
 633     // First see if we have a default/normal style to base the size on
 634     wxString normalTranslated(_("normal"));
 635     wxString defaultTranslated(_("default"));
 636     size_t i;
 637     for (i = 0; i < m_styleNames.GetCount(); i++)
 638     {
 639         wxString name = m_styleNames[i].Lower();
 640         if (name.Find(wxT("normal")) != wxNOT_FOUND || name.Find(normalTranslated) != wxNOT_FOUND ||
 641                 name.Find(wxT("default")) != wxNOT_FOUND || name.Find(defaultTranslated) != wxNOT_FOUND)
 642         {
 643             wxRichTextStyleDefinition* d = GetStyleSheet()->FindStyle(m_styleNames[i]);
 644             if (d)
 645             {
 646                 wxRichTextAttr attr2(d->GetStyleMergedWithBase(GetStyleSheet()));
 647                 if (attr2.HasFontSize())
 648                 {
 649                     stdFontSize = attr2.GetFontSize();
 650                     break;
 651                 }
 652             }
 653         }
 654     }
 655
 656     if (stdFontSize == 0)
 657     {
 658         // Look at sizes up to 20 points, and see which is the most common
 659         wxArrayInt sizes;
 660         size_t maxSize = 20;
 661         for (i = 0; i <= maxSize; i++)
 662             sizes.Add(0);
 663         for (i = 0; i < m_styleNames.GetCount(); i++)
 664         {
 665             wxRichTextStyleDefinition* d = GetStyleSheet()->FindStyle(m_styleNames[i]);
 666             if (d)
 667             {
 668                 wxRichTextAttr attr2(d->GetStyleMergedWithBase(GetStyleSheet()));
 669                 if (attr2.HasFontSize())
 670                 {
 671                     if (attr2.GetFontSize() <= (int) maxSize)
 672                         sizes[attr2.GetFontSize()] ++;
 673                 }
 674             }
 675         }
 676         int mostCommonSize = 0;
 677         for (i = 0; i <= maxSize; i++)
 678         {
 679             if (sizes[i] > mostCommonSize)
 680                 mostCommonSize = i;
 681         }
 682         if (mostCommonSize > 0)
 683             stdFontSize = mostCommonSize;
 684     }
 685
 686     if (stdFontSize == 0)
 687         stdFontSize = 12;
 688
 689     int thisFontSize = ((attr.GetFlags() & wxTEXT_ATTR_FONT_SIZE) != 0) ? attr.GetFontSize() : stdFontSize;
 690
 691     if (thisFontSize < stdFontSize)
 692         size --;
 693     else if (thisFontSize > stdFontSize)
 694         size ++;
 695
 696     str += wxT("<font");
 697
 698     str << wxT(" size=") << size;
 699
 700     if (!attr.GetFontFaceName().IsEmpty())
 701         str << wxT(" face=\"") << attr.GetFontFaceName() << wxT("\"");
 702
 703     if (attr.GetTextColour().Ok())
 704         str << wxT(" color=\"#") << ColourToHexString(attr.GetTextColour()) << wxT("\"");
 705
 706     str << wxT(">");
 707
 708     bool hasBold = false;
 709     bool hasItalic = false;
 710     bool hasUnderline = false;
 711
 712     if (attr.GetFontWeight() == wxBOLD)
 713         hasBold = true;
 714     if (attr.GetFontStyle() == wxITALIC)
 715         hasItalic = true;
 716     if (attr.GetFontUnderlined())
 717         hasUnderline = true;
 718
 719     if (hasBold)
 720         str << wxT("<b>");
 721     if (hasItalic)
 722         str << wxT("<i>");
 723     if (hasUnderline)
 724         str << wxT("<u>");
 725
 726     str += def->GetName();
 727
 728     if (hasUnderline)
 729         str << wxT("</u>");
 730     if (hasItalic)
 731         str << wxT("</i>");
 732     if (hasBold)
 733         str << wxT("</b>");
 734
 735     if (isCentred)
 736         str << wxT("</centre>");
 737
 738     str << wxT("</font>");
 739
 740     str << wxT("</td></tr></table>");
 741
 742     if (isCentred)
 743         str << wxT("</center>");
 744
 745     return str;
 746 }
 747
 748 // Convert units in tends of a millimetre to device units
 749 int wxRichTextStyleListBox::ConvertTenthsMMToPixels(wxDC& dc, int units) const
 750 {
 751     int ppi = dc.GetPPI().x;
 752
 753     // There are ppi pixels in 254.1 "1/10 mm"
 754
 755     double pixels = ((double) units * (double)ppi) / 254.1;
 756
 757     return (int) pixels;
 758 }
 759
 760 void wxRichTextStyleListBox::OnLeftDown(wxMouseEvent& event)
 761 {
 762     wxVListBox::OnLeftDown(event);
 763
 764     int item = VirtualHitTest(event.GetPosition().y);
 765     if (item != wxNOT_FOUND && GetApplyOnSelection())
 766         ApplyStyle(item);
 767 }
 768
 769 void wxRichTextStyleListBox::OnLeftDoubleClick(wxMouseEvent& event)
 770 {
 771     wxVListBox::OnLeftDown(event);
 772
 773     int item = VirtualHitTest(event.GetPosition().y);
 774     if (item != wxNOT_FOUND && !GetApplyOnSelection())
 775         ApplyStyle(item);
 776 }
 777
 778 /// Helper for listbox and combo control
 779 wxString wxRichTextStyleListBox::GetStyleToShowInIdleTime(wxRichTextCtrl* ctrl, wxRichTextStyleType styleType)
 780 {
 781     int adjustedCaretPos = ctrl->GetAdjustedCaretPosition(ctrl->GetCaretPosition());
 782
 783     wxString styleName;
 784
 785     wxTextAttr attr;
 786     ctrl->GetStyle(adjustedCaretPos, attr);
 787
 788     // Take into account current default style just chosen by user
 789     if (ctrl->IsDefaultStyleShowing())
 790     {
 791         wxRichTextApplyStyle(attr, ctrl->GetDefaultStyleEx());
 792
 793         if ((styleType == wxRICHTEXT_STYLE_ALL || styleType == wxRICHTEXT_STYLE_CHARACTER) &&
 794                           !attr.GetCharacterStyleName().IsEmpty())
 795             styleName = attr.GetCharacterStyleName();
 796         else if ((styleType == wxRICHTEXT_STYLE_ALL || styleType == wxRICHTEXT_STYLE_PARAGRAPH) &&
 797                           !attr.GetParagraphStyleName().IsEmpty())
 798             styleName = attr.GetParagraphStyleName();
 799         else if ((styleType == wxRICHTEXT_STYLE_ALL || styleType == wxRICHTEXT_STYLE_LIST) &&
 800                           !attr.GetListStyleName().IsEmpty())
 801             styleName = attr.GetListStyleName();
 802     }
 803     else if ((styleType == wxRICHTEXT_STYLE_ALL || styleType == wxRICHTEXT_STYLE_CHARACTER) &&
 804              !attr.GetCharacterStyleName().IsEmpty())
 805     {
 806         styleName = attr.GetCharacterStyleName();
 807     }
 808     else if ((styleType == wxRICHTEXT_STYLE_ALL || styleType == wxRICHTEXT_STYLE_PARAGRAPH) &&
 809              !attr.GetParagraphStyleName().IsEmpty())
 810     {
 811         styleName = attr.GetParagraphStyleName();
 812     }
 813     else if ((styleType == wxRICHTEXT_STYLE_ALL || styleType == wxRICHTEXT_STYLE_LIST) &&
 814              !attr.GetListStyleName().IsEmpty())
 815     {
 816         styleName = attr.GetListStyleName();
 817     }
 818
 819     return styleName;
 820 }
 821
 822 /// Auto-select from style under caret in idle time
 823 void wxRichTextStyleListBox::OnIdle(wxIdleEvent& event)
 824 {
 825     if (CanAutoSetSelection() && GetRichTextCtrl() && IsShownOnScreen() && wxWindow::FindFocus() != this)
 826     {
 827         wxString styleName = GetStyleToShowInIdleTime(GetRichTextCtrl(), GetStyleType());
 828
 829         int sel = GetSelection();
 830         if (!styleName.IsEmpty())
 831         {
 832             // Don't do the selection if it's already set
 833             if (sel == GetIndexForStyle(styleName))
 834                 return;
 835
 836             SetStyleSelection(styleName);
 837         }
 838         else if (sel != -1)
 839             SetSelection(-1);
 840     }
 841     event.Skip();
 842 }
 843
 844 /// Do selection
 845 void wxRichTextStyleListBox::ApplyStyle(int item)
 846 {
 847     if ( item != wxNOT_FOUND )
 848     {
 849         wxRichTextStyleDefinition* def = GetStyle(item);
 850         if (def && GetRichTextCtrl())
 851         {
 852             GetRichTextCtrl()->ApplyStyle(def);
 853             GetRichTextCtrl()->SetFocus();
 854         }
 855     }
 856 }
 857
 858 /*!
 859  * wxRichTextStyleListCtrl class: manages a listbox and a choice control to
 860  * switch shown style types
 861  */
 862
 863 IMPLEMENT_CLASS(wxRichTextStyleListCtrl, wxControl)
 864
 865 BEGIN_EVENT_TABLE(wxRichTextStyleListCtrl, wxControl)
 866     EVT_CHOICE(wxID_ANY, wxRichTextStyleListCtrl::OnChooseType)
 867     EVT_SIZE(wxRichTextStyleListCtrl::OnSize)
 868 END_EVENT_TABLE()
 869
 870 wxRichTextStyleListCtrl::wxRichTextStyleListCtrl(wxWindow* parent, wxWindowID id, const wxPoint& pos,
 871     const wxSize& size, long style)
 872 {
 873     Init();
 874     Create(parent, id, pos, size, style);
 875 }
 876
 877 bool wxRichTextStyleListCtrl::Create(wxWindow* parent, wxWindowID id, const wxPoint& pos,
 878         const wxSize& size, long style)
 879 {
 880     if ((style & wxBORDER_MASK) == wxBORDER_DEFAULT)
 881         style |= wxBORDER_THEME;
 882
 883     wxControl::Create(parent, id, pos, size, style);
 884
 885     SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_WINDOW));
 886     if (size != wxDefaultSize)
 887         SetInitialSize(size);
 888
 889     bool showSelector = ((style & wxRICHTEXTSTYLELIST_HIDE_TYPE_SELECTOR) == 0);
 890
 891     wxBorder listBoxStyle;
 892     if (showSelector)
 893         listBoxStyle = wxBORDER_THEME;
 894     else
 895         listBoxStyle = wxBORDER_NONE;
 896
 897     m_styleListBox = new wxRichTextStyleListBox(this, wxID_ANY, wxDefaultPosition, wxDefaultSize, listBoxStyle);
 898
 899     wxBoxSizer* boxSizer = new wxBoxSizer(wxVERTICAL);
 900
 901     if (showSelector)
 902     {
 903         wxArrayString choices;
 904         choices.Add(_("All styles"));
 905         choices.Add(_("Paragraph styles"));
 906         choices.Add(_("Character styles"));
 907         choices.Add(_("List styles"));
 908
 909         m_styleChoice = new wxChoice(this, wxID_ANY, wxDefaultPosition, wxDefaultSize, choices);
 910
 911         boxSizer->Add(m_styleListBox, 1, wxALL|wxEXPAND, 5);
 912         boxSizer->Add(m_styleChoice, 0, wxLEFT|wxRIGHT|wxBOTTOM|wxEXPAND, 5);
 913     }
 914     else
 915     {
 916         boxSizer->Add(m_styleListBox, 1, wxALL|wxEXPAND, 0);
 917     }
 918
 919     SetSizer(boxSizer);
 920     Layout();
 921
 922     m_dontUpdate = true;
 923
 924     if (m_styleChoice)
 925     {
 926         int i = StyleTypeToIndex(m_styleListBox->GetStyleType());
 927         m_styleChoice->SetSelection(i);
 928     }
 929
 930     m_dontUpdate = false;
 931
 932     return true;
 933 }
 934
 935 wxRichTextStyleListCtrl::~wxRichTextStyleListCtrl()
 936 {
 937
 938 }
 939
 940 /// React to style type choice
 941 void wxRichTextStyleListCtrl::OnChooseType(wxCommandEvent& event)
 942 {
 943     if (event.GetEventObject() != m_styleChoice)
 944         event.Skip();
 945     else
 946     {
 947         if (m_dontUpdate)
 948             return;
 949
 950         wxRichTextStyleListBox::wxRichTextStyleType styleType = StyleIndexToType(event.GetSelection());
 951         m_styleListBox->SetSelection(-1);
 952         m_styleListBox->SetStyleType(styleType);
 953     }
 954 }
 955
 956 /// Lay out the controls
 957 void wxRichTextStyleListCtrl::OnSize(wxSizeEvent& WXUNUSED(event))
 958 {
 959     if (GetAutoLayout())
 960         Layout();
 961 }
 962
 963 /// Get the choice index for style type
 964 int wxRichTextStyleListCtrl::StyleTypeToIndex(wxRichTextStyleListBox::wxRichTextStyleType styleType)
 965 {
 966     if (styleType == wxRichTextStyleListBox::wxRICHTEXT_STYLE_ALL)
 967     {
 968         return 0;
 969     }
 970     else if (styleType == wxRichTextStyleListBox::wxRICHTEXT_STYLE_PARAGRAPH)
 971     {
 972         return 1;
 973     }
 974     else if (styleType == wxRichTextStyleListBox::wxRICHTEXT_STYLE_CHARACTER)
 975     {
 976         return 2;
 977     }
 978     else if (styleType == wxRichTextStyleListBox::wxRICHTEXT_STYLE_LIST)
 979     {
 980         return 3;
 981     }
 982     return 0;
 983 }
 984
 985 /// Get the style type for choice index
 986 wxRichTextStyleListBox::wxRichTextStyleType wxRichTextStyleListCtrl::StyleIndexToType(int i)
 987 {
 988     if (i == 1)
 989         return wxRichTextStyleListBox::wxRICHTEXT_STYLE_PARAGRAPH;
 990     else if (i == 2)
 991         return wxRichTextStyleListBox::wxRICHTEXT_STYLE_CHARACTER;
 992     else if (i == 3)
 993         return wxRichTextStyleListBox::wxRICHTEXT_STYLE_LIST;
 994
 995     return wxRichTextStyleListBox::wxRICHTEXT_STYLE_ALL;
 996 }
 997
 998 /// Associates the control with a style manager
 999 void wxRichTextStyleListCtrl::SetStyleSheet(wxRichTextStyleSheet* styleSheet)
1000 {
1001     if (m_styleListBox)
1002         m_styleListBox->SetStyleSheet(styleSheet);
1003 }
1004
1005 wxRichTextStyleSheet* wxRichTextStyleListCtrl::GetStyleSheet() const
1006 {
1007     if (m_styleListBox)
1008         return m_styleListBox->GetStyleSheet();
1009     else
1010         return NULL;
1011 }
1012
1013 /// Associates the control with a wxRichTextCtrl
1014 void wxRichTextStyleListCtrl::SetRichTextCtrl(wxRichTextCtrl* ctrl)
1015 {
1016     if (m_styleListBox)
1017         m_styleListBox->SetRichTextCtrl(ctrl);
1018 }
1019
1020 wxRichTextCtrl* wxRichTextStyleListCtrl::GetRichTextCtrl() const
1021 {
1022     if (m_styleListBox)
1023         return m_styleListBox->GetRichTextCtrl();
1024     else
1025         return NULL;
1026 }
1027
1028 /// Set/get the style type to display
1029 void wxRichTextStyleListCtrl::SetStyleType(wxRichTextStyleListBox::wxRichTextStyleType styleType)
1030 {
1031     if ( !m_styleListBox )
1032         return;
1033
1034     m_styleListBox->SetStyleType(styleType);
1035
1036     m_dontUpdate = true;
1037
1038     if (m_styleChoice)
1039     {
1040         int i = StyleTypeToIndex(m_styleListBox->GetStyleType());
1041         m_styleChoice->SetSelection(i);
1042     }
1043
1044     m_dontUpdate = false;
1045 }
1046
1047 wxRichTextStyleListBox::wxRichTextStyleType wxRichTextStyleListCtrl::GetStyleType() const
1048 {
1049     if (m_styleListBox)
1050         return m_styleListBox->GetStyleType();
1051     else
1052         return wxRichTextStyleListBox::wxRICHTEXT_STYLE_ALL;
1053 }
1054
1055 /// Updates the style list box
1056 void wxRichTextStyleListCtrl::UpdateStyles()
1057 {
1058     if (m_styleListBox)
1059         m_styleListBox->UpdateStyles();
1060 }
1061
1062 #if wxUSE_COMBOCTRL
1063
1064 /*!
1065  * Style drop-down for a wxComboCtrl
1066  */
1067
1068
1069 BEGIN_EVENT_TABLE(wxRichTextStyleComboPopup, wxRichTextStyleListBox)
1070     EVT_MOTION(wxRichTextStyleComboPopup::OnMouseMove)
1071     EVT_LEFT_DOWN(wxRichTextStyleComboPopup::OnMouseClick)
1072 END_EVENT_TABLE()
1073
1074 bool wxRichTextStyleComboPopup::Create( wxWindow* parent )
1075 {
1076     int borderStyle = GetDefaultBorder();
1077     if (borderStyle == wxBORDER_SUNKEN)
1078         borderStyle = wxBORDER_SIMPLE;
1079
1080     return wxRichTextStyleListBox::Create(parent, wxID_ANY,
1081                                   wxPoint(0,0), wxDefaultSize,
1082                                   borderStyle);
1083 }
1084
1085 void wxRichTextStyleComboPopup::SetStringValue( const wxString& s )
1086 {
1087     m_value = SetStyleSelection(s);
1088 }
1089
1090 wxString wxRichTextStyleComboPopup::GetStringValue() const
1091 {
1092     int sel = m_value;
1093     if (sel > -1)
1094     {
1095         wxRichTextStyleDefinition* def = GetStyle(sel);
1096         if (def)
1097             return def->GetName();
1098     }
1099     return wxEmptyString;
1100 }
1101
1102 //
1103 // Popup event handlers
1104 //
1105
1106 // Mouse hot-tracking
1107 void wxRichTextStyleComboPopup::OnMouseMove(wxMouseEvent& event)
1108 {
1109     // Move selection to cursor if it is inside the popup
1110
1111     int itemHere = wxRichTextStyleListBox::VirtualHitTest(event.GetPosition().y);
1112     if ( itemHere >= 0 )
1113     {
1114         wxRichTextStyleListBox::SetSelection(itemHere);
1115         m_itemHere = itemHere;
1116     }
1117     event.Skip();
1118 }
1119
1120 // On mouse left, set the value and close the popup
1121 void wxRichTextStyleComboPopup::OnMouseClick(wxMouseEvent& WXUNUSED(event))
1122 {
1123     if (m_itemHere >= 0)
1124         m_value = m_itemHere;
1125
1126     // Ordering is important, so we don't dismiss this popup accidentally
1127     // by setting the focus elsewhere e.g. in ApplyStyle
1128     Dismiss();
1129
1130     if (m_itemHere >= 0)
1131         wxRichTextStyleListBox::ApplyStyle(m_itemHere);
1132 }
1133
1134 /*!
1135  * wxRichTextStyleComboCtrl
1136  * A combo for applying styles.
1137  */
1138
1139 IMPLEMENT_CLASS(wxRichTextStyleComboCtrl, wxComboCtrl)
1140
1141 BEGIN_EVENT_TABLE(wxRichTextStyleComboCtrl, wxComboCtrl)
1142     EVT_IDLE(wxRichTextStyleComboCtrl::OnIdle)
1143 END_EVENT_TABLE()
1144
1145 bool wxRichTextStyleComboCtrl::Create(wxWindow* parent, wxWindowID id, const wxPoint& pos,
1146         const wxSize& size, long style)
1147 {
1148     if (!wxComboCtrl::Create(parent, id, wxEmptyString, pos, size, style))
1149         return false;
1150
1151     SetPopupMaxHeight(400);
1152
1153     m_stylePopup = new wxRichTextStyleComboPopup;
1154
1155     SetPopupControl(m_stylePopup);
1156
1157     return true;
1158 }
1159
1160 /// Auto-select from style under caret in idle time
1161
1162 // TODO: must be able to show italic, bold, combinations
1163 // in style box. Do we have a concept of automatic, temporary
1164 // styles that are added whenever we wish to show a style
1165 // that doesn't exist already? E.g. "Bold, Italic, Underline".
1166 // Word seems to generate these things on the fly.
1167 // If there's a named style already, it uses e.g. Heading1 + Bold, Italic
1168 // If you unembolden text in a style that has bold, it uses the
1169 // term "Not bold".
1170 // TODO: order styles alphabetically. This means indexes can change,
1171 // so need a different way to specify selections, i.e. by name.
1172
1173 void wxRichTextStyleComboCtrl::OnIdle(wxIdleEvent& event)
1174 {
1175     event.Skip();
1176
1177     if ( !m_stylePopup )
1178         return;
1179
1180     wxRichTextCtrl * const richtext = GetRichTextCtrl();
1181     if ( !richtext )
1182         return;
1183
1184     if ( !IsPopupShown() && IsShownOnScreen() && wxWindow::FindFocus() != this )
1185     {
1186         wxString styleName =
1187             wxRichTextStyleListBox::GetStyleToShowInIdleTime(richtext, m_stylePopup->GetStyleType());
1188
1189         wxString currentValue = GetValue();
1190         if (!styleName.IsEmpty())
1191         {
1192             // Don't do the selection if it's already set
1193             if (currentValue == styleName)
1194                 return;
1195
1196             SetValue(styleName);
1197         }
1198         else if (!currentValue.IsEmpty())
1199             SetValue(wxEmptyString);
1200     }
1201 }
1202
1203 #endif
1204     // wxUSE_COMBOCTRL
1205
1206 #endif
1207     // wxUSE_HTML
1208
1209 #endif
1210     // wxUSE_RICHTEXT