+#if wxUSE_COMBOCTRL
+
+/*!
+ * Style drop-down for a wxComboCtrl
+ */
+
+
+BEGIN_EVENT_TABLE(wxRichTextStyleComboPopup, wxRichTextStyleListBox)
+ EVT_MOTION(wxRichTextStyleComboPopup::OnMouseMove)
+ EVT_LEFT_DOWN(wxRichTextStyleComboPopup::OnMouseClick)
+END_EVENT_TABLE()
+
+void wxRichTextStyleComboPopup::SetStringValue( const wxString& s )
+{
+ m_value = SetStyleSelection(s);
+}
+
+wxString wxRichTextStyleComboPopup::GetStringValue() const
+{
+ int sel = m_value;
+ if (sel > -1)
+ {
+ wxRichTextStyleDefinition* def = GetStyle(sel);
+ if (def)
+ return def->GetName();
+ }
+ return wxEmptyString;
+}
+
+//
+// Popup event handlers
+//
+
+// Mouse hot-tracking
+void wxRichTextStyleComboPopup::OnMouseMove(wxMouseEvent& event)
+{
+ // Move selection to cursor if it is inside the popup
+
+ int itemHere = wxRichTextStyleListBox::HitTest(event.GetPosition());
+ if ( itemHere >= 0 )
+ {
+ wxRichTextStyleListBox::SetSelection(itemHere);
+ m_itemHere = itemHere;
+ }
+ event.Skip();
+}
+
+// On mouse left, set the value and close the popup
+void wxRichTextStyleComboPopup::OnMouseClick(wxMouseEvent& WXUNUSED(event))
+{
+ if (m_itemHere >= 0)
+ m_value = m_itemHere;
+
+ // Ordering is important, so we don't dismiss this popup accidentally
+ // by setting the focus elsewhere e.g. in ApplyStyle
+ Dismiss();
+
+ if (m_itemHere >= 0)
+ wxRichTextStyleListBox::ApplyStyle(m_itemHere);
+}
+
+/*!
+ * wxRichTextStyleComboCtrl
+ * A combo for applying styles.
+ */
+
+IMPLEMENT_CLASS(wxRichTextStyleComboCtrl, wxComboCtrl)
+
+BEGIN_EVENT_TABLE(wxRichTextStyleComboCtrl, wxComboCtrl)
+ EVT_IDLE(wxRichTextStyleComboCtrl::OnIdle)
+END_EVENT_TABLE()
+
+bool wxRichTextStyleComboCtrl::Create(wxWindow* parent, wxWindowID id, const wxPoint& pos,
+ const wxSize& size, long style)
+{
+ if (!wxComboCtrl::Create(parent, id, wxEmptyString, pos, size, style))
+ return false;
+
+ SetPopupMaxHeight(400);
+
+ m_stylePopup = new wxRichTextStyleComboPopup;
+
+ SetPopupControl(m_stylePopup);
+
+ return true;
+}
+
+/// Auto-select from style under caret in idle time
+
+// TODO: must be able to show italic, bold, combinations
+// in style box. Do we have a concept of automatic, temporary
+// styles that are added whenever we wish to show a style
+// that doesn't exist already? E.g. "Bold, Italic, Underline".
+// Word seems to generate these things on the fly.
+// If there's a named style already, it uses e.g. Heading1 + Bold, Italic
+// If you unembolden text in a style that has bold, it uses the
+// term "Not bold".
+// TODO: order styles alphabetically. This means indexes can change,
+// so need a different way to specify selections, i.e. by name.
+
+void wxRichTextStyleComboCtrl::OnIdle(wxIdleEvent& event)
+{
+ if (GetRichTextCtrl() && !IsPopupShown())
+ {
+ int adjustedCaretPos = GetRichTextCtrl()->GetAdjustedCaretPosition(GetRichTextCtrl()->GetCaretPosition());
+
+ wxRichTextParagraph* para = GetRichTextCtrl()->GetBuffer().GetParagraphAtPosition(adjustedCaretPos);
+ wxRichTextObject* obj = GetRichTextCtrl()->GetBuffer().GetLeafObjectAtPosition(adjustedCaretPos);
+
+ wxString styleName;
+
+ // Take into account current default style just chosen by user
+ if (GetRichTextCtrl()->IsDefaultStyleShowing())
+ {
+ if (!GetRichTextCtrl()->GetDefaultStyleEx().GetCharacterStyleName().IsEmpty())
+ styleName = GetRichTextCtrl()->GetDefaultStyleEx().GetCharacterStyleName();
+ else if (!GetRichTextCtrl()->GetDefaultStyleEx().GetParagraphStyleName().IsEmpty())
+ styleName = GetRichTextCtrl()->GetDefaultStyleEx().GetParagraphStyleName();
+ }
+ else if (obj && !obj->GetAttributes().GetCharacterStyleName().IsEmpty())
+ {
+ styleName = obj->GetAttributes().GetCharacterStyleName();
+ }
+ else if (para && !para->GetAttributes().GetParagraphStyleName().IsEmpty())
+ {
+ styleName = para->GetAttributes().GetParagraphStyleName();
+ }
+
+ wxString currentValue = GetValue();
+ if (!styleName.IsEmpty())
+ {
+ // Don't do the selection if it's already set
+ if (currentValue == styleName)
+ return;
+
+ SetValue(styleName);
+ }
+ else if (!currentValue.IsEmpty())
+ SetValue(wxEmptyString);
+ }
+ event.Skip();
+}
+
+#endif
+ // wxUSE_COMBOCTRL
+