/////////////////////////////////////////////////////////////////////////////
-// Name: fontdlg.cpp
+// Name: src/mac/carbon/fontdlg.cpp
// Purpose: wxFontDialog class for carbon 10.2+.
// Author: Ryan Norton
// Modified by:
#endif
#ifndef WX_PRECOMP
- #include "wx/cmndata.h"
+ #include "wx/intl.h"
+ #include "wx/wxchar.h"
+ #include "wx/dcclient.h"
+ #include "wx/frame.h"
+ #include "wx/textctrl.h"
+ #include "wx/listbox.h"
+ #include "wx/checkbox.h"
+ #include "wx/choice.h"
+ #include "wx/sizer.h"
+ #include "wx/stattext.h"
+ #include "wx/button.h"
#endif
#include "wx/fontdlg.h"
-
+
+#if wxMAC_USE_EXPERIMENTAL_FONTDIALOG
+
+IMPLEMENT_DYNAMIC_CLASS(wxFontDialog, wxDialog)
+
+#include "wx/mac/private.h"
+
+// ---------------------------------------------------------------------------
+// wxFontDialog
+// ---------------------------------------------------------------------------
+
+static const EventTypeSpec eventList[] =
+{
+ { kEventClassFont, kEventFontSelection } ,
+} ;
+
+
+pascal OSStatus wxMacCarbonFontPanelHandler(EventHandlerCallRef nextHandler, EventRef event, void *userData)
+{
+ OSStatus result = eventNotHandledErr ;
+ wxFontDialog *fontdialog = (wxFontDialog*) userData ;
+ wxFontData& fontdata= fontdialog->GetFontData() ;
+
+ wxMacCarbonEvent cEvent( event );
+ switch(cEvent.GetKind())
+ {
+ case kEventFontSelection :
+ {
+ ATSUFontID fontId = 0 ;
+ if ( cEvent.GetParameter<ATSUFontID>(kEventParamATSUFontID, &fontId) == noErr )
+ {
+ FMFontStyle fontStyle = cEvent.GetParameter<FMFontStyle>(kEventParamFMFontStyle);
+ FMFontSize fontSize = cEvent.GetParameter<FMFontSize>(kEventParamFMFontSize);
+
+ CFStringRef cfName = NULL;
+#if 1
+ FMFontFamily fontFamily = cEvent.GetParameter<FMFontFamily>(kEventParamFMFontFamily);
+ ATSFontFamilyRef atsfontfamilyref = FMGetATSFontFamilyRefFromFontFamily( fontFamily ) ;
+ OSStatus err = ATSFontFamilyGetName( atsfontfamilyref , kATSOptionFlagsDefault , &cfName ) ;
+ wxASSERT_MSG( err == noErr , wxT("ATSFontFamilyGetName failed") );
+#else
+ // we don't use the ATSU naming anymore
+ ByteCount actualLength = 0;
+ char *c = NULL;
+ OSStatus err = ATSUFindFontName(fontId , kFontFamilyName, kFontUnicodePlatform, kFontNoScriptCode,
+ kFontNoLanguageCode , 0 , NULL , &actualLength , NULL );
+ if ( err == noErr)
+ {
+ actualLength += 1 ;
+ char *c = (char*)malloc( actualLength );
+ err = ATSUFindFontName(fontId, kFontFamilyName, kFontUnicodePlatform, kFontNoScriptCode,
+ kFontNoLanguageCode, actualLength, c , NULL, NULL);
+ cfName = CFStringCreateWithCharacters(NULL, (UniChar*) c, (actualLength-1) >> 1);
+ }
+ else
+ {
+ err = ATSUFindFontName(fontId , kFontFamilyName, kFontNoPlatformCode, kFontNoScriptCode,
+ kFontNoLanguageCode , 0 , NULL , &actualLength , NULL );
+ if ( err == noErr )
+ {
+ actualLength += 1 ;
+ c = (char*)malloc(actualLength);
+ err = ATSUFindFontName(fontId, kFontFamilyName, kFontNoPlatformCode, kFontNoScriptCode,
+ kFontNoLanguageCode, actualLength, c , NULL, NULL);
+ c[actualLength-1] = 0;
+ cfName = CFStringCreateWithCString(NULL, c, kCFStringEncodingMacRoman );
+ }
+ }
+ if ( c!=NULL )
+ free(c);
+#endif
+
+ if ( cfName!=NULL )
+ {
+ fontdata.m_chosenFont.SetFaceName(wxMacCFStringHolder(cfName).AsString(wxLocale::GetSystemEncoding()));
+ fontdata.m_chosenFont.SetPointSize(fontSize);
+ fontdata.m_chosenFont.SetStyle(fontStyle & italic ? wxFONTSTYLE_ITALIC : wxFONTSTYLE_NORMAL);
+ fontdata.m_chosenFont.SetUnderlined((fontStyle & underline)!=0);
+ fontdata.m_chosenFont.SetWeight(fontStyle & bold ? wxFONTWEIGHT_BOLD : wxFONTWEIGHT_NORMAL);
+ }
+ }
+
+ RGBColor fontColor ;
+ if ( cEvent.GetParameter<RGBColor>(kEventParamFontColor, &fontColor) == noErr )
+ fontdata.m_fontColour.FromRGBColor((WXCOLORREF*) &fontColor);
+ else
+ {
+ CFDictionaryRef dict ;
+ if ( cEvent.GetParameter<CFDictionaryRef>(kEventParamDictionary, &dict) == noErr )
+ {
+ CFDictionaryRef attributesDict ;
+ if ( CFDictionaryGetValueIfPresent(dict, kFontPanelAttributesKey, (const void **)&attributesDict) )
+ {
+ CFDataRef tagsData;
+ CFDataRef sizesData;
+ CFDataRef valuesData;
+ if ( CFDictionaryGetValueIfPresent(attributesDict, kFontPanelAttributeTagsKey, (const void **)&tagsData) &&
+ CFDictionaryGetValueIfPresent(attributesDict, kFontPanelAttributeSizesKey, (const void **)&sizesData) &&
+ CFDictionaryGetValueIfPresent(attributesDict, kFontPanelAttributeValuesKey, (const void **)&valuesData) )
+ {
+ ItemCount count = CFDataGetLength(tagsData)/sizeof(ATSUAttributeTag);
+ ATSUAttributeTag *tagPtr = (ATSUAttributeTag *)CFDataGetBytePtr(tagsData);
+ ByteCount *sizePtr = (ByteCount *)CFDataGetBytePtr(sizesData);
+ UInt32 *bytePtr = (UInt32*)CFDataGetBytePtr(valuesData);
+ ATSUAttributeValuePtr valuesPtr = bytePtr ;
+ for ( ItemCount i = 0 ; i < count ; ++i)
+ {
+ if ( tagPtr[i] == kATSUColorTag && sizePtr[i] == sizeof(RGBColor))
+ {
+ fontdata.m_fontColour.FromRGBColor((WXCOLORREF*) valuesPtr);
+ break ;
+ }
+ bytePtr = (UInt32*)( (UInt8*)bytePtr + sizePtr[i]);
+ }
+ }
+ }
+ }
+ }
+ }
+ break ;
+ } ;
+
+ return result ;
+}
+
+DEFINE_ONE_SHOT_HANDLER_GETTER( wxMacCarbonFontPanelHandler )
+
+wxFontDialog::wxFontDialog()
+{
+}
+
+wxFontDialog::wxFontDialog(wxWindow *parent, const wxFontData& data)
+{
+ Create(parent, data);
+}
+
+wxFontDialog::~wxFontDialog()
+{
+}
+
+bool wxFontDialog::Create(wxWindow *parent, const wxFontData& data)
+{
+ m_fontData = data;
+ return true ;
+}
+
+int wxFontDialog::ShowModal()
+{
+ OSStatus err ;
+ wxFont font = *wxNORMAL_FONT ;
+ if ( m_fontData.m_initialFont.Ok() )
+ {
+ font = m_fontData.m_initialFont ;
+ }
+
+ ATSUStyle style = (ATSUStyle)font.MacGetATSUStyle();
+ err = SetFontInfoForSelection (kFontSelectionATSUIType,1, &style , NULL);
+ // just clicking on ENTER will not send us any font setting event, therefore we have to make sure
+ // that field is already correct
+ m_fontData.m_chosenFont = font ;
+
+ EventHandlerRef handler ;
+
+ err = InstallApplicationEventHandler( GetwxMacCarbonFontPanelHandlerUPP(), GetEventTypeCount(eventList), eventList, this , &handler );
+
+ if ( !FPIsFontPanelVisible() )
+ FPShowHideFontPanel();
+
+ int retval = RunMixedFontDialog(this);
+
+ ::RemoveEventHandler(handler);
+
+ return retval ;
+}
+
+#else
#if !USE_NATIVE_FONT_DIALOG_FOR_MACOSX
parent = parent->GetParent();
wxColourData data;
- data.SetChooseFull(TRUE);
+ data.SetChooseFull(true);
data.SetColour(m_colour);
wxColourDialog *dialog = new wxColourDialog(parent, &data);
// Crashes on wxMac (no m_peer)
-#ifndef __WXMAC__
+#ifndef __WXMAC__
dialog->SetTitle(_("Background colour"));
#endif
if (dialog->ShowModal() == wxID_OK)
*/
void wxFontDialog::CreateControls()
-{
+{
wxFontDialog* itemDialog1 = this;
wxBoxSizer* itemBoxSizer2 = new wxBoxSizer(wxVERTICAL);
m_underlinedCtrl->SetToolTip(_("Check to make the font underlined."));
itemBoxSizer11->Add(m_underlinedCtrl, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5);
}
-
+
if (m_fontData.GetEnableEffects())
{
wxStaticText* itemStaticText15 = new wxStaticText( itemDialog1, wxID_STATIC, _("Colour:"), wxDefaultPosition, wxDefaultSize, 0 );
itemFlexGridSizer4->Add(itemStaticText15, 0, wxALIGN_RIGHT|wxALIGN_TOP|wxALL|wxADJUST_MINSIZE, 5);
-
+
m_colourCtrl = new wxFontColourSwatchCtrl( itemDialog1, wxID_FONTDIALOG_COLOUR, wxDefaultPosition, wxSize(-1, 30), wxSUNKEN_BORDER|wxTAB_TRAVERSAL );
m_colourCtrl->SetHelpText(_("Click to change the font colour."));
if (ShowToolTips())
wxFontEnumerator enumerator;
enumerator.EnumerateFacenames();
- wxArrayString* facenames = enumerator.GetFacenames();
+ wxArrayString facenames = enumerator.GetFacenames();
if (facenames)
{
- facenames->Add(_("<Any>"));
- facenames->Add(_("<Any Roman>"));
- facenames->Add(_("<Any Decorative>"));
- facenames->Add(_("<Any Modern>"));
- facenames->Add(_("<Any Script>"));
- facenames->Add(_("<Any Swiss>"));
- facenames->Add(_("<Any Teletype>"));
- facenames->Sort();
- m_facenameCtrl->Append(*facenames);
+ facenames.Add(_("<Any>"));
+ facenames.Add(_("<Any Roman>"));
+ facenames.Add(_("<Any Decorative>"));
+ facenames.Add(_("<Any Modern>"));
+ facenames.Add(_("<Any Script>"));
+ facenames.Add(_("<Any Swiss>"));
+ facenames.Add(_("<Any Teletype>"));
+ facenames.Sort();
+ m_facenameCtrl->Append(facenames);
}
InitializeControls();
m_boldCtrl->SetValue(m_dialogFont.GetWeight() == wxBOLD);
m_italicCtrl->SetValue(m_dialogFont.GetStyle() == wxITALIC);
m_sizeCtrl->SetValue(m_dialogFont.GetPointSize());
-
+
wxString facename = m_dialogFont.GetFaceName();
if (facename.empty() || m_facenameCtrl->FindString(facename) == wxNOT_FOUND)
{
#endif // !USE_NATIVE_FONT_DIALOG_FOR_MACOSX
+#endif