1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: Generic font dialog
4 // Author: Julian Smart
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
13 #pragma implementation "fontdlgg.h"
16 // For compilers that support precompilation, includes "wx.h".
17 #include "wx/wxprec.h"
26 #include "wx/dialog.h"
27 #include "wx/listbox.h"
28 #include "wx/button.h"
29 #include "wx/stattext.h"
30 #include "wx/layout.h"
31 #include "wx/dcclient.h"
32 #include "wx/choice.h"
33 #include "wx/checkbox.h"
40 #include "wx/cmndata.h"
41 #include "wx/generic/fontdlgg.h"
43 #if !USE_SHARED_LIBRARY
44 IMPLEMENT_DYNAMIC_CLASS(wxGenericFontDialog
, wxDialog
)
46 BEGIN_EVENT_TABLE(wxGenericFontDialog
, wxDialog
)
47 EVT_CHECKBOX(wxID_FONT_UNDERLINE
, wxGenericFontDialog::OnChangeFont
)
48 EVT_CHOICE(wxID_FONT_STYLE
, wxGenericFontDialog::OnChangeFont
)
49 EVT_CHOICE(wxID_FONT_WEIGHT
, wxGenericFontDialog::OnChangeFont
)
50 EVT_CHOICE(wxID_FONT_FAMILY
, wxGenericFontDialog::OnChangeFont
)
51 EVT_CHOICE(wxID_FONT_COLOUR
, wxGenericFontDialog::OnChangeFont
)
52 EVT_CHOICE(wxID_FONT_SIZE
, wxGenericFontDialog::OnChangeFont
)
53 EVT_PAINT(wxGenericFontDialog::OnPaint
)
54 EVT_CLOSE(wxGenericFontDialog::OnCloseWindow
)
60 static wxString wxColourDialogNames
[NUM_COLS
]={_T("ORANGE"),
66 _T("MEDIUM VIOLET RED"),
71 _T("MEDIUM SPRING GREEN"),
74 _T("LIGHT STEEL BLUE"),
94 _T("MEDIUM VIOLET RED"),
98 _T("MEDIUM SEA GREEN"),
106 _T("MEDIUM FOREST GREEN"),
111 _T("MEDIUM SLATE BLUE"),
116 * Generic wxFontDialog
119 wxGenericFontDialog::wxGenericFontDialog(void)
125 wxGenericFontDialog::wxGenericFontDialog(wxWindow
*parent
, wxFontData
*data
):
126 wxDialog(parent
, -1, _("Font"), wxPoint(0, 0), wxSize(600, 600), wxDEFAULT_DIALOG_STYLE
|wxDIALOG_MODAL
)
129 Create(parent
, data
);
132 wxGenericFontDialog::~wxGenericFontDialog(void)
136 void wxGenericFontDialog::OnCloseWindow(wxCloseEvent
& WXUNUSED(event
))
138 EndModal(wxID_CANCEL
);
141 bool wxGenericFontDialog::Create(wxWindow
*parent
, wxFontData
*data
)
143 dialogParent
= parent
;
154 int wxGenericFontDialog::ShowModal(void)
156 int ret
= wxDialog::ShowModal();
158 if (ret
!= wxID_CANCEL
)
160 fontData
.chosenFont
= dialogFont
;
167 void wxGenericFontDialog::OnPaint(wxPaintEvent
& event
)
169 wxDialog::OnPaint(event
);
172 PaintFontBackground(dc
);
177 static void wxGenericChangeFontText(wxTextCtrl& text, wxCommandEvent& event)
179 if (event.GetEventType() == wxEVENT_TYPE_TEXT_ENTER_COMMAND)
181 wxGenericFontDialog *dialog = (wxGenericFontDialog *)text.GetParent();
182 dialog->OnChangeFont();
187 void wxGenericFontDialog::CreateWidgets(void)
197 fontRect
.width
= 430;
198 fontRect
.height
= 100;
201 static char *families[] = { "Roman", "Decorative", "Modern", "Script", "Swiss" };
202 static char *styles[] = { "Normal", "Italic", "Slant" };
203 static char *weights[] = { "Normal", "Light", "Bold" };
207 *families
= new wxString
[6],
208 *styles
= new wxString
[3],
209 *weights
= new wxString
[3];
210 families
[0] = _("Roman");
211 families
[1] = _("Decorative");
212 families
[2] = _("Modern");
213 families
[3] = _("Script");
214 families
[4] = _("Swiss" );
215 families
[5] = _("Teletype" );
216 styles
[0] = _("Normal");
217 styles
[1] = _("Italic");
218 styles
[2] = _("Slant");
219 weights
[0] = _("Normal");
220 weights
[1] = _("Light");
221 weights
[2] = _("Bold");
225 familyChoice
= new wxChoice(this, wxID_FONT_FAMILY
, wxPoint(10, 10), wxSize(120, -1), 5, families
);
226 styleChoice
= new wxChoice(this, wxID_FONT_STYLE
, wxPoint(170, 10), wxSize(120, -1), 3, styles
);
227 weightChoice
= new wxChoice(this, wxID_FONT_WEIGHT
, wxPoint(330, 10), wxSize(120, -1), 3, weights
);
229 colourChoice
= new wxChoice(this, wxID_FONT_COLOUR
, wxPoint(10, 40), wxSize(180, -1), NUM_COLS
, wxColourDialogNames
);
230 #if 0 // def __WXMOTIF__ // TODO: This necessary now?
231 // We want the pointSizeText to line up on the y axis with the colourChoice
232 colourChoice
->GetPosition(&fontRect
.x
, &y
); //NL mod
236 wxString
*pointSizes
= new wxString
[40];
238 for ( i
= 0; i
< 40; i
++)
241 sprintf(buf
, "%d", i
+ 1);
245 pointSizeChoice
= new wxChoice(this, wxID_FONT_SIZE
, wxPoint(230, y
), wxSize(50, -1), 40, pointSizes
);
246 underLineCheckBox
= new wxCheckBox(this, wxID_FONT_UNDERLINE
, _("Underline"), wxPoint(320, y
));
249 pointSizeChoice
->GetPosition(&x
, &rectY
); //NL mod
251 pointSizeChoice
->GetSize(&x
, &y
); //NL mod
253 // Calculate the position of the bottom of the pointSizeChoice, and place
254 // the fontRect there (+5 for a nice gap)
256 fontRect
.y
+=y
+5; //NL mod
258 int by
= (fontRect
.y
+ fontRect
.height
+ 15);
260 wxButton
*okButton
= new wxButton(this, wxID_OK
, _("OK"), wxPoint(230, by
), wxSize(75,-1));
261 (void) new wxButton(this, wxID_OK
, _("Cancel"), wxPoint(330, by
), wxSize(75,-1));
263 familyChoice
->SetStringSelection( wxFontFamilyIntToString(dialogFont
.GetFamily()) );
264 styleChoice
->SetStringSelection(wxFontStyleIntToString(dialogFont
.GetStyle()));
265 weightChoice
->SetStringSelection(wxFontWeightIntToString(dialogFont
.GetWeight()));
266 wxString
name(wxTheColourDatabase
->FindName(fontData
.fontColour
));
267 colourChoice
->SetStringSelection(name
);
269 underLineCheckBox
->SetValue(dialogFont
.GetUnderlined());
270 pointSizeChoice
->SetSelection(dialogFont
.GetPointSize()-1);
272 okButton
->SetDefault();
274 // SetClientSize(450, by + 40);
288 void wxGenericFontDialog::InitializeFont(void)
290 int fontFamily
= wxSWISS
;
291 int fontWeight
= wxNORMAL
;
292 int fontStyle
= wxNORMAL
;
294 int fontUnderline
= FALSE
;
295 if (fontData
.initialFont
.Ok())
297 fontFamily
= fontData
.initialFont
.GetFamily();
298 fontWeight
= fontData
.initialFont
.GetWeight();
299 fontStyle
= fontData
.initialFont
.GetStyle();
300 fontSize
= fontData
.initialFont
.GetPointSize();
301 fontUnderline
= fontData
.initialFont
.GetUnderlined();
303 dialogFont
= wxFont(fontSize
, fontFamily
, fontStyle
, fontWeight
, (fontUnderline
!= 0));
306 void wxGenericFontDialog::PaintFontBackground(wxDC
& dc
)
310 dc
.SetPen(*wxBLACK_PEN
);
311 dc
.SetBrush(*wxWHITE_BRUSH
);
312 dc
.DrawRectangle( fontRect
.x
, fontRect
.y
, fontRect
.width
, fontRect
.height
);
316 void wxGenericFontDialog::PaintFont(wxDC
& dc
)
321 dc
.SetFont(dialogFont
);
322 // Calculate vertical centre
324 dc
.GetTextExtent("X", &w
, &h
);
325 float cx
= (float)(fontRect
.x
+ 10);
326 float cy
= (float)(fontRect
.y
+ (fontRect
.height
/2.0) - (h
/2.0));
327 dc
.SetTextForeground(fontData
.fontColour
);
328 dc
.SetClippingRegion( fontRect
.x
, fontRect
.y
, (long)(fontRect
.width
-2.0), (long)(fontRect
.height
-2.0));
329 dc
.DrawText(_("ABCDEFGabcdefg12345"), (long)cx
, (long)cy
);
330 dc
.DestroyClippingRegion();
331 dc
.SetFont(wxNullFont
);
336 void wxGenericFontDialog::OnChangeFont(wxCommandEvent
& WXUNUSED(event
))
338 if (!m_useEvents
) return;
340 int fontFamily
= 0; /* shut up buggy egcs warnings */
341 fontFamily
= wxFontFamilyStringToInt(WXSTRINGCAST familyChoice
->GetStringSelection());
343 fontWeight
= wxFontWeightStringToInt(WXSTRINGCAST weightChoice
->GetStringSelection());
345 fontStyle
= wxFontStyleStringToInt(WXSTRINGCAST styleChoice
->GetStringSelection());
346 int fontSize
= wxAtoi(pointSizeChoice
->GetStringSelection());
347 int fontUnderline
= underLineCheckBox
->GetValue();
349 dialogFont
= wxFont(fontSize
, fontFamily
, fontStyle
, fontWeight
, (fontUnderline
!= 0));
350 if (colourChoice
->GetStringSelection() != _T(""))
352 wxColour
*col
= (wxColour
*) NULL
;
353 col
= wxTheColourDatabase
->FindColour(colourChoice
->GetStringSelection());
356 fontData
.fontColour
= *col
;
360 PaintFontBackground(dc
);
364 wxChar
*wxFontWeightIntToString(int weight
)
379 wxChar
*wxFontStyleIntToString(int style
)
394 wxChar
*wxFontFamilyIntToString(int family
)
401 return _T("Decorative");
407 return _T("Teletype");
415 int wxFontFamilyStringToInt(wxChar
*family
)
420 if (wxStrcmp(family
, _T("Roman")) == 0)
422 else if (wxStrcmp(family
, _T("Decorative")) == 0)
424 else if (wxStrcmp(family
, _T("Modern")) == 0)
426 else if (wxStrcmp(family
, _T("Script")) == 0)
428 else if (wxStrcmp(family
, _T("Teletype")) == 0)
433 int wxFontStyleStringToInt(wxChar
*style
)
437 if (wxStrcmp(style
, _T("Italic")) == 0)
439 else if (wxStrcmp(style
, _T("Slant")) == 0)
445 int wxFontWeightStringToInt(wxChar
*weight
)
449 if (wxStrcmp(weight
, _T("Bold")) == 0)
451 else if (wxStrcmp(weight
, _T("Light")) == 0)