2 * COMMDLG - Font Dialog
4 * Copyright 1994 Martin Ayotte
5 * Copyright 1996 Albrecht Kleine
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
34 #include "wine/debug.h"
37 WINE_DEFAULT_DEBUG_CHANNEL(commdlg
);
39 static const WCHAR strWineFontData
[] = {'_','_','W','I','N','E','_','F','O','N','T','D','L','G','D','A','T','A',0};
40 static const WCHAR strWineFontData_a
[] =
41 {'_','_','W','I','N','E','_','F','O','N','T','D','L','G','D','A','T','A','_','A',0};
42 static const WCHAR chooseFontW
[] = {'C','H','O','O','S','E','_','F','O','N','T',0};
46 /* image list with TrueType bitmaps and more */
47 static HIMAGELIST himlTT
= 0;
48 #define TTBITMAP_XSIZE 20 /* x-size of the bitmaps */
50 INT_PTR CALLBACK
FormatCharDlgProcA(HWND hDlg
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
);
51 INT_PTR CALLBACK
FormatCharDlgProcW(HWND hDlg
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
);
53 /* There is a table here of all charsets, and the sample text for each.
54 * There is a second table that translates a charset into an index into
58 #define CI(cs) ((IDS_CHARSET_##cs)-IDS_CHARSET_ANSI)
61 static const WCHAR stWestern
[]={'A','a','B','b','Y','y','Z','z',0}; /* Western and default */
62 static const WCHAR stSymbol
[]={'S','y','m','b','o','l',0}; /* Symbol */
63 static const WCHAR stShiftJis
[]={'A','a',0x3042,0x3041,0x30a2,0x30a1,0x4e9c,0x5b87,0}; /* Shift JIS */
64 static const WCHAR stHangul
[]={0xac00,0xb098,0xb2e4,'A','a','B','Y','y','Z','z',0}; /* Hangul */
65 static const WCHAR stGB2312
[]={0x5fae,0x8f6f,0x4e2d,0x6587,0x8f6f,0x4ef6,0}; /* GB2312 */
66 static const WCHAR stBIG5
[]={0x4e2d,0x6587,0x5b57,0x578b,0x7bc4,0x4f8b,0}; /* BIG5 */
67 static const WCHAR stGreek
[]={'A','a','B','b',0x0391,0x03b1,0x0392,0x03b2,0}; /* Greek */
68 static const WCHAR stTurkish
[]={'A','a','B','b',0x011e,0x011f,0x015e,0x015f,0}; /* Turkish */
69 static const WCHAR stHebrew
[]={'A','a','B','b',0x05e0,0x05e1,0x05e9,0x05ea,0}; /* Hebrew */
70 static const WCHAR stArabic
[]={'A','a','B','b',0x0627,0x0628,0x062c,0x062f,0x0647,0x0648,0x0632,0};/* Arabic */
71 static const WCHAR stBaltic
[]={'A','a','B','b','Y','y','Z','z',0}; /* Baltic */
72 static const WCHAR stVietname
[]={'A','a','B','b',0x01a0,0x01a1,0x01af,0x01b0,0}; /* Vietnamese */
73 static const WCHAR stCyrillic
[]={'A','a','B','b',0x0411,0x0431,0x0424,0x0444,0}; /* Cyrillic */
74 static const WCHAR stEastEur
[]={'A','a','B','b',0xc1,0xe1,0xd4,0xf4,0}; /* East European */
75 static const WCHAR stThai
[]={'A','a','B','b',0x0e2d,0x0e31,0x0e01,0x0e29,0x0e23,0x0e44,0x0e17,0x0e22,0}; /* Thai */
76 static const WCHAR stJohab
[]={0xac00,0xb098,0xb2e4,'A','a','B','Y','y','Z','z',0}; /* Johab */
77 static const WCHAR stMac
[]={'A','a','B','b','Y','y','Z','z',0}; /* Mac */
78 static const WCHAR stOEM
[]={'A','a','B','b',0xf8,0xf1,0xfd,0}; /* OEM */
79 /* the following character sets actually behave different (Win2K observation):
80 * the sample string is 'sticky': it uses the sample string of the previous
81 * selected character set. That behaviour looks like some default, which is
82 * not (yet) implemented. */
83 static const WCHAR stVISCII
[]={'A','a','B','b',0}; /* VISCII */
84 static const WCHAR stTCVN
[]={'A','a','B','b',0}; /* TCVN */
85 static const WCHAR stKOI8
[]={'A','a','B','b',0}; /* KOI-8 */
86 static const WCHAR stIso88593
[]={'A','a','B','b',0}; /* ISO-8859-3 */
87 static const WCHAR stIso88594
[]={'A','a','B','b',0}; /* ISO-8859-4 */
88 static const WCHAR stIso885910
[]={'A','a','B','b',0}; /* ISO-8859-10 */
89 static const WCHAR stCeltic
[]={'A','a','B','b',0};/* Celtic */
91 static const WCHAR
*sample_lang_text
[]={
92 stWestern
,stSymbol
,stShiftJis
,stHangul
,stGB2312
,
93 stBIG5
,stGreek
,stTurkish
,stHebrew
,stArabic
,
94 stBaltic
,stVietname
,stCyrillic
,stEastEur
,stThai
,
95 stJohab
,stMac
,stOEM
,stVISCII
,stTCVN
,
96 stKOI8
,stIso88593
,stIso88594
,stIso885910
,stCeltic
};
99 static const BYTE CHARSET_ORDER
[256]={
100 CI(ANSI
), 0, CI(SYMBOL
), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
101 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
102 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
103 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
104 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CI(MAC
), 0, 0,
105 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
106 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
107 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
108 CI(JIS
), CI(HANGUL
), CI(JOHAB
), 0, 0, 0, CI(GB2312
), 0, CI(BIG5
), 0, 0, 0, 0, 0, 0, 0,
109 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
110 0, CI(GREEK
), CI(TURKISH
), CI(VIETNAMESE
), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
111 0, CI(HEBREW
), CI(ARABIC
), 0, 0, 0, 0, 0, 0, 0, CI(BALTIC
), 0, 0, 0, 0, 0,
112 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CI(RUSSIAN
), 0, 0, 0,
113 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CI(THAI
), 0,
114 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CI(EE
), 0,
115 CI(VISCII
), CI(TCVN
), CI(KOI8
), CI(ISO3
), CI(ISO4
), CI(ISO10
), CI(CELTIC
), 0, 0, 0, 0, 0, 0, 0, 0, CI(OEM
),
118 static const struct {
122 #define XX(x) { x, #x },
127 XX(CF_ENABLETEMPLATE
)
128 XX(CF_ENABLETEMPLATEHANDLE
)
129 XX(CF_INITTOLOGFONTSTRUCT
)
137 XX(CF_FIXEDPITCHONLY
)
139 XX(CF_FORCEFONTEXIST
)
151 void _dump_cf_flags(DWORD cflags
)
155 for (i
= 0; i
< sizeof(cfflags
)/sizeof(cfflags
[0]); i
++)
156 if (cfflags
[i
].mask
& cflags
)
157 TRACE("%s|",cfflags
[i
].name
);
161 /***********************************************************************
162 * ChooseFontW (COMDLG32.@)
164 * Create a font dialog box.
167 * lpChFont [I/O] in: information to initialize the dialog box.
168 * out: User's color selection
171 * TRUE: Ok button clicked.
172 * FALSE: Cancel button clicked, or error.
174 BOOL WINAPI
ChooseFontW(LPCHOOSEFONTW lpChFont
)
181 TRACE("(%p)\n", lpChFont
);
183 if ( (lpChFont
->Flags
&CF_ENABLETEMPLATEHANDLE
)!=0 )
185 template=(LPCVOID
)lpChFont
->hInstance
;
188 if ( (lpChFont
->Flags
&CF_ENABLETEMPLATE
)!=0 )
190 hDlginst
=lpChFont
->hInstance
;
191 if( !(hResInfo
= FindResourceW(hDlginst
, lpChFont
->lpTemplateName
,
194 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE
);
199 hDlginst
=COMDLG32_hInstance
;
200 if (!(hResInfo
= FindResourceW(hDlginst
, chooseFontW
, (LPWSTR
)RT_DIALOG
)))
202 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE
);
206 if (!(hDlgTmpl
= LoadResource(hDlginst
, hResInfo
)) ||
207 !(template = LockResource( hDlgTmpl
)))
209 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE
);
213 if (TRACE_ON(commdlg
))
214 _dump_cf_flags(lpChFont
->Flags
);
216 if (lpChFont
->Flags
& (CF_SELECTSCRIPT
| CF_NOVERTFONTS
))
217 FIXME(": unimplemented flag (ignored)\n");
219 return DialogBoxIndirectParamW(COMDLG32_hInstance
, template,
220 lpChFont
->hwndOwner
, FormatCharDlgProcW
, (LPARAM
)lpChFont
);
223 /***********************************************************************
224 * ChooseFontA (COMDLG32.@)
228 BOOL WINAPI
ChooseFontA(LPCHOOSEFONTA lpChFont
)
235 TRACE("(%p)\n", lpChFont
);
237 if ( (lpChFont
->Flags
&CF_ENABLETEMPLATEHANDLE
)!=0 )
239 template=(LPCVOID
)lpChFont
->hInstance
;
242 if ( (lpChFont
->Flags
&CF_ENABLETEMPLATE
)!=0 )
244 hDlginst
=lpChFont
->hInstance
;
245 if( !(hResInfo
= FindResourceA(hDlginst
, lpChFont
->lpTemplateName
,
248 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE
);
253 hDlginst
=COMDLG32_hInstance
;
254 if (!(hResInfo
= FindResourceW(hDlginst
, chooseFontW
, (LPWSTR
)RT_DIALOG
)))
256 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE
);
260 if (!(hDlgTmpl
= LoadResource(hDlginst
, hResInfo
)) ||
261 !(template = LockResource( hDlgTmpl
)))
263 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE
);
267 if (TRACE_ON(commdlg
))
268 _dump_cf_flags(lpChFont
->Flags
);
269 if (lpChFont
->Flags
& (CF_SELECTSCRIPT
| CF_NOVERTFONTS
))
270 FIXME(": unimplemented flag (ignored)\n");
272 return DialogBoxIndirectParamA(COMDLG32_hInstance
, template,
273 lpChFont
->hwndOwner
, FormatCharDlgProcA
, (LPARAM
)lpChFont
);
276 #define TEXT_EXTRAS 4
277 #define TEXT_COLORS 16
279 static const COLORREF textcolors
[TEXT_COLORS
]=
281 0x00000000L
,0x00000080L
,0x00008000L
,0x00008080L
,
282 0x00800000L
,0x00800080L
,0x00808000L
,0x00808080L
,
283 0x00c0c0c0L
,0x000000ffL
,0x0000ff00L
,0x0000ffffL
,
284 0x00ff0000L
,0x00ff00ffL
,0x00ffff00L
,0x00FFFFFFL
287 /***********************************************************************
288 * CFn_HookCallChk32 [internal]
290 static BOOL
CFn_HookCallChk32(LPCHOOSEFONTW lpcf
)
293 if(lpcf
->Flags
& CF_ENABLEHOOK
)
299 /*************************************************************************
300 * AddFontFamily [internal]
302 INT
AddFontFamily(const ENUMLOGFONTEXW
*lpElfex
, const NEWTEXTMETRICEXW
*lpNTM
,
303 UINT nFontType
, LPCHOOSEFONTW lpcf
, HWND hwnd
, LPCFn_ENUMSTRUCT e
)
307 const LOGFONTW
*lplf
= &(lpElfex
->elfLogFont
);
309 TRACE("font=%s (nFontType=%d)\n", debugstr_w(lplf
->lfFaceName
), nFontType
);
311 if (lpcf
->Flags
& CF_FIXEDPITCHONLY
)
312 if (!(lplf
->lfPitchAndFamily
& FIXED_PITCH
))
314 if (lpcf
->Flags
& CF_ANSIONLY
)
315 if (lplf
->lfCharSet
!= ANSI_CHARSET
)
317 if (lpcf
->Flags
& CF_TTONLY
)
318 if (!(nFontType
& TRUETYPE_FONTTYPE
))
323 i
=SendMessageW(hwnd
, CB_FINDSTRINGEXACT
, 0, (LPARAM
)lplf
->lfFaceName
);
325 i
= SendMessageW(hwnd
, CB_ADDSTRING
, 0, (LPARAM
)lplf
->lfFaceName
);
327 /* store some important font information */
328 w
= (lplf
->lfPitchAndFamily
) << 8 |
329 (HIWORD(lpNTM
->ntmTm
.ntmFlags
) & 0xff);
330 SendMessageW(hwnd
, CB_SETITEMDATA
, i
, MAKELONG(nFontType
,w
));
336 /*************************************************************************
337 * FontFamilyEnumProc32 [internal]
339 static INT WINAPI
FontFamilyEnumProc(const ENUMLOGFONTEXW
*lpElfex
,
340 const TEXTMETRICW
*metrics
, DWORD dwFontType
, LPARAM lParam
)
343 e
=(LPCFn_ENUMSTRUCT
)lParam
;
344 return AddFontFamily( lpElfex
, (NEWTEXTMETRICEXW
*) metrics
,
345 dwFontType
, e
->lpcf32w
, e
->hWnd1
, e
);
348 /*************************************************************************
349 * SetFontStylesToCombo2 [internal]
351 * Fill font style information into combobox (without using font.c directly)
353 static int SetFontStylesToCombo2(HWND hwnd
, HDC hdc
, const LOGFONTW
*lplf
)
362 static const WCHAR strRegular
[] = {'R','e','g','u','l','a','r',0};
363 static const WCHAR strItalic
[] = {'I','t','a','l','i','c',0};
364 static const WCHAR strBold
[] = {'B','o','l','d',0};
365 static const WCHAR strBoldItalic
[] = {'B','o','l','d',' ','I','t','a','l','i','c',0};
366 static const struct FONTSTYLE fontstyles
[FSTYLES
]={
367 { 0, FW_NORMAL
, strRegular
},
368 { 1, FW_NORMAL
, strItalic
},
369 { 0, FW_BOLD
, strBold
},
370 { 1, FW_BOLD
, strBoldItalic
}
377 memcpy(&lf
, lplf
, sizeof(LOGFONTW
));
379 for (i
=0;i
<FSTYLES
;i
++)
381 lf
.lfItalic
=fontstyles
[i
].italic
;
382 lf
.lfWeight
=fontstyles
[i
].weight
;
383 hf
=CreateFontIndirectW(&lf
);
384 hf
=SelectObject(hdc
,hf
);
385 GetTextMetricsW(hdc
,&tm
);
386 hf
=SelectObject(hdc
,hf
);
388 /* font successful created ? */
389 if (tm
.tmWeight
==fontstyles
[i
].weight
&&
390 ((tm
.tmItalic
!= 0)==fontstyles
[i
].italic
))
392 j
=SendMessageW(hwnd
,CB_ADDSTRING
,0,(LPARAM
)fontstyles
[i
].stname
);
393 if (j
==CB_ERR
) return 1;
394 j
=SendMessageW(hwnd
, CB_SETITEMDATA
, j
,
395 MAKELONG(fontstyles
[i
].weight
,fontstyles
[i
].italic
));
396 if (j
==CB_ERR
) return 1;
402 /*************************************************************************
403 * AddFontSizeToCombo3 [internal]
405 static int AddFontSizeToCombo3(HWND hwnd
, UINT h
, LPCHOOSEFONTW lpcf
)
409 static const WCHAR strFormat
[] = {'%','2','d',0};
411 if ( (!(lpcf
->Flags
& CF_LIMITSIZE
)) ||
412 ((lpcf
->Flags
& CF_LIMITSIZE
) && (h
>= lpcf
->nSizeMin
) && (h
<= lpcf
->nSizeMax
)))
414 wsprintfW(buffer
, strFormat
, h
);
415 j
=SendMessageW(hwnd
, CB_FINDSTRINGEXACT
, -1, (LPARAM
)buffer
);
418 j
=SendMessageW(hwnd
, CB_ADDSTRING
, 0, (LPARAM
)buffer
);
419 if (j
!=CB_ERR
) j
= SendMessageW(hwnd
, CB_SETITEMDATA
, j
, h
);
420 if (j
==CB_ERR
) return 1;
426 /*************************************************************************
427 * SetFontSizesToCombo3 [internal]
429 static int SetFontSizesToCombo3(HWND hwnd
, LPCHOOSEFONTW lpcf
)
431 static const BYTE sizes
[]={6,7,8,9,10,11,12,14,16,18,20,22,24,26,28,36,48,72};
434 for (i
= 0; i
< sizeof(sizes
)/sizeof(sizes
[0]); i
++)
435 if (AddFontSizeToCombo3(hwnd
, sizes
[i
], lpcf
)) return 1;
439 /*************************************************************************
440 * CFn_GetDC [internal]
442 static inline HDC
CFn_GetDC(LPCHOOSEFONTW lpcf
)
444 HDC ret
= ((lpcf
->Flags
& CF_PRINTERFONTS
) && lpcf
->hDC
) ?
447 if(!ret
) ERR("HDC failure!!!\n");
451 /*************************************************************************
452 * CFn_ReleaseDC [internal]
454 static inline void CFn_ReleaseDC(LPCHOOSEFONTW lpcf
, HDC hdc
)
456 if(!((lpcf
->Flags
& CF_PRINTERFONTS
) && lpcf
->hDC
))
460 /***********************************************************************
461 * AddFontStyle [internal]
463 INT
AddFontStyle( const ENUMLOGFONTEXW
*lpElfex
, const NEWTEXTMETRICEXW
*lpNTM
,
464 UINT nFontType
, LPCHOOSEFONTW lpcf
, HWND hcmb2
, HWND hcmb3
,
465 HWND hDlg
, BOOL iswin16
)
468 const LOGFONTW
*lplf
= &(lpElfex
->elfLogFont
);
472 TRACE("(nFontType=%d)\n",nFontType
);
473 TRACE(" %s h=%ld w=%ld e=%ld o=%ld wg=%ld i=%d u=%d s=%d"
474 " ch=%d op=%d cp=%d q=%d pf=%xh\n",
475 debugstr_w(lplf
->lfFaceName
),lplf
->lfHeight
,lplf
->lfWidth
,
476 lplf
->lfEscapement
,lplf
->lfOrientation
,
477 lplf
->lfWeight
,lplf
->lfItalic
,lplf
->lfUnderline
,
478 lplf
->lfStrikeOut
,lplf
->lfCharSet
, lplf
->lfOutPrecision
,
479 lplf
->lfClipPrecision
,lplf
->lfQuality
, lplf
->lfPitchAndFamily
);
480 if (nFontType
& RASTER_FONTTYPE
)
483 if(!(hdc
= CFn_GetDC(lpcf
))) return 0;
484 points
= MulDiv( lpNTM
->ntmTm
.tmHeight
- lpNTM
->ntmTm
.tmInternalLeading
,
485 72, GetDeviceCaps(hdc
, LOGPIXELSY
));
486 CFn_ReleaseDC(lpcf
, hdc
);
487 i
= AddFontSizeToCombo3(hcmb3
, points
, lpcf
);
489 } else if (SetFontSizesToCombo3(hcmb3
, lpcf
)) return 0;
491 if (!SendMessageW(hcmb2
, CB_GETCOUNT
, 0, 0))
493 if(!(hdc
= CFn_GetDC(lpcf
))) return 0;
494 i
=SetFontStylesToCombo2(hcmb2
,hdc
,lplf
);
495 CFn_ReleaseDC(lpcf
, hdc
);
499 if( iswin16
|| !( hcmb5
= GetDlgItem(hDlg
, cmb5
))) return 1;
500 i
= SendMessageW( hcmb5
, CB_FINDSTRINGEXACT
, 0,
501 (LPARAM
)lpElfex
->elfScript
);
503 i
= SendMessageW( hcmb5
, CB_ADDSTRING
, 0,
504 (LPARAM
)lpElfex
->elfScript
);
506 SendMessageW( hcmb5
, CB_SETITEMDATA
, i
, lplf
->lfCharSet
);
511 static INT
CFn_FitFontSize( HWND hDlg
, int points
)
515 /* look for fitting font size in combobox3 */
516 n
=SendDlgItemMessageW(hDlg
, cmb3
, CB_GETCOUNT
, 0, 0);
519 if (points
== (int)SendDlgItemMessageW
520 (hDlg
,cmb3
, CB_GETITEMDATA
,i
,0))
522 SendDlgItemMessageW(hDlg
,cmb3
,CB_SETCURSEL
,i
,0);
523 SendMessageW(hDlg
, WM_COMMAND
,
524 MAKEWPARAM(cmb3
, CBN_SELCHANGE
),
525 (LPARAM
)GetDlgItem(hDlg
,cmb3
));
533 static INT
CFn_FitFontStyle( HWND hDlg
, LONG packedstyle
)
537 /* look for fitting font style in combobox2 */
538 for (i
=0;i
<TEXT_EXTRAS
;i
++)
540 id
= SendDlgItemMessageW(hDlg
, cmb2
, CB_GETITEMDATA
, i
, 0);
541 if (packedstyle
== id
)
543 SendDlgItemMessageW(hDlg
, cmb2
, CB_SETCURSEL
, i
, 0);
544 SendMessageW(hDlg
, WM_COMMAND
, MAKEWPARAM(cmb2
, CBN_SELCHANGE
),
545 (LPARAM
)GetDlgItem(hDlg
,cmb2
));
554 static INT
CFn_FitCharSet( HWND hDlg
, int charset
)
557 /* look for fitting char set in combobox5 */
558 n
=SendDlgItemMessageW(hDlg
, cmb5
, CB_GETCOUNT
, 0, 0);
561 cs
=SendDlgItemMessageW(hDlg
, cmb5
, CB_GETITEMDATA
, i
, 0);
564 SendDlgItemMessageW(hDlg
, cmb5
, CB_SETCURSEL
, i
, 0);
565 SendMessageW(hDlg
, WM_COMMAND
, MAKEWPARAM(cmb5
, CBN_SELCHANGE
),
566 (LPARAM
)GetDlgItem(hDlg
,cmb2
));
570 /* no charset fits: select the first one in the list */
571 SendDlgItemMessageW(hDlg
, cmb5
, CB_SETCURSEL
, 0, 0);
572 SendMessageW(hDlg
, WM_COMMAND
, MAKEWPARAM(cmb5
, CBN_SELCHANGE
),
573 (LPARAM
)GetDlgItem(hDlg
,cmb2
));
577 /***********************************************************************
578 * FontStyleEnumProc32 [internal]
580 static INT WINAPI
FontStyleEnumProc( const ENUMLOGFONTEXW
*lpElfex
,
581 const TEXTMETRICW
*metrics
, DWORD dwFontType
, LPARAM lParam
)
583 LPCFn_ENUMSTRUCT s
=(LPCFn_ENUMSTRUCT
)lParam
;
586 HWND hDlg
=GetParent(hcmb3
);
587 return AddFontStyle( lpElfex
, (const NEWTEXTMETRICEXW
*) metrics
,
588 dwFontType
, s
->lpcf32w
, hcmb2
, hcmb3
, hDlg
, FALSE
);
591 /***********************************************************************
592 * CFn_WMInitDialog [internal]
594 LRESULT
CFn_WMInitDialog(HWND hDlg
, WPARAM wParam
, LPARAM lParam
,
602 HCURSOR hcursor
=SetCursor(LoadCursorW(0,(LPWSTR
)IDC_WAIT
));
603 static const WCHAR strColorName
[] = {'[','c','o','l','o','r',' ','n','a','m','e',']',0};
605 SetPropW(hDlg
, strWineFontData
, (HANDLE
)lpcf
);
606 lpxx
=lpcf
->lpLogFont
;
607 TRACE("WM_INITDIALOG lParam=%08lX\n", lParam
);
609 if (lpcf
->lStructSize
!= sizeof(CHOOSEFONTW
))
611 ERR("structure size failure !!!\n");
616 himlTT
= ImageList_LoadImageW( COMDLG32_hInstance
, MAKEINTRESOURCEW(38),
617 TTBITMAP_XSIZE
, 0, CLR_DEFAULT
, IMAGE_BITMAP
, 0);
619 if (!(lpcf
->Flags
& CF_SHOWHELP
) || !IsWindow(lpcf
->hwndOwner
))
620 ShowWindow(GetDlgItem(hDlg
,pshHelp
),SW_HIDE
);
621 if (!(lpcf
->Flags
& CF_APPLY
))
622 ShowWindow(GetDlgItem(hDlg
,psh3
),SW_HIDE
);
623 if (lpcf
->Flags
& CF_EFFECTS
)
625 for (i
=0;i
<TEXT_COLORS
;i
++)
629 if( LoadStringW(COMDLG32_hInstance
, IDS_COLOR_BLACK
+i
, name
,
630 sizeof(name
)/sizeof(*name
) )==0 )
632 memcpy(name
, strColorName
, sizeof(strColorName
));
634 j
=SendDlgItemMessageW(hDlg
, cmb4
, CB_ADDSTRING
, 0, (LPARAM
)name
);
635 SendDlgItemMessageW(hDlg
, cmb4
, CB_SETITEMDATA
, j
, textcolors
[i
]);
636 /* look for a fitting value in color combobox */
637 if (textcolors
[i
]==lpcf
->rgbColors
)
638 SendDlgItemMessageW(hDlg
,cmb4
, CB_SETCURSEL
,j
,0);
643 ShowWindow(GetDlgItem(hDlg
,cmb4
),SW_HIDE
);
644 ShowWindow(GetDlgItem(hDlg
,chx1
),SW_HIDE
);
645 ShowWindow(GetDlgItem(hDlg
,chx2
),SW_HIDE
);
646 ShowWindow(GetDlgItem(hDlg
,grp1
),SW_HIDE
);
647 ShowWindow(GetDlgItem(hDlg
,stc4
),SW_HIDE
);
649 if(!(hdc
= CFn_GetDC(lpcf
)))
654 s
.hWnd1
=GetDlgItem(hDlg
,cmb1
);
659 elf
.lfCharSet
= DEFAULT_CHARSET
; /* enum all charsets */
660 elf
.lfPitchAndFamily
= 0;
661 elf
.lfFaceName
[0] = '\0'; /* enum all fonts */
662 if (!EnumFontFamiliesExW(hdc
, &elf
, (FONTENUMPROCW
)FontFamilyEnumProc
, (LPARAM
)&s
, 0))
664 TRACE("EnumFontFamiliesEx returns 0\n");
668 if (lpcf
->Flags
& CF_FIXEDPITCHONLY
) {
669 FIXME("No font found with fixed pitch only, dropping flag.\n");
670 lpcf
->Flags
&= ~CF_FIXEDPITCHONLY
;
673 if (lpcf
->Flags
& CF_TTONLY
) {
674 FIXME("No font found with truetype only, dropping flag.\n");
675 lpcf
->Flags
&= ~CF_TTONLY
;
682 if (lpcf
->Flags
& CF_INITTOLOGFONTSTRUCT
)
684 /* look for fitting font name in combobox1 */
685 j
=SendDlgItemMessageW(hDlg
,cmb1
,CB_FINDSTRING
,-1,(LPARAM
)lpxx
->lfFaceName
);
688 INT height
= lpxx
->lfHeight
< 0 ? -lpxx
->lfHeight
:
691 int charset
= lpxx
->lfCharSet
;
692 points
= MulDiv( height
, 72, GetDeviceCaps(hdc
, LOGPIXELSY
));
693 pstyle
= MAKELONG(lpxx
->lfWeight
> FW_MEDIUM
? FW_BOLD
:
694 FW_NORMAL
,lpxx
->lfItalic
!=0);
695 SendDlgItemMessageW(hDlg
, cmb1
, CB_SETCURSEL
, j
, 0);
696 SendMessageW(hDlg
, WM_COMMAND
, MAKEWPARAM(cmb1
, CBN_SELCHANGE
),
697 (LPARAM
)GetDlgItem(hDlg
,cmb1
));
699 /* look for fitting font style in combobox2 */
700 CFn_FitFontStyle(hDlg
, pstyle
);
701 /* look for fitting font size in combobox3 */
702 CFn_FitFontSize(hDlg
, points
);
703 CFn_FitCharSet( hDlg
, charset
);
708 SendDlgItemMessageW(hDlg
,cmb1
,CB_SETCURSEL
,0,0);
709 SendMessageW(hDlg
, WM_COMMAND
, MAKEWPARAM(cmb1
, CBN_SELCHANGE
),
710 (LPARAM
)GetDlgItem(hDlg
,cmb1
));
712 if ((lpcf
->Flags
& CF_USESTYLE
) && lpcf
->lpszStyle
)
714 j
=SendDlgItemMessageW(hDlg
,cmb2
,CB_FINDSTRING
,-1,(LPARAM
)lpcf
->lpszStyle
);
717 j
=SendDlgItemMessageW(hDlg
,cmb2
,CB_SETCURSEL
,j
,0);
718 SendMessageW(hDlg
,WM_COMMAND
,cmb2
,
719 MAKELONG(HWND_16(GetDlgItem(hDlg
,cmb2
)),CBN_SELCHANGE
));
722 CFn_ReleaseDC(lpcf
, hdc
);
728 /***********************************************************************
729 * CFn_WMMeasureItem [internal]
731 LRESULT
CFn_WMMeasureItem(HWND hDlg
, WPARAM wParam
, LPARAM lParam
)
736 LPMEASUREITEMSTRUCT lpmi
=(LPMEASUREITEMSTRUCT
)lParam
;
740 himlTT
= ImageList_LoadImageW( COMDLG32_hInstance
, MAKEINTRESOURCEW(38),
741 TTBITMAP_XSIZE
, 0, CLR_DEFAULT
, IMAGE_BITMAP
, 0);
742 ImageList_GetIconSize( himlTT
, 0, &height
);
743 lpmi
->itemHeight
= height
+ 2;
744 /* use MAX of bitmap height and tm.tmHeight .*/
747 hfontprev
= SelectObject( hdc
, GetStockObject( SYSTEM_FONT
));
748 GetTextMetricsW(hdc
, &tm
);
749 if( tm
.tmHeight
> lpmi
->itemHeight
) lpmi
->itemHeight
= tm
.tmHeight
;
750 SelectObject(hdc
, hfontprev
);
751 ReleaseDC(hDlg
, hdc
);
756 /***********************************************************************
757 * CFn_WMDrawItem [internal]
759 LRESULT
CFn_WMDrawItem(HWND hDlg
, WPARAM wParam
, LPARAM lParam
)
763 COLORREF cr
, oldText
=0, oldBk
=0;
767 LPDRAWITEMSTRUCT lpdi
= (LPDRAWITEMSTRUCT
)lParam
;
769 if (lpdi
->itemID
== (UINT
)-1) /* got no items */
770 DrawFocusRect(lpdi
->hDC
, &lpdi
->rcItem
);
773 if (lpdi
->CtlType
== ODT_COMBOBOX
)
775 if (lpdi
->itemState
& ODS_SELECTED
)
777 hBrush
=GetSysColorBrush(COLOR_HIGHLIGHT
);
778 oldText
=SetTextColor(lpdi
->hDC
, GetSysColor(COLOR_HIGHLIGHTTEXT
));
779 oldBk
=SetBkColor(lpdi
->hDC
, GetSysColor(COLOR_HIGHLIGHT
));
782 hBrush
= SelectObject(lpdi
->hDC
, GetStockObject(LTGRAY_BRUSH
));
783 SelectObject(lpdi
->hDC
, hBrush
);
785 FillRect(lpdi
->hDC
, &lpdi
->rcItem
, hBrush
);
788 return TRUE
; /* this should never happen */
794 /* TRACE(commdlg,"WM_Drawitem cmb1\n"); */
795 SendMessageW(lpdi
->hwndItem
, CB_GETLBTEXT
, lpdi
->itemID
,
797 TextOutW(lpdi
->hDC
, lpdi
->rcItem
.left
+ TTBITMAP_XSIZE
+ 10,
798 lpdi
->rcItem
.top
, buffer
, lstrlenW(buffer
));
799 nFontType
= SendMessageW(lpdi
->hwndItem
, CB_GETITEMDATA
, lpdi
->itemID
,0L);
801 if (nFontType
& TRUETYPE_FONTTYPE
) {
802 idx
= 0; /* picture: TT */
803 if( nFontType
& NTM_TT_OPENTYPE
)
804 idx
= 2; /* picture: O */
805 } else if( nFontType
& NTM_PS_OPENTYPE
)
806 idx
= 3; /* picture: O+ps */
807 else if( nFontType
& NTM_TYPE1
)
808 idx
= 4; /* picture: a */
809 else if( nFontType
& DEVICE_FONTTYPE
)
810 idx
= 1; /* picture: printer */
812 ImageList_Draw( himlTT
, idx
, lpdi
->hDC
, lpdi
->rcItem
.left
,
813 lpdi
->rcItem
.top
, ILD_TRANSPARENT
);
817 /* TRACE(commdlg,"WM_DRAWITEN cmb2,cmb3\n"); */
819 SendMessageW(lpdi
->hwndItem
, CB_GETLBTEXT
, lpdi
->itemID
,
821 TextOutW(lpdi
->hDC
, lpdi
->rcItem
.left
,
822 lpdi
->rcItem
.top
, buffer
, lstrlenW(buffer
));
826 /* TRACE(commdlg,"WM_DRAWITEM cmb4 (=COLOR)\n"); */
827 SendMessageW(lpdi
->hwndItem
, CB_GETLBTEXT
, lpdi
->itemID
,
829 TextOutW(lpdi
->hDC
, lpdi
->rcItem
.left
+ 25+5,
830 lpdi
->rcItem
.top
, buffer
, lstrlenW(buffer
));
831 cr
= SendMessageW(lpdi
->hwndItem
, CB_GETITEMDATA
, lpdi
->itemID
,0L);
832 hBrush
= CreateSolidBrush(cr
);
835 hBrush
= SelectObject (lpdi
->hDC
, hBrush
) ;
836 rect
.right
=rect
.left
+25;
840 Rectangle( lpdi
->hDC
, rect
.left
, rect
.top
,
841 rect
.right
, rect
.bottom
);
842 DeleteObject( SelectObject (lpdi
->hDC
, hBrush
)) ;
849 return TRUE
; /* this should never happen */
851 if (lpdi
->itemState
& ODS_SELECTED
)
853 SetTextColor(lpdi
->hDC
, oldText
);
854 SetBkColor(lpdi
->hDC
, oldBk
);
860 /***********************************************************************
861 * CFn_WMCommand [internal]
863 LRESULT
CFn_WMCommand(HWND hDlg
, WPARAM wParam
, LPARAM lParam
,
869 LPLOGFONTW lpxx
=lpcf
->lpLogFont
;
871 TRACE("WM_COMMAND wParam=%08lX lParam=%08lX\n", (LONG
)wParam
, lParam
);
872 switch (LOWORD(wParam
))
875 if (HIWORD(wParam
)==CBN_SELCHANGE
)
877 INT pointsize
; /* save current pointsize */
878 LONG pstyle
; /* save current style */
881 if(!(hdc
= CFn_GetDC(lpcf
)))
886 idx
= SendDlgItemMessageW(hDlg
, cmb3
, CB_GETCURSEL
, 0, 0);
887 pointsize
= (int)SendDlgItemMessageW( hDlg
, cmb3
, CB_GETITEMDATA
,
889 idx
= SendDlgItemMessageW(hDlg
, cmb2
, CB_GETCURSEL
, 0, 0);
890 pstyle
= SendDlgItemMessageW(hDlg
, cmb2
, CB_GETITEMDATA
, idx
, 0);
891 idx
= SendDlgItemMessageW(hDlg
, cmb5
, CB_GETCURSEL
, 0, 0);
892 charset
= SendDlgItemMessageW(hDlg
, cmb5
, CB_GETITEMDATA
, idx
, 0);
894 SendDlgItemMessageW(hDlg
, cmb2
, CB_RESETCONTENT
, 0, 0);
895 SendDlgItemMessageW(hDlg
, cmb3
, CB_RESETCONTENT
, 0, 0);
896 SendDlgItemMessageW(hDlg
, cmb5
, CB_RESETCONTENT
, 0, 0);
897 i
=SendDlgItemMessageW(hDlg
, cmb1
, CB_GETCURSEL
, 0, 0);
900 HCURSOR hcursor
=SetCursor(LoadCursorW(0,(LPWSTR
)IDC_WAIT
));
903 SendDlgItemMessageW(hDlg
, cmb1
, CB_GETLBTEXT
, i
,
904 (LPARAM
)enumlf
.lfFaceName
);
905 TRACE("WM_COMMAND/cmb1 =>%s\n", debugstr_w(enumlf
.lfFaceName
));
906 s
.hWnd1
=GetDlgItem(hDlg
, cmb2
);
907 s
.hWnd2
=GetDlgItem(hDlg
, cmb3
);
909 enumlf
.lfCharSet
= DEFAULT_CHARSET
; /* enum all charsets */
910 enumlf
.lfPitchAndFamily
= 0;
911 EnumFontFamiliesExW(hdc
, &enumlf
,
912 (FONTENUMPROCW
)FontStyleEnumProc
, (LPARAM
)&s
, 0);
913 CFn_FitFontStyle(hDlg
, pstyle
);
914 if( pointsize
!= CB_ERR
) CFn_FitFontSize(hDlg
, pointsize
);
915 if( charset
!= CB_ERR
) CFn_FitCharSet( hDlg
, charset
);
918 CFn_ReleaseDC(lpcf
, hdc
);
925 if (HIWORD(wParam
)==CBN_SELCHANGE
|| HIWORD(wParam
)== BN_CLICKED
)
930 TRACE("WM_COMMAND/cmb2,3 =%08lX\n", lParam
);
931 i
=SendDlgItemMessageW(hDlg
,cmb1
,CB_GETCURSEL
,0,0);
933 i
=GetDlgItemTextW( hDlg
, cmb1
, str
, 256 );
936 SendDlgItemMessageW(hDlg
,cmb1
,CB_GETLBTEXT
,i
,
938 l
=SendDlgItemMessageW(hDlg
,cmb1
,CB_GETITEMDATA
,i
,0);
939 lpcf
->nFontType
= LOWORD(l
);
940 /* FIXME: lpcf->nFontType |= .... SIMULATED_FONTTYPE and so */
941 /* same value reported to the EnumFonts
942 call back with the extra FONTTYPE_... bits added */
943 lpxx
->lfPitchAndFamily
= HIWORD(l
) >> 8;
945 lstrcpyW(lpxx
->lfFaceName
,str
);
946 i
=SendDlgItemMessageW(hDlg
, cmb2
, CB_GETCURSEL
, 0, 0);
949 l
=SendDlgItemMessageW(hDlg
, cmb2
, CB_GETITEMDATA
, i
, 0);
950 if (0!=(lpxx
->lfItalic
=HIWORD(l
)))
951 lpcf
->nFontType
|= ITALIC_FONTTYPE
;
952 if ((lpxx
->lfWeight
=LOWORD(l
)) > FW_MEDIUM
)
953 lpcf
->nFontType
|= BOLD_FONTTYPE
;
955 i
=SendDlgItemMessageW(hDlg
, cmb3
, CB_GETCURSEL
, 0, 0);
957 lpcf
->iPointSize
= 10 * LOWORD(SendDlgItemMessageW(hDlg
, cmb3
,
958 CB_GETITEMDATA
, i
, 0));
960 lpcf
->iPointSize
= 100;
961 hdc
= CFn_GetDC(lpcf
);
964 lpxx
->lfHeight
= - MulDiv( lpcf
->iPointSize
,
965 GetDeviceCaps(hdc
, LOGPIXELSY
), 720);
966 CFn_ReleaseDC(lpcf
, hdc
);
968 lpxx
->lfHeight
= -lpcf
->iPointSize
/ 10;
969 i
=SendDlgItemMessageW(hDlg
, cmb5
, CB_GETCURSEL
, 0, 0);
971 lpxx
->lfCharSet
=SendDlgItemMessageW(hDlg
, cmb5
, CB_GETITEMDATA
, i
, 0);
973 lpxx
->lfCharSet
= DEFAULT_CHARSET
;
974 lpxx
->lfStrikeOut
=IsDlgButtonChecked(hDlg
,chx1
);
975 lpxx
->lfUnderline
=IsDlgButtonChecked(hDlg
,chx2
);
976 lpxx
->lfWidth
=lpxx
->lfOrientation
=lpxx
->lfEscapement
=0;
977 lpxx
->lfOutPrecision
=OUT_DEFAULT_PRECIS
;
978 lpxx
->lfClipPrecision
=CLIP_DEFAULT_PRECIS
;
979 lpxx
->lfQuality
=DEFAULT_QUALITY
;
981 wininfo
.cbSize
=sizeof(wininfo
);
983 if( GetWindowInfo( GetDlgItem( hDlg
, stc5
), &wininfo
) )
985 MapWindowPoints( 0, hDlg
, (LPPOINT
) &wininfo
.rcWindow
, 2);
986 InvalidateRect( hDlg
, &wininfo
.rcWindow
, TRUE
);
992 i
=SendDlgItemMessageW(hDlg
, cmb4
, CB_GETCURSEL
, 0, 0);
997 lpcf
->rgbColors
= SendDlgItemMessageW(hDlg
, cmb4
, CB_GETITEMDATA
, i
, 0);
998 wininfo
.cbSize
=sizeof(wininfo
);
1000 if( GetWindowInfo( GetDlgItem( hDlg
, stc5
), &wininfo
) )
1002 MapWindowPoints( 0, hDlg
, (LPPOINT
) &wininfo
.rcWindow
, 2);
1003 InvalidateRect( hDlg
, &wininfo
.rcWindow
, TRUE
);
1009 i
=RegisterWindowMessageW( HELPMSGSTRINGW
);
1010 if (lpcf
->hwndOwner
)
1011 SendMessageW(lpcf
->hwndOwner
, i
, 0, (LPARAM
)GetPropW(hDlg
, strWineFontData
));
1012 /* if (CFn_HookCallChk(lpcf))
1013 CallWindowProc16(lpcf->lpfnHook,hDlg,WM_COMMAND,psh15,(LPARAM)lpcf);*/
1017 if ( (!(lpcf
->Flags
& CF_LIMITSIZE
)) ||
1018 ( (lpcf
->Flags
& CF_LIMITSIZE
) &&
1019 (lpcf
->iPointSize
>= 10 * lpcf
->nSizeMin
) &&
1020 (lpcf
->iPointSize
<= 10 * lpcf
->nSizeMax
)))
1021 EndDialog(hDlg
, TRUE
);
1026 LoadStringW(COMDLG32_hInstance
, IDS_FONT_SIZE
, format
, sizeof(format
)/sizeof(WCHAR
));
1027 wsprintfW(buffer
, format
, lpcf
->nSizeMin
,lpcf
->nSizeMax
);
1028 MessageBoxW(hDlg
, buffer
, NULL
, MB_OK
);
1032 EndDialog(hDlg
, FALSE
);
1038 static LRESULT
CFn_WMDestroy(HWND hwnd
, WPARAM wParam
, LPARAM lParam
, LPCHOOSEFONTW lpcfw
)
1040 LPCHOOSEFONTA lpcfa
;
1042 LPLOGFONTA lpLogFonta
;
1045 lpcfa
= GetPropW(hwnd
, strWineFontData_a
);
1046 lpLogFonta
= lpcfa
->lpLogFont
;
1047 lpszStyle
= lpcfa
->lpszStyle
;
1048 memcpy(lpcfa
, lpcfw
, sizeof(CHOOSEFONTA
));
1049 lpcfa
->lpLogFont
= lpLogFonta
;
1050 lpcfa
->lpszStyle
= lpszStyle
;
1051 memcpy(lpcfa
->lpLogFont
, lpcfw
->lpLogFont
, sizeof(LOGFONTA
));
1052 WideCharToMultiByte(CP_ACP
, 0, lpcfw
->lpLogFont
->lfFaceName
,
1053 LF_FACESIZE
, lpcfa
->lpLogFont
->lfFaceName
, LF_FACESIZE
, 0, 0);
1055 if((lpcfw
->Flags
& CF_USESTYLE
) && lpcfw
->lpszStyle
) {
1056 len
= WideCharToMultiByte(CP_ACP
, 0, lpcfw
->lpszStyle
, -1, NULL
, -1, 0, 0);
1057 WideCharToMultiByte(CP_ACP
, 0, lpcfw
->lpszStyle
, -1, lpcfa
->lpszStyle
, len
, 0, 0);
1058 HeapFree(GetProcessHeap(), 0, lpcfw
->lpszStyle
);
1061 HeapFree(GetProcessHeap(), 0, lpcfw
->lpLogFont
);
1062 HeapFree(GetProcessHeap(), 0, lpcfw
);
1063 SetPropW(hwnd
, strWineFontData
, 0);
1068 LRESULT
CFn_WMPaint(HWND hDlg
, WPARAM wParam
, LPARAM lParam
, LPCHOOSEFONTW lpcf
)
1072 info
.cbSize
=sizeof(info
);
1073 if( GetWindowInfo( GetDlgItem( hDlg
, stc5
), &info
) )
1079 LOGFONTW lf
= *(lpcf
->lpLogFont
);
1081 MapWindowPoints( 0, hDlg
, (LPPOINT
) &info
.rcWindow
, 2);
1082 hdc
= BeginPaint( hDlg
, &ps
);
1084 TRACE("erase %d, rect=(%ld,%ld)-(%ld,%ld)\n", ps
.fErase
,
1085 ps
.rcPaint
.left
, ps
.rcPaint
.top
,
1086 ps
.rcPaint
.right
, ps
.rcPaint
.bottom
);
1089 MoveToEx( hdc
, info
.rcWindow
.left
, info
.rcWindow
.bottom
, NULL
);
1090 hOrigPen
=SelectObject( hdc
, CreatePen( PS_SOLID
, 2,
1091 GetSysColor( COLOR_3DSHADOW
) ));
1092 LineTo( hdc
, info
.rcWindow
.left
, info
.rcWindow
.top
);
1093 LineTo( hdc
, info
.rcWindow
.right
, info
.rcWindow
.top
);
1094 DeleteObject(SelectObject( hdc
, CreatePen( PS_SOLID
, 2,
1095 GetSysColor( COLOR_3DLIGHT
) )));
1096 LineTo( hdc
, info
.rcWindow
.right
, info
.rcWindow
.bottom
);
1097 LineTo( hdc
, info
.rcWindow
.left
, info
.rcWindow
.bottom
);
1098 DeleteObject(SelectObject( hdc
, hOrigPen
));
1100 /* Draw the sample text itself */
1101 info
.rcWindow
.right
--;
1102 info
.rcWindow
.bottom
--;
1103 info
.rcWindow
.top
++;
1104 info
.rcWindow
.left
++;
1105 hOrigFont
= SelectObject( hdc
, CreateFontIndirectW( &lf
) );
1106 SetTextColor( hdc
, lpcf
->rgbColors
);
1109 sample_lang_text
[CHARSET_ORDER
[lpcf
->lpLogFont
->lfCharSet
]],
1110 -1, &info
.rcWindow
, DT_CENTER
|DT_VCENTER
|DT_SINGLELINE
);
1112 DeleteObject(SelectObject( hdc
, hOrigFont
));
1113 EndPaint( hDlg
, &ps
);
1118 /***********************************************************************
1119 * FormatCharDlgProcA [internal]
1121 INT_PTR CALLBACK
FormatCharDlgProcA(HWND hDlg
, UINT uMsg
, WPARAM wParam
,
1124 LPCHOOSEFONTW lpcfw
;
1125 LPCHOOSEFONTA lpcfa
;
1126 INT_PTR res
= FALSE
;
1129 if (uMsg
!=WM_INITDIALOG
) {
1130 lpcfw
= (LPCHOOSEFONTW
)GetPropW(hDlg
, strWineFontData
);
1133 if (CFn_HookCallChk32(lpcfw
))
1134 res
=CallWindowProcA((WNDPROC
)lpcfw
->lpfnHook
, hDlg
, uMsg
, wParam
, lParam
);
1138 lpcfa
=(LPCHOOSEFONTA
)lParam
;
1139 SetPropW(hDlg
, strWineFontData_a
, (HANDLE
)lParam
);
1141 lpcfw
= HeapAlloc(GetProcessHeap(), 0, sizeof(CHOOSEFONTW
));
1142 memcpy(lpcfw
, lpcfa
, sizeof(CHOOSEFONTA
));
1143 lpcfw
->lpLogFont
= HeapAlloc(GetProcessHeap(), 0, sizeof(LOGFONTW
));
1144 memcpy(lpcfw
->lpLogFont
, lpcfa
->lpLogFont
, sizeof(LOGFONTA
));
1145 MultiByteToWideChar(CP_ACP
, 0, lpcfa
->lpLogFont
->lfFaceName
,
1146 LF_FACESIZE
, lpcfw
->lpLogFont
->lfFaceName
, LF_FACESIZE
);
1148 if((lpcfa
->Flags
& CF_USESTYLE
) && lpcfa
->lpszStyle
) {
1149 len
= MultiByteToWideChar(CP_ACP
, 0, lpcfa
->lpszStyle
, -1, NULL
, 0);
1150 lpcfw
->lpszStyle
= HeapAlloc(GetProcessHeap(), 0, len
*sizeof(WCHAR
));
1151 MultiByteToWideChar(CP_ACP
, 0, lpcfa
->lpszStyle
, -1, lpcfw
->lpszStyle
, len
);
1154 if (!CFn_WMInitDialog(hDlg
, wParam
, lParam
, lpcfw
))
1156 TRACE("CFn_WMInitDialog returned FALSE\n");
1159 if (CFn_HookCallChk32(lpcfw
))
1160 return CallWindowProcA((WNDPROC
)lpcfa
->lpfnHook
,hDlg
,WM_INITDIALOG
,wParam
,lParam
);
1164 case WM_MEASUREITEM
:
1165 return CFn_WMMeasureItem(hDlg
, wParam
, lParam
);
1167 return CFn_WMDrawItem(hDlg
, wParam
, lParam
);
1169 return CFn_WMCommand(hDlg
, wParam
, lParam
, lpcfw
);
1171 return CFn_WMDestroy(hDlg
, wParam
, lParam
, lpcfw
);
1172 case WM_CHOOSEFONT_GETLOGFONT
:
1173 TRACE("WM_CHOOSEFONT_GETLOGFONT lParam=%08lX\n", lParam
);
1174 FIXME("current logfont back to caller\n");
1177 return CFn_WMPaint(hDlg
, wParam
, lParam
, lpcfw
);
1182 /***********************************************************************
1183 * FormatCharDlgProcW [internal]
1185 INT_PTR CALLBACK
FormatCharDlgProcW(HWND hDlg
, UINT uMsg
, WPARAM wParam
,
1189 INT_PTR res
= FALSE
;
1191 if (uMsg
!=WM_INITDIALOG
)
1193 lpcf
=(LPCHOOSEFONTW
)GetPropW(hDlg
, strWineFontData
);
1196 if (CFn_HookCallChk32(lpcf
))
1197 res
=CallWindowProcW((WNDPROC
)lpcf
->lpfnHook
, hDlg
, uMsg
, wParam
, lParam
);
1203 lpcf
=(LPCHOOSEFONTW
)lParam
;
1204 if (!CFn_WMInitDialog(hDlg
, wParam
, lParam
, lpcf
))
1206 TRACE("CFn_WMInitDialog returned FALSE\n");
1209 if (CFn_HookCallChk32(lpcf
))
1210 return CallWindowProcW((WNDPROC
)lpcf
->lpfnHook
,hDlg
,WM_INITDIALOG
,wParam
,lParam
);
1214 case WM_MEASUREITEM
:
1215 return CFn_WMMeasureItem(hDlg
, wParam
, lParam
);
1217 return CFn_WMDrawItem(hDlg
, wParam
, lParam
);
1219 return CFn_WMCommand(hDlg
, wParam
, lParam
, lpcf
);
1222 case WM_CHOOSEFONT_GETLOGFONT
:
1223 TRACE("WM_CHOOSEFONT_GETLOGFONT lParam=%08lX\n", lParam
);
1224 FIXME("current logfont back to caller\n");
1227 return CFn_WMPaint(hDlg
, wParam
, lParam
, lpcf
);