1 /* 2 * COMMDLG - Font Dialog 3 * 4 * Copyright 1994 Martin Ayotte 5 * Copyright 1996 Albrecht Kleine 6 * 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. 11 * 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. 16 * 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 20 */ 21 22 #include <ctype.h> 23 #include <stdlib.h> 24 #include <stdarg.h> 25 #include <stdio.h> 26 #include <string.h> 27 #include "windef.h" 28 #include "winbase.h" 29 #include "winnls.h" 30 #include "wingdi.h" 31 #include "winuser.h" 32 #include "commdlg.h" 33 #include "dlgs.h" 34 #include "wine/debug.h" 35 #include "wine/heap.h" 36 #include "wine/unicode.h" 37 #include "cderr.h" 38 #include "cdlg.h" 39 40 WINE_DEFAULT_DEBUG_CHANNEL(commdlg); 41 42 typedef struct 43 { 44 HWND hWnd1; 45 HWND hWnd2; 46 LPCHOOSEFONTW lpcf32w; 47 int added; 48 } CFn_ENUMSTRUCT, *LPCFn_ENUMSTRUCT; 49 50 51 static const WCHAR strWineFontData[] = {'_','_','W','I','N','E','_','F','O','N','T','D','L','G','D','A','T','A',0}; 52 static const WCHAR strWineFontData_a[] = 53 {'_','_','W','I','N','E','_','F','O','N','T','D','L','G','D','A','T','A','_','A',0}; 54 static const WCHAR chooseFontW[] = {'C','H','O','O','S','E','_','F','O','N','T',0}; 55 static const WCHAR fontsizefmtW[] = {'%','d',0}; 56 57 /* image list with TrueType bitmaps and more */ 58 static HIMAGELIST himlTT = 0; 59 #define TTBITMAP_XSIZE 20 /* x-size of the bitmaps */ 60 61 static INT_PTR CALLBACK FormatCharDlgProcA(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam); 62 static INT_PTR CALLBACK FormatCharDlgProcW(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam); 63 64 /* There is a table here of all charsets, and the sample text for each. 65 * There is a second table that translates a charset into an index into 66 * the first table. 67 */ 68 69 #define CI(cs) ((IDS_CHARSET_##cs)-IDS_CHARSET_ANSI) 70 71 72 static const WCHAR stWestern[]={'A','a','B','b','Y','y','Z','z',0}; /* Western and default */ 73 static const WCHAR stSymbol[]={'S','y','m','b','o','l',0}; /* Symbol */ 74 static const WCHAR stShiftJis[]={'A','a',0x3042,0x3041,0x30a2,0x30a1,0x4e9c,0x5b87,0}; /* Shift JIS */ 75 static const WCHAR stHangul[]={0xac00,0xb098,0xb2e4,'A','a','B','Y','y','Z','z',0}; /* Hangul */ 76 static const WCHAR stGB2312[]={0x5fae,0x8f6f,0x4e2d,0x6587,0x8f6f,0x4ef6,0}; /* GB2312 */ 77 static const WCHAR stBIG5[]={0x4e2d,0x6587,0x5b57,0x578b,0x7bc4,0x4f8b,0}; /* BIG5 */ 78 static const WCHAR stGreek[]={'A','a','B','b',0x0391,0x03b1,0x0392,0x03b2,0}; /* Greek */ 79 static const WCHAR stTurkish[]={'A','a','B','b',0x011e,0x011f,0x015e,0x015f,0}; /* Turkish */ 80 static const WCHAR stHebrew[]={'A','a','B','b',0x05e0,0x05e1,0x05e9,0x05ea,0}; /* Hebrew */ 81 static const WCHAR stArabic[]={'A','a','B','b',0x0627,0x0628,0x062c,0x062f,0x0647,0x0648,0x0632,0};/* Arabic */ 82 static const WCHAR stBaltic[]={'A','a','B','b','Y','y','Z','z',0}; /* Baltic */ 83 static const WCHAR stVietname[]={'A','a','B','b',0x01a0,0x01a1,0x01af,0x01b0,0}; /* Vietnamese */ 84 static const WCHAR stCyrillic[]={'A','a','B','b',0x0411,0x0431,0x0424,0x0444,0}; /* Cyrillic */ 85 static const WCHAR stEastEur[]={'A','a','B','b',0xc1,0xe1,0xd4,0xf4,0}; /* East European */ 86 static const WCHAR stThai[]={'A','a','B','b',0x0e2d,0x0e31,0x0e01,0x0e29,0x0e23,0x0e44,0x0e17,0x0e22,0}; /* Thai */ 87 static const WCHAR stJohab[]={0xac00,0xb098,0xb2e4,'A','a','B','Y','y','Z','z',0}; /* Johab */ 88 static const WCHAR stMac[]={'A','a','B','b','Y','y','Z','z',0}; /* Mac */ 89 static const WCHAR stOEM[]={'A','a','B','b',0xf8,0xf1,0xfd,0}; /* OEM */ 90 /* the following character sets actually behave different (Win2K observation): 91 * the sample string is 'sticky': it uses the sample string of the previous 92 * selected character set. That behaviour looks like some default, which is 93 * not (yet) implemented. */ 94 static const WCHAR stVISCII[]={'A','a','B','b',0}; /* VISCII */ 95 static const WCHAR stTCVN[]={'A','a','B','b',0}; /* TCVN */ 96 static const WCHAR stKOI8[]={'A','a','B','b',0}; /* KOI-8 */ 97 static const WCHAR stIso88593[]={'A','a','B','b',0}; /* ISO-8859-3 */ 98 static const WCHAR stIso88594[]={'A','a','B','b',0}; /* ISO-8859-4 */ 99 static const WCHAR stIso885910[]={'A','a','B','b',0}; /* ISO-8859-10 */ 100 static const WCHAR stCeltic[]={'A','a','B','b',0};/* Celtic */ 101 102 static const WCHAR * const sample_lang_text[]={ 103 stWestern,stSymbol,stShiftJis,stHangul,stGB2312, 104 stBIG5,stGreek,stTurkish,stHebrew,stArabic, 105 stBaltic,stVietname,stCyrillic,stEastEur,stThai, 106 stJohab,stMac,stOEM,stVISCII,stTCVN, 107 stKOI8,stIso88593,stIso88594,stIso885910,stCeltic}; 108 109 110 static const BYTE CHARSET_ORDER[256]={ 111 CI(ANSI), 0, CI(SYMBOL), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 112 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 113 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 114 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 115 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CI(MAC), 0, 0, 116 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 117 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 118 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 119 CI(JIS), CI(HANGUL), CI(JOHAB), 0, 0, 0, CI(GB2312), 0, CI(BIG5), 0, 0, 0, 0, 0, 0, 0, 120 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 121 0, CI(GREEK), CI(TURKISH), CI(VIETNAMESE), 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 122 0, CI(HEBREW), CI(ARABIC), 0, 0, 0, 0, 0, 0, 0, CI(BALTIC), 0, 0, 0, 0, 0, 123 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CI(RUSSIAN), 0, 0, 0, 124 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CI(THAI), 0, 125 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, CI(EE), 0, 126 CI(VISCII), CI(TCVN), CI(KOI8), CI(ISO3), CI(ISO4), CI(ISO10), CI(CELTIC), 0, 0, 0, 0, 0, 0, 0, 0, CI(OEM), 127 }; 128 129 static const struct { 130 DWORD mask; 131 const char *name; 132 } cfflags[] = { 133 #define XX(x) { x, #x }, 134 XX(CF_SCREENFONTS) 135 XX(CF_PRINTERFONTS) 136 XX(CF_SHOWHELP) 137 XX(CF_ENABLEHOOK) 138 XX(CF_ENABLETEMPLATE) 139 XX(CF_ENABLETEMPLATEHANDLE) 140 XX(CF_INITTOLOGFONTSTRUCT) 141 XX(CF_USESTYLE) 142 XX(CF_EFFECTS) 143 XX(CF_APPLY) 144 XX(CF_ANSIONLY) 145 XX(CF_NOVECTORFONTS) 146 XX(CF_NOSIMULATIONS) 147 XX(CF_LIMITSIZE) 148 XX(CF_FIXEDPITCHONLY) 149 XX(CF_WYSIWYG) 150 XX(CF_FORCEFONTEXIST) 151 XX(CF_SCALABLEONLY) 152 XX(CF_TTONLY) 153 XX(CF_NOFACESEL) 154 XX(CF_NOSTYLESEL) 155 XX(CF_NOSIZESEL) 156 XX(CF_SELECTSCRIPT) 157 XX(CF_NOSCRIPTSEL) 158 XX(CF_NOVERTFONTS) 159 #undef XX 160 }; 161 162 static void _dump_cf_flags(DWORD cflags) 163 { 164 unsigned int i; 165 166 for (i = 0; i < ARRAY_SIZE(cfflags); i++) 167 if (cfflags[i].mask & cflags) 168 TRACE("%s|",cfflags[i].name); 169 TRACE("\n"); 170 } 171 172 /*********************************************************************** 173 * ChooseFontW (COMDLG32.@) 174 * 175 * Create a font dialog box. 176 * 177 * PARAMS 178 * lpChFont [I/O] in: information to initialize the dialog box. 179 * out: User's color selection 180 * 181 * RETURNS 182 * TRUE: Ok button clicked. 183 * FALSE: Cancel button clicked, or error. 184 */ 185 BOOL WINAPI ChooseFontW(LPCHOOSEFONTW lpChFont) 186 { 187 LPCVOID template; 188 HRSRC hResInfo; 189 HINSTANCE hDlginst; 190 HGLOBAL hDlgTmpl; 191 192 TRACE("(%p)\n", lpChFont); 193 194 if ( (lpChFont->Flags&CF_ENABLETEMPLATEHANDLE)!=0 ) 195 { 196 template=lpChFont->hInstance; 197 } else 198 { 199 if ( (lpChFont->Flags&CF_ENABLETEMPLATE)!=0 ) 200 { 201 hDlginst=lpChFont->hInstance; 202 if( !(hResInfo = FindResourceW(hDlginst, lpChFont->lpTemplateName, 203 (LPWSTR)RT_DIALOG))) 204 { 205 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); 206 return FALSE; 207 } 208 } else 209 { 210 hDlginst=COMDLG32_hInstance; 211 if (!(hResInfo = FindResourceW(hDlginst, chooseFontW, (LPWSTR)RT_DIALOG))) 212 { 213 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); 214 return FALSE; 215 } 216 } 217 if (!(hDlgTmpl = LoadResource(hDlginst, hResInfo )) || 218 !(template = LockResource( hDlgTmpl ))) 219 { 220 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); 221 return FALSE; 222 } 223 } 224 if (TRACE_ON(commdlg)) 225 _dump_cf_flags(lpChFont->Flags); 226 227 if (lpChFont->Flags & CF_SELECTSCRIPT) 228 FIXME(": unimplemented flag (ignored)\n"); 229 230 return DialogBoxIndirectParamW(COMDLG32_hInstance, template, 231 lpChFont->hwndOwner, FormatCharDlgProcW, (LPARAM)lpChFont ); 232 } 233 234 /*********************************************************************** 235 * ChooseFontA (COMDLG32.@) 236 * 237 * See ChooseFontW. 238 */ 239 BOOL WINAPI ChooseFontA(LPCHOOSEFONTA lpChFont) 240 { 241 LPCVOID template; 242 HRSRC hResInfo; 243 HINSTANCE hDlginst; 244 HGLOBAL hDlgTmpl; 245 246 TRACE("(%p)\n", lpChFont); 247 248 if ( (lpChFont->Flags&CF_ENABLETEMPLATEHANDLE)!=0 ) 249 { 250 template=lpChFont->hInstance; 251 } else 252 { 253 if ( (lpChFont->Flags&CF_ENABLETEMPLATE)!=0 ) 254 { 255 hDlginst=lpChFont->hInstance; 256 if( !(hResInfo = FindResourceA(hDlginst, lpChFont->lpTemplateName, 257 (LPSTR)RT_DIALOG))) 258 { 259 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); 260 return FALSE; 261 } 262 } else 263 { 264 hDlginst=COMDLG32_hInstance; 265 if (!(hResInfo = FindResourceW(hDlginst, chooseFontW, (LPWSTR)RT_DIALOG))) 266 { 267 COMDLG32_SetCommDlgExtendedError(CDERR_FINDRESFAILURE); 268 return FALSE; 269 } 270 } 271 if (!(hDlgTmpl = LoadResource(hDlginst, hResInfo )) || 272 !(template = LockResource( hDlgTmpl ))) 273 { 274 COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE); 275 return FALSE; 276 } 277 } 278 if (TRACE_ON(commdlg)) 279 _dump_cf_flags(lpChFont->Flags); 280 if (lpChFont->Flags & CF_SELECTSCRIPT) 281 FIXME(": unimplemented flag (ignored)\n"); 282 283 return DialogBoxIndirectParamA(COMDLG32_hInstance, template, 284 lpChFont->hwndOwner, FormatCharDlgProcA, (LPARAM)lpChFont ); 285 } 286 287 #define TEXT_EXTRAS 4 288 #define TEXT_COLORS 16 289 290 static const COLORREF textcolors[TEXT_COLORS]= 291 { 292 0x00000000L,0x00000080L,0x00008000L,0x00008080L, 293 0x00800000L,0x00800080L,0x00808000L,0x00808080L, 294 0x00c0c0c0L,0x000000ffL,0x0000ff00L,0x0000ffffL, 295 0x00ff0000L,0x00ff00ffL,0x00ffff00L,0x00FFFFFFL 296 }; 297 298 /*********************************************************************** 299 * CFn_HookCallChk32 [internal] 300 */ 301 static BOOL CFn_HookCallChk32(const CHOOSEFONTW *lpcf) 302 { 303 if (lpcf) 304 if(lpcf->Flags & CF_ENABLEHOOK) 305 if (lpcf->lpfnHook) 306 return TRUE; 307 return FALSE; 308 } 309 310 /************************************************************************* 311 * AddFontFamily [internal] 312 */ 313 static INT AddFontFamily(const ENUMLOGFONTEXW *lpElfex, const NEWTEXTMETRICEXW *lpNTM, 314 UINT nFontType, const CHOOSEFONTW *lpcf, HWND hwnd, LPCFn_ENUMSTRUCT e) 315 { 316 int i; 317 WORD w; 318 const LOGFONTW *lplf = &(lpElfex->elfLogFont); 319 320 TRACE("font=%s (nFontType=%d)\n", debugstr_w(lplf->lfFaceName), nFontType); 321 322 if (lpcf->Flags & CF_FIXEDPITCHONLY) 323 if (!(lplf->lfPitchAndFamily & FIXED_PITCH)) 324 return 1; 325 if (lpcf->Flags & CF_ANSIONLY) 326 if (lplf->lfCharSet != ANSI_CHARSET) 327 return 1; 328 if (lpcf->Flags & CF_TTONLY) 329 if (!(nFontType & TRUETYPE_FONTTYPE)) 330 return 1; 331 if (lpcf->Flags & CF_NOVERTFONTS) 332 if (lplf->lfFaceName[0] == '@') 333 return 1; 334 335 if (e) e->added++; 336 337 i=SendMessageW(hwnd, CB_FINDSTRINGEXACT, 0, (LPARAM)lplf->lfFaceName); 338 if (i == CB_ERR) { 339 i = SendMessageW(hwnd, CB_ADDSTRING, 0, (LPARAM)lplf->lfFaceName); 340 if( i != CB_ERR) { 341 /* store some important font information */ 342 w = (lplf->lfPitchAndFamily) << 8 | 343 (HIWORD(lpNTM->ntmTm.ntmFlags) & 0xff); 344 SendMessageW(hwnd, CB_SETITEMDATA, i, MAKELONG(nFontType,w)); 345 } 346 } 347 return 1; 348 } 349 350 /************************************************************************* 351 * FontFamilyEnumProc32 [internal] 352 */ 353 static INT WINAPI FontFamilyEnumProc(const ENUMLOGFONTEXW *lpElfex, 354 const TEXTMETRICW *metrics, DWORD dwFontType, LPARAM lParam) 355 { 356 LPCFn_ENUMSTRUCT e; 357 e=(LPCFn_ENUMSTRUCT)lParam; 358 return AddFontFamily( lpElfex, (const NEWTEXTMETRICEXW *) metrics, 359 dwFontType, e->lpcf32w, e->hWnd1, e); 360 } 361 362 /************************************************************************* 363 * SetFontStylesToCombo2 [internal] 364 * 365 * Fill font style information into combobox (without using font.c directly) 366 */ 367 static BOOL SetFontStylesToCombo2(HWND hwnd, HDC hdc, const LOGFONTW *lplf) 368 { 369 #define FSTYLES 4 370 struct FONTSTYLE 371 { 372 int italic; 373 int weight; 374 UINT resId; 375 }; 376 static const struct FONTSTYLE fontstyles[FSTYLES]={ 377 { 0, FW_NORMAL, IDS_FONT_REGULAR }, 378 { 1, FW_NORMAL, IDS_FONT_ITALIC }, 379 { 0, FW_BOLD, IDS_FONT_BOLD }, 380 { 1, FW_BOLD, IDS_FONT_BOLD_ITALIC } 381 }; 382 HFONT hf; 383 TEXTMETRICW tm; 384 int i,j; 385 LOGFONTW lf; 386 387 lf = *lplf; 388 389 for (i=0;i<FSTYLES;i++) 390 { 391 lf.lfItalic=fontstyles[i].italic; 392 lf.lfWeight=fontstyles[i].weight; 393 hf=CreateFontIndirectW(&lf); 394 hf=SelectObject(hdc,hf); 395 GetTextMetricsW(hdc,&tm); 396 hf=SelectObject(hdc,hf); 397 DeleteObject(hf); 398 /* font successful created ? */ 399 if (((fontstyles[i].weight == FW_NORMAL && tm.tmWeight <= FW_MEDIUM) || 400 (fontstyles[i].weight == FW_BOLD && tm.tmWeight > FW_MEDIUM)) && 401 ((tm.tmItalic != 0)==fontstyles[i].italic)) 402 { 403 WCHAR name[64]; 404 LoadStringW(COMDLG32_hInstance, fontstyles[i].resId, name, 64); 405 j=SendMessageW(hwnd,CB_ADDSTRING,0,(LPARAM)name ); 406 if (j==CB_ERR) return TRUE; 407 j=SendMessageW(hwnd, CB_SETITEMDATA, j, 408 MAKELONG(tm.tmWeight,fontstyles[i].italic)); 409 if (j==CB_ERR) return TRUE; 410 } 411 } 412 return FALSE; 413 } 414 415 /************************************************************************* 416 * AddFontSizeToCombo3 [internal] 417 */ 418 static BOOL AddFontSizeToCombo3(HWND hwnd, UINT h, const CHOOSEFONTW *lpcf) 419 { 420 int j; 421 WCHAR buffer[20]; 422 423 if ( (!(lpcf->Flags & CF_LIMITSIZE)) || 424 ((lpcf->Flags & CF_LIMITSIZE) && (h >= lpcf->nSizeMin) && (h <= lpcf->nSizeMax))) 425 { 426 sprintfW(buffer, fontsizefmtW, h); 427 j=SendMessageW(hwnd, CB_FINDSTRINGEXACT, -1, (LPARAM)buffer); 428 if (j==CB_ERR) 429 { 430 j=SendMessageW(hwnd, CB_INSERTSTRING, -1, (LPARAM)buffer); 431 if (j!=CB_ERR) j = SendMessageW(hwnd, CB_SETITEMDATA, j, h); 432 if (j==CB_ERR) return TRUE; 433 } 434 } 435 return FALSE; 436 } 437 438 /************************************************************************* 439 * SetFontSizesToCombo3 [internal] 440 */ 441 static BOOL SetFontSizesToCombo3(HWND hwnd, const CHOOSEFONTW *lpcf) 442 { 443 static const BYTE sizes[]={6,7,8,9,10,11,12,14,16,18,20,22,24,26,28,36,48,72}; 444 unsigned int i; 445 446 for (i = 0; i < ARRAY_SIZE(sizes); i++) 447 if (AddFontSizeToCombo3(hwnd, sizes[i], lpcf)) return TRUE; 448 return FALSE; 449 } 450 451 /************************************************************************* 452 * CFn_GetDC [internal] 453 */ 454 static inline HDC CFn_GetDC(const CHOOSEFONTW *lpcf) 455 { 456 HDC ret = ((lpcf->Flags & CF_PRINTERFONTS) && lpcf->hDC) ? 457 lpcf->hDC : 458 GetDC(0); 459 if(!ret) ERR("HDC failure!!!\n"); 460 return ret; 461 } 462 463 /************************************************************************* 464 * GetScreenDPI [internal] 465 */ 466 static inline int GetScreenDPI(void) 467 { 468 HDC hdc; 469 int result; 470 471 hdc = GetDC(0); 472 result = GetDeviceCaps(hdc, LOGPIXELSY); 473 ReleaseDC(0, hdc); 474 475 return result; 476 } 477 478 /************************************************************************* 479 * CFn_ReleaseDC [internal] 480 */ 481 static inline void CFn_ReleaseDC(const CHOOSEFONTW *lpcf, HDC hdc) 482 { 483 if(!((lpcf->Flags & CF_PRINTERFONTS) && lpcf->hDC)) 484 ReleaseDC(0, hdc); 485 } 486 487 /************************************************************************* 488 * select_combo_item [internal] 489 */ 490 static void select_combo_item( HWND dialog, int id, int sel ) 491 { 492 HWND combo = GetDlgItem( dialog, id ); 493 SendMessageW( combo, CB_SETCURSEL, sel, 0 ); 494 SendMessageW( dialog, WM_COMMAND, MAKEWPARAM( id, CBN_SELCHANGE ), (LPARAM)combo ); 495 } 496 497 /*********************************************************************** 498 * AddFontStyle [internal] 499 */ 500 static INT AddFontStyle( const ENUMLOGFONTEXW *lpElfex, const NEWTEXTMETRICEXW *lpNTM, 501 UINT nFontType, const CHOOSEFONTW *lpcf, HWND hcmb2, HWND hcmb3, HWND hDlg) 502 { 503 int i; 504 const LOGFONTW *lplf = &(lpElfex->elfLogFont); 505 HWND hcmb5; 506 HDC hdc; 507 508 TRACE("(nFontType=%d)\n",nFontType); 509 TRACE(" %s h=%d w=%d e=%d o=%d wg=%d i=%d u=%d s=%d" 510 " ch=%d op=%d cp=%d q=%d pf=%xh\n", 511 debugstr_w(lplf->lfFaceName),lplf->lfHeight,lplf->lfWidth, 512 lplf->lfEscapement,lplf->lfOrientation, 513 lplf->lfWeight,lplf->lfItalic,lplf->lfUnderline, 514 lplf->lfStrikeOut,lplf->lfCharSet, lplf->lfOutPrecision, 515 lplf->lfClipPrecision,lplf->lfQuality, lplf->lfPitchAndFamily); 516 if (nFontType & RASTER_FONTTYPE) 517 { 518 INT points; 519 points = MulDiv( lpNTM->ntmTm.tmHeight - lpNTM->ntmTm.tmInternalLeading, 520 72, GetScreenDPI()); 521 if (AddFontSizeToCombo3(hcmb3, points, lpcf)) 522 return 0; 523 } else if (SetFontSizesToCombo3(hcmb3, lpcf)) return 0; 524 525 if (!SendMessageW(hcmb2, CB_GETCOUNT, 0, 0)) 526 { 527 BOOL res; 528 if(!(hdc = CFn_GetDC(lpcf))) return 0; 529 res = SetFontStylesToCombo2(hcmb2,hdc,lplf); 530 CFn_ReleaseDC(lpcf, hdc); 531 if (res) 532 return 0; 533 } 534 if (!( hcmb5 = GetDlgItem(hDlg, cmb5))) return 1; 535 i = SendMessageW( hcmb5, CB_FINDSTRINGEXACT, 0, 536 (LPARAM)lpElfex->elfScript); 537 if( i == CB_ERR) { 538 i = SendMessageW( hcmb5, CB_ADDSTRING, 0, 539 (LPARAM)lpElfex->elfScript); 540 if( i != CB_ERR) 541 SendMessageW( hcmb5, CB_SETITEMDATA, i, lplf->lfCharSet); 542 } 543 return 1 ; 544 } 545 546 static void CFn_FitFontSize( HWND hDlg, int points) 547 { 548 int i,n; 549 550 /* look for fitting font size in combobox3 */ 551 n=SendDlgItemMessageW(hDlg, cmb3, CB_GETCOUNT, 0, 0); 552 for (i=0;i<n;i++) 553 { 554 if (points == (int)SendDlgItemMessageW 555 (hDlg,cmb3, CB_GETITEMDATA,i,0)) 556 { 557 select_combo_item( hDlg, cmb3, i ); 558 return; 559 } 560 } 561 562 /* no default matching size, set text manually */ 563 SetDlgItemInt(hDlg, cmb3, points, TRUE); 564 } 565 566 static BOOL CFn_FitFontStyle( HWND hDlg, LONG packedstyle ) 567 { 568 LONG id; 569 int i; 570 /* look for fitting font style in combobox2 */ 571 for (i=0;i<TEXT_EXTRAS;i++) 572 { 573 id = SendDlgItemMessageW(hDlg, cmb2, CB_GETITEMDATA, i, 0); 574 if (packedstyle == id) 575 { 576 select_combo_item( hDlg, cmb2, i ); 577 return TRUE; 578 } 579 } 580 return FALSE; 581 } 582 583 584 static BOOL CFn_FitCharSet( HWND hDlg, int charset ) 585 { 586 int i,n,cs; 587 /* look for fitting char set in combobox5 */ 588 n=SendDlgItemMessageW(hDlg, cmb5, CB_GETCOUNT, 0, 0); 589 for (i=0;i<n;i++) 590 { 591 cs =SendDlgItemMessageW(hDlg, cmb5, CB_GETITEMDATA, i, 0); 592 if (charset == cs) 593 { 594 select_combo_item( hDlg, cmb5, i ); 595 return TRUE; 596 } 597 } 598 /* no charset fits: select the first one in the list */ 599 select_combo_item( hDlg, cmb5, 0 ); 600 return FALSE; 601 } 602 603 /*********************************************************************** 604 * FontStyleEnumProc32 [internal] 605 */ 606 static INT WINAPI FontStyleEnumProc( const ENUMLOGFONTEXW *lpElfex, 607 const TEXTMETRICW *metrics, DWORD dwFontType, LPARAM lParam ) 608 { 609 LPCFn_ENUMSTRUCT s=(LPCFn_ENUMSTRUCT)lParam; 610 HWND hcmb2=s->hWnd1; 611 HWND hcmb3=s->hWnd2; 612 HWND hDlg=GetParent(hcmb3); 613 return AddFontStyle( lpElfex, (const NEWTEXTMETRICEXW *) metrics, 614 dwFontType, s->lpcf32w, hcmb2, hcmb3, hDlg); 615 } 616 617 /*********************************************************************** 618 * CFn_WMInitDialog [internal] 619 */ 620 static LRESULT CFn_WMInitDialog(HWND hDlg, LPARAM lParam, LPCHOOSEFONTW lpcf) 621 { 622 HDC hdc; 623 int i,j; 624 BOOL init = FALSE; 625 long pstyle; 626 CFn_ENUMSTRUCT s; 627 LPLOGFONTW lpxx; 628 HCURSOR hcursor=SetCursor(LoadCursorW(0,(LPWSTR)IDC_WAIT)); 629 static const WCHAR strColorName[] = {'[','c','o','l','o','r',' ','n','a','m','e',']',0}; 630 631 SetPropW(hDlg, strWineFontData, lpcf); 632 lpxx=lpcf->lpLogFont; 633 TRACE("WM_INITDIALOG lParam=%08lX\n", lParam); 634 635 if (lpcf->lStructSize != sizeof(CHOOSEFONTW)) 636 { 637 ERR("structure size failure!!!\n"); 638 EndDialog (hDlg, 0); 639 return FALSE; 640 } 641 if (!himlTT) 642 himlTT = ImageList_LoadImageW( COMDLG32_hInstance, MAKEINTRESOURCEW(38), 643 TTBITMAP_XSIZE, 0, CLR_DEFAULT, IMAGE_BITMAP, 0); 644 645 /* Set effect flags */ 646 if((lpcf->Flags & CF_EFFECTS) && (lpcf->Flags & CF_INITTOLOGFONTSTRUCT)) 647 { 648 if(lpxx->lfUnderline) 649 CheckDlgButton(hDlg, chx2, TRUE); 650 if(lpxx->lfStrikeOut) 651 CheckDlgButton(hDlg, chx1, TRUE); 652 } 653 654 if (!(lpcf->Flags & CF_SHOWHELP) || !IsWindow(lpcf->hwndOwner)) 655 ShowWindow(GetDlgItem(hDlg,pshHelp),SW_HIDE); 656 if (!(lpcf->Flags & CF_APPLY)) 657 ShowWindow(GetDlgItem(hDlg,psh3),SW_HIDE); 658 if (lpcf->Flags & CF_NOSCRIPTSEL) 659 EnableWindow(GetDlgItem(hDlg,cmb5),FALSE); 660 if (lpcf->Flags & CF_EFFECTS) 661 { 662 for (i=0;i<TEXT_COLORS;i++) 663 { 664 WCHAR name[30]; 665 666 if( LoadStringW(COMDLG32_hInstance, IDS_COLOR_BLACK+i, name, 667 ARRAY_SIZE(name)) == 0 ) 668 { 669 memcpy(name, strColorName, sizeof(strColorName)); 670 } 671 j=SendDlgItemMessageW(hDlg, cmb4, CB_ADDSTRING, 0, (LPARAM)name); 672 SendDlgItemMessageW(hDlg, cmb4, CB_SETITEMDATA, j, textcolors[i]); 673 /* look for a fitting value in color combobox */ 674 if (textcolors[i]==lpcf->rgbColors) 675 SendDlgItemMessageW(hDlg,cmb4, CB_SETCURSEL,j,0); 676 } 677 } 678 else 679 { 680 ShowWindow(GetDlgItem(hDlg,cmb4),SW_HIDE); 681 ShowWindow(GetDlgItem(hDlg,chx1),SW_HIDE); 682 ShowWindow(GetDlgItem(hDlg,chx2),SW_HIDE); 683 ShowWindow(GetDlgItem(hDlg,grp1),SW_HIDE); 684 ShowWindow(GetDlgItem(hDlg,stc4),SW_HIDE); 685 } 686 if(!(hdc = CFn_GetDC(lpcf))) 687 { 688 EndDialog (hDlg, 0); 689 return FALSE; 690 } 691 s.hWnd1=GetDlgItem(hDlg,cmb1); 692 s.lpcf32w=lpcf; 693 do { 694 LOGFONTW elf; 695 s.added = 0; 696 elf.lfCharSet = DEFAULT_CHARSET; /* enum all charsets */ 697 elf.lfPitchAndFamily = 0; 698 elf.lfFaceName[0] = '\0'; /* enum all fonts */ 699 if (!EnumFontFamiliesExW(hdc, &elf, (FONTENUMPROCW)FontFamilyEnumProc, (LPARAM)&s, 0)) 700 { 701 TRACE("EnumFontFamiliesEx returns 0\n"); 702 break; 703 } 704 if (s.added) break; 705 if (lpcf->Flags & CF_FIXEDPITCHONLY) { 706 FIXME("No font found with fixed pitch only, dropping flag.\n"); 707 lpcf->Flags &= ~CF_FIXEDPITCHONLY; 708 continue; 709 } 710 if (lpcf->Flags & CF_TTONLY) { 711 FIXME("No font found with truetype only, dropping flag.\n"); 712 lpcf->Flags &= ~CF_TTONLY; 713 continue; 714 } 715 break; 716 } while (1); 717 718 719 if (lpcf->Flags & CF_INITTOLOGFONTSTRUCT) 720 { 721 /* look for fitting font name in combobox1 */ 722 j=SendDlgItemMessageW(hDlg,cmb1,CB_FINDSTRING,-1,(LPARAM)lpxx->lfFaceName); 723 if (j!=CB_ERR) 724 { 725 INT height = lpxx->lfHeight < 0 ? -lpxx->lfHeight : 726 lpxx->lfHeight; 727 INT points; 728 int charset = lpxx->lfCharSet; 729 points = MulDiv( height, 72, GetScreenDPI()); 730 pstyle = MAKELONG(lpxx->lfWeight > FW_MEDIUM ? FW_BOLD: 731 FW_NORMAL,lpxx->lfItalic !=0); 732 select_combo_item( hDlg, cmb1, j ); 733 init = TRUE; 734 /* look for fitting font style in combobox2 */ 735 CFn_FitFontStyle(hDlg, pstyle); 736 /* look for fitting font size in combobox3 */ 737 CFn_FitFontSize(hDlg, points); 738 CFn_FitCharSet( hDlg, charset ); 739 } 740 } 741 if (!init) 742 { 743 select_combo_item( hDlg, cmb1, 0 ); 744 select_combo_item( hDlg, cmb2, 0 ); 745 select_combo_item( hDlg, cmb3, 0 ); 746 select_combo_item( hDlg, cmb5, 0 ); 747 } 748 /* limit text length user can type in as font size */ 749 SendDlgItemMessageW(hDlg, cmb3, CB_LIMITTEXT, 5, 0); 750 751 if ((lpcf->Flags & CF_USESTYLE) && lpcf->lpszStyle) 752 { 753 j=SendDlgItemMessageW(hDlg,cmb2,CB_FINDSTRING,-1,(LPARAM)lpcf->lpszStyle); 754 if (j!=CB_ERR) select_combo_item( hDlg, cmb2, j ); 755 } 756 CFn_ReleaseDC(lpcf, hdc); 757 SetCursor(hcursor); 758 return TRUE; 759 } 760 761 762 /*********************************************************************** 763 * CFn_WMMeasureItem [internal] 764 */ 765 static LRESULT CFn_WMMeasureItem(HWND hDlg, LPARAM lParam) 766 { 767 HDC hdc; 768 HFONT hfontprev; 769 TEXTMETRICW tm; 770 LPMEASUREITEMSTRUCT lpmi=(LPMEASUREITEMSTRUCT)lParam; 771 INT height = 0, cx; 772 773 if (!himlTT) 774 himlTT = ImageList_LoadImageW( COMDLG32_hInstance, MAKEINTRESOURCEW(38), 775 TTBITMAP_XSIZE, 0, CLR_DEFAULT, IMAGE_BITMAP, 0); 776 ImageList_GetIconSize( himlTT, &cx, &height); 777 lpmi->itemHeight = height + 2; 778 /* use MAX of bitmap height and tm.tmHeight .*/ 779 hdc=GetDC(hDlg); 780 if(!hdc) return 0; 781 hfontprev = SelectObject( hdc, (HFONT)SendMessageW( hDlg, WM_GETFONT, 0, 0 )); 782 GetTextMetricsW(hdc, &tm); 783 if( tm.tmHeight > lpmi->itemHeight) lpmi->itemHeight = tm.tmHeight; 784 SelectObject(hdc, hfontprev); 785 ReleaseDC(hDlg, hdc); 786 return 0; 787 } 788 789 790 /*********************************************************************** 791 * CFn_WMDrawItem [internal] 792 */ 793 static LRESULT CFn_WMDrawItem(LPARAM lParam) 794 { 795 HBRUSH hBrush; 796 WCHAR buffer[40]; 797 COLORREF cr, oldText=0, oldBk=0; 798 RECT rect; 799 int nFontType; 800 int cx, cy, idx; 801 LPDRAWITEMSTRUCT lpdi = (LPDRAWITEMSTRUCT)lParam; 802 803 if (lpdi->itemID == (UINT)-1) /* got no items */ 804 DrawFocusRect(lpdi->hDC, &lpdi->rcItem); 805 else 806 { 807 if (lpdi->CtlType == ODT_COMBOBOX) 808 { 809 if (lpdi->itemState & ODS_SELECTED) 810 { 811 hBrush=GetSysColorBrush(COLOR_HIGHLIGHT); 812 oldText=SetTextColor(lpdi->hDC, GetSysColor(COLOR_HIGHLIGHTTEXT)); 813 oldBk=SetBkColor(lpdi->hDC, GetSysColor(COLOR_HIGHLIGHT)); 814 } else 815 { 816 hBrush = SelectObject(lpdi->hDC, GetStockObject(LTGRAY_BRUSH)); 817 SelectObject(lpdi->hDC, hBrush); 818 } 819 FillRect(lpdi->hDC, &lpdi->rcItem, hBrush); 820 } 821 else 822 return TRUE; /* this should never happen */ 823 824 rect=lpdi->rcItem; 825 switch (lpdi->CtlID) 826 { 827 case cmb1: 828 /* TRACE(commdlg,"WM_Drawitem cmb1\n"); */ 829 ImageList_GetIconSize( himlTT, &cx, &cy); 830 SendMessageW(lpdi->hwndItem, CB_GETLBTEXT, lpdi->itemID, 831 (LPARAM)buffer); 832 TextOutW(lpdi->hDC, lpdi->rcItem.left + cx + 4, 833 lpdi->rcItem.top, buffer, lstrlenW(buffer)); 834 nFontType = SendMessageW(lpdi->hwndItem, CB_GETITEMDATA, lpdi->itemID,0L); 835 idx = -1; 836 if (nFontType & TRUETYPE_FONTTYPE) { 837 idx = 0; /* picture: TT */ 838 if( nFontType & NTM_TT_OPENTYPE) 839 idx = 2; /* picture: O */ 840 } else if( nFontType & NTM_PS_OPENTYPE) 841 idx = 3; /* picture: O+ps */ 842 else if( nFontType & NTM_TYPE1) 843 idx = 4; /* picture: a */ 844 else if( nFontType & DEVICE_FONTTYPE) 845 idx = 1; /* picture: printer */ 846 if( idx >= 0) 847 ImageList_Draw( himlTT, idx, lpdi->hDC, lpdi->rcItem.left, 848 (lpdi->rcItem.top + lpdi->rcItem.bottom - cy) / 2, ILD_TRANSPARENT); 849 break; 850 case cmb2: 851 case cmb3: 852 /* TRACE(commdlg,"WM_DRAWITEN cmb2,cmb3\n"); */ 853 case cmb5: 854 SendMessageW(lpdi->hwndItem, CB_GETLBTEXT, lpdi->itemID, 855 (LPARAM)buffer); 856 TextOutW(lpdi->hDC, lpdi->rcItem.left, 857 lpdi->rcItem.top, buffer, lstrlenW(buffer)); 858 break; 859 860 case cmb4: 861 /* TRACE(commdlg,"WM_DRAWITEM cmb4 (=COLOR)\n"); */ 862 SendMessageW(lpdi->hwndItem, CB_GETLBTEXT, lpdi->itemID, 863 (LPARAM)buffer); 864 TextOutW(lpdi->hDC, lpdi->rcItem.left + 25+5, 865 lpdi->rcItem.top, buffer, lstrlenW(buffer)); 866 cr = SendMessageW(lpdi->hwndItem, CB_GETITEMDATA, lpdi->itemID,0L); 867 hBrush = CreateSolidBrush(cr); 868 if (hBrush) 869 { 870 hBrush = SelectObject (lpdi->hDC, hBrush) ; 871 rect.right=rect.left+25; 872 rect.top++; 873 rect.left+=5; 874 rect.bottom--; 875 Rectangle( lpdi->hDC, rect.left, rect.top, 876 rect.right, rect.bottom ); 877 DeleteObject( SelectObject (lpdi->hDC, hBrush)) ; 878 } 879 rect=lpdi->rcItem; 880 rect.left+=25+5; 881 break; 882 883 default: 884 return TRUE; /* this should never happen */ 885 } 886 if (lpdi->itemState & ODS_SELECTED) 887 { 888 SetTextColor(lpdi->hDC, oldText); 889 SetBkColor(lpdi->hDC, oldBk); 890 } 891 } 892 return TRUE; 893 } 894 895 static INT get_dialog_font_point_size(HWND hDlg, CHOOSEFONTW *cf) 896 { 897 BOOL invalid_size = FALSE; 898 INT i, size; 899 900 i = SendDlgItemMessageW(hDlg, cmb3, CB_GETCURSEL, 0, 0); 901 if (i != CB_ERR) 902 size = LOWORD(SendDlgItemMessageW(hDlg, cmb3, CB_GETITEMDATA , i, 0)); 903 else 904 { 905 WCHAR buffW[8], *endptrW; 906 907 GetDlgItemTextW(hDlg, cmb3, buffW, ARRAY_SIZE(buffW)); 908 size = strtolW(buffW, &endptrW, 10); 909 invalid_size = size == 0 && *endptrW; 910 911 if (size == 0) 912 size = 10; 913 } 914 915 cf->iPointSize = 10 * size; 916 cf->lpLogFont->lfHeight = -MulDiv(cf->iPointSize, GetScreenDPI(), 720); 917 return invalid_size ? -1 : size; 918 } 919 920 /*********************************************************************** 921 * CFn_WMCommand [internal] 922 */ 923 static LRESULT CFn_WMCommand(HWND hDlg, WPARAM wParam, LPARAM lParam, LPCHOOSEFONTW lpcf) 924 { 925 int i; 926 long l; 927 HDC hdc; 928 BOOL cmb_selected_by_edit = FALSE; 929 930 if (!lpcf) return FALSE; 931 932 if(HIWORD(wParam) == CBN_EDITCHANGE) 933 { 934 int idx; 935 WCHAR str_edit[256], str_cmb[256]; 936 int cmb = LOWORD(wParam); 937 938 GetDlgItemTextW(hDlg, cmb, str_edit, ARRAY_SIZE(str_edit)); 939 idx = SendDlgItemMessageW(hDlg, cmb, CB_FINDSTRING, -1, (LPARAM)str_edit); 940 if(idx != -1) 941 { 942 SendDlgItemMessageW(hDlg, cmb, CB_GETLBTEXT, idx, (LPARAM)str_cmb); 943 944 /* Select listbox entry only if we have an exact match */ 945 if(lstrcmpiW(str_edit, str_cmb) == 0) 946 { 947 SendDlgItemMessageW(hDlg, cmb, CB_SETCURSEL, idx, 0); 948 SendDlgItemMessageW(hDlg, cmb, CB_SETEDITSEL, 0, -1); /* Remove edit field selection */ 949 cmb_selected_by_edit = TRUE; 950 } 951 } 952 } 953 954 TRACE("WM_COMMAND wParam=%08X lParam=%08lX\n", (LONG)wParam, lParam); 955 switch (LOWORD(wParam)) 956 { 957 case cmb1: 958 if (HIWORD(wParam) == CBN_SELCHANGE || cmb_selected_by_edit) 959 { 960 INT pointsize; /* save current pointsize */ 961 LONG pstyle; /* save current style */ 962 int charset; 963 int idx; 964 if(!(hdc = CFn_GetDC(lpcf))) 965 { 966 EndDialog (hDlg, 0); 967 return TRUE; 968 } 969 idx = SendDlgItemMessageW(hDlg, cmb3, CB_GETCURSEL, 0, 0); 970 pointsize = (int)SendDlgItemMessageW( hDlg, cmb3, CB_GETITEMDATA, 971 idx, 0); 972 idx = SendDlgItemMessageW(hDlg, cmb2, CB_GETCURSEL, 0, 0); 973 pstyle = SendDlgItemMessageW(hDlg, cmb2, CB_GETITEMDATA, idx, 0); 974 idx = SendDlgItemMessageW(hDlg, cmb5, CB_GETCURSEL, 0, 0); 975 charset = SendDlgItemMessageW(hDlg, cmb5, CB_GETITEMDATA, idx, 0); 976 977 SendDlgItemMessageW(hDlg, cmb2, CB_RESETCONTENT, 0, 0); 978 SendDlgItemMessageW(hDlg, cmb3, CB_RESETCONTENT, 0, 0); 979 SendDlgItemMessageW(hDlg, cmb5, CB_RESETCONTENT, 0, 0); 980 i=SendDlgItemMessageW(hDlg, cmb1, CB_GETCURSEL, 0, 0); 981 if (i!=CB_ERR) 982 { 983 HCURSOR hcursor=SetCursor(LoadCursorW(0,(LPWSTR)IDC_WAIT)); 984 CFn_ENUMSTRUCT s; 985 LOGFONTW enumlf; 986 SendDlgItemMessageW(hDlg, cmb1, CB_GETLBTEXT, i, 987 (LPARAM)enumlf.lfFaceName); 988 TRACE("WM_COMMAND/cmb1 =>%s\n", debugstr_w(enumlf.lfFaceName)); 989 s.hWnd1=GetDlgItem(hDlg, cmb2); 990 s.hWnd2=GetDlgItem(hDlg, cmb3); 991 s.lpcf32w=lpcf; 992 enumlf.lfCharSet = DEFAULT_CHARSET; /* enum all charsets */ 993 enumlf.lfPitchAndFamily = 0; 994 EnumFontFamiliesExW(hdc, &enumlf, 995 (FONTENUMPROCW)FontStyleEnumProc, (LPARAM)&s, 0); 996 CFn_FitFontStyle(hDlg, pstyle); 997 if( pointsize != CB_ERR) CFn_FitFontSize(hDlg, pointsize); 998 if( charset != CB_ERR) CFn_FitCharSet( hDlg, charset ); 999 SetCursor(hcursor); 1000 } 1001 CFn_ReleaseDC(lpcf, hdc); 1002 } 1003 break; 1004 case chx1: 1005 case chx2: 1006 case cmb2: 1007 case cmb3: 1008 case cmb5: 1009 if (HIWORD(wParam) == CBN_SELCHANGE || HIWORD(wParam) == BN_CLICKED || cmb_selected_by_edit) 1010 { 1011 WCHAR str[256]; 1012 WINDOWINFO wininfo; 1013 LPLOGFONTW lpxx=lpcf->lpLogFont; 1014 1015 TRACE("WM_COMMAND/cmb2,3 =%08lX\n", lParam); 1016 1017 /* face name */ 1018 i=SendDlgItemMessageW(hDlg,cmb1,CB_GETCURSEL,0,0); 1019 if (i==CB_ERR) 1020 GetDlgItemTextW( hDlg, cmb1, str, ARRAY_SIZE(str)); 1021 else 1022 { 1023 SendDlgItemMessageW(hDlg,cmb1,CB_GETLBTEXT,i, 1024 (LPARAM)str); 1025 l=SendDlgItemMessageW(hDlg,cmb1,CB_GETITEMDATA,i,0); 1026 lpcf->nFontType = LOWORD(l); 1027 /* FIXME: lpcf->nFontType |= .... SIMULATED_FONTTYPE and so */ 1028 /* same value reported to the EnumFonts 1029 call back with the extra FONTTYPE_... bits added */ 1030 lpxx->lfPitchAndFamily = HIWORD(l) >> 8; 1031 } 1032 lstrcpynW(lpxx->lfFaceName, str, ARRAY_SIZE(lpxx->lfFaceName)); 1033 1034 /* style */ 1035 i=SendDlgItemMessageW(hDlg, cmb2, CB_GETCURSEL, 0, 0); 1036 if (i!=CB_ERR) 1037 { 1038 l=SendDlgItemMessageW(hDlg, cmb2, CB_GETITEMDATA, i, 0); 1039 if (0!=(lpxx->lfItalic=HIWORD(l))) 1040 lpcf->nFontType |= ITALIC_FONTTYPE; 1041 if ((lpxx->lfWeight=LOWORD(l)) > FW_MEDIUM) 1042 lpcf->nFontType |= BOLD_FONTTYPE; 1043 } 1044 1045 /* size */ 1046 get_dialog_font_point_size(hDlg, lpcf); 1047 1048 /* charset */ 1049 i=SendDlgItemMessageW(hDlg, cmb5, CB_GETCURSEL, 0, 0); 1050 if (i!=CB_ERR) 1051 lpxx->lfCharSet=SendDlgItemMessageW(hDlg, cmb5, CB_GETITEMDATA, i, 0); 1052 else 1053 lpxx->lfCharSet = DEFAULT_CHARSET; 1054 lpxx->lfStrikeOut=IsDlgButtonChecked(hDlg,chx1); 1055 lpxx->lfUnderline=IsDlgButtonChecked(hDlg,chx2); 1056 lpxx->lfWidth=lpxx->lfOrientation=lpxx->lfEscapement=0; 1057 lpxx->lfOutPrecision=OUT_DEFAULT_PRECIS; 1058 lpxx->lfClipPrecision=CLIP_DEFAULT_PRECIS; 1059 lpxx->lfQuality=DEFAULT_QUALITY; 1060 1061 wininfo.cbSize=sizeof(wininfo); 1062 1063 if( GetWindowInfo( GetDlgItem( hDlg, stc5), &wininfo ) ) 1064 { 1065 MapWindowPoints( 0, hDlg, (LPPOINT) &wininfo.rcWindow, 2); 1066 InvalidateRect( hDlg, &wininfo.rcWindow, TRUE ); 1067 } 1068 } 1069 break; 1070 1071 case cmb4: 1072 i=SendDlgItemMessageW(hDlg, cmb4, CB_GETCURSEL, 0, 0); 1073 if (i!=CB_ERR) 1074 { 1075 WINDOWINFO wininfo; 1076 1077 lpcf->rgbColors = SendDlgItemMessageW(hDlg, cmb4, CB_GETITEMDATA, i, 0); 1078 wininfo.cbSize=sizeof(wininfo); 1079 1080 if( GetWindowInfo( GetDlgItem( hDlg, stc5), &wininfo ) ) 1081 { 1082 MapWindowPoints( 0, hDlg, (LPPOINT) &wininfo.rcWindow, 2); 1083 InvalidateRect( hDlg, &wininfo.rcWindow, TRUE ); 1084 } 1085 } 1086 break; 1087 1088 case psh15: 1089 i=RegisterWindowMessageW( HELPMSGSTRINGW ); 1090 if (lpcf->hwndOwner) 1091 SendMessageW(lpcf->hwndOwner, i, 0, (LPARAM)GetPropW(hDlg, strWineFontData)); 1092 break; 1093 1094 case IDOK: 1095 { 1096 WCHAR msgW[80]; 1097 INT pointsize; 1098 1099 pointsize = get_dialog_font_point_size(hDlg, lpcf); 1100 if (pointsize == -1) 1101 { 1102 LoadStringW(COMDLG32_hInstance, IDS_FONT_SIZE_INPUT, msgW, ARRAY_SIZE(msgW)); 1103 MessageBoxW(hDlg, msgW, NULL, MB_OK | MB_ICONINFORMATION); 1104 return TRUE; 1105 } 1106 1107 if ( (!(lpcf->Flags & CF_LIMITSIZE)) || 1108 ( (lpcf->Flags & CF_LIMITSIZE) && 1109 (lpcf->iPointSize >= 10 * lpcf->nSizeMin) && 1110 (lpcf->iPointSize <= 10 * lpcf->nSizeMax))) 1111 EndDialog(hDlg, TRUE); 1112 else 1113 { 1114 WCHAR format[80]; 1115 DWORD_PTR args[2]; 1116 LoadStringW(COMDLG32_hInstance, IDS_FONT_SIZE, format, ARRAY_SIZE(format)); 1117 args[0] = lpcf->nSizeMin; 1118 args[1] = lpcf->nSizeMax; 1119 FormatMessageW(FORMAT_MESSAGE_FROM_STRING|FORMAT_MESSAGE_ARGUMENT_ARRAY, 1120 format, 0, 0, msgW, ARRAY_SIZE(msgW), 1121 (__ms_va_list*)args); 1122 MessageBoxW(hDlg, msgW, NULL, MB_OK); 1123 } 1124 return(TRUE); 1125 } 1126 case IDCANCEL: 1127 EndDialog(hDlg, FALSE); 1128 return(TRUE); 1129 } 1130 return(FALSE); 1131 } 1132 1133 static LRESULT CFn_WMDestroy(HWND hwnd, LPCHOOSEFONTW lpcfw) 1134 { 1135 LPCHOOSEFONTA lpcfa; 1136 LPSTR lpszStyle; 1137 LPLOGFONTA lpLogFonta; 1138 int len; 1139 1140 if (!lpcfw) return FALSE; 1141 1142 lpcfa = GetPropW(hwnd, strWineFontData_a); 1143 lpLogFonta = lpcfa->lpLogFont; 1144 lpszStyle = lpcfa->lpszStyle; 1145 memcpy(lpcfa, lpcfw, sizeof(CHOOSEFONTA)); 1146 lpcfa->lpLogFont = lpLogFonta; 1147 lpcfa->lpszStyle = lpszStyle; 1148 memcpy(lpcfa->lpLogFont, lpcfw->lpLogFont, sizeof(LOGFONTA)); 1149 WideCharToMultiByte(CP_ACP, 0, lpcfw->lpLogFont->lfFaceName, 1150 LF_FACESIZE, lpcfa->lpLogFont->lfFaceName, LF_FACESIZE, 0, 0); 1151 1152 if((lpcfw->Flags & CF_USESTYLE) && lpcfw->lpszStyle) { 1153 len = WideCharToMultiByte(CP_ACP, 0, lpcfw->lpszStyle, -1, NULL, 0, 0, 0); 1154 WideCharToMultiByte(CP_ACP, 0, lpcfw->lpszStyle, -1, lpcfa->lpszStyle, len, 0, 0); 1155 heap_free(lpcfw->lpszStyle); 1156 } 1157 1158 heap_free(lpcfw->lpLogFont); 1159 heap_free(lpcfw); 1160 SetPropW(hwnd, strWineFontData, 0); 1161 1162 return TRUE; 1163 } 1164 1165 static LRESULT CFn_WMPaint(HWND hDlg, WPARAM wParam, LPARAM lParam, const CHOOSEFONTW *lpcf) 1166 { 1167 WINDOWINFO info; 1168 1169 if (!lpcf) return FALSE; 1170 1171 info.cbSize=sizeof(info); 1172 if( GetWindowInfo( GetDlgItem( hDlg, stc5), &info ) ) 1173 { 1174 PAINTSTRUCT ps; 1175 HDC hdc; 1176 HFONT hOrigFont; 1177 LOGFONTW lf = *(lpcf->lpLogFont); 1178 1179 MapWindowPoints( 0, hDlg, (LPPOINT) &info.rcWindow, 2); 1180 hdc = BeginPaint( hDlg, &ps ); 1181 1182 TRACE("erase %d, rect=%s\n", ps.fErase, wine_dbgstr_rect(&ps.rcPaint)); 1183 1184 /* Paint frame */ 1185 DrawEdge( hdc, &info.rcWindow, EDGE_SUNKEN, BF_RECT|BF_ADJUST ); 1186 1187 /* Draw the sample text itself */ 1188 hOrigFont = SelectObject( hdc, CreateFontIndirectW( &lf ) ); 1189 SetTextColor( hdc, lpcf->rgbColors ); 1190 1191 DrawTextW( hdc, 1192 sample_lang_text[CHARSET_ORDER[lpcf->lpLogFont->lfCharSet]], 1193 -1, &info.rcWindow, DT_CENTER|DT_VCENTER|DT_SINGLELINE ); 1194 1195 DeleteObject(SelectObject( hdc, hOrigFont )); 1196 EndPaint( hDlg, &ps ); 1197 } 1198 return FALSE; 1199 } 1200 1201 /*********************************************************************** 1202 * FormatCharDlgProcA [internal] 1203 */ 1204 static INT_PTR CALLBACK FormatCharDlgProcA(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam) 1205 { 1206 LPCHOOSEFONTW lpcfw; 1207 LPCHOOSEFONTA lpcfa; 1208 INT_PTR res = FALSE; 1209 int len; 1210 1211 if (uMsg!=WM_INITDIALOG) { 1212 lpcfw = GetPropW(hDlg, strWineFontData); 1213 if (lpcfw && CFn_HookCallChk32(lpcfw)) 1214 res=CallWindowProcA((WNDPROC)lpcfw->lpfnHook, hDlg, uMsg, wParam, lParam); 1215 if (res) 1216 return res; 1217 } else { 1218 lpcfa=(LPCHOOSEFONTA)lParam; 1219 SetPropW(hDlg, strWineFontData_a, (HANDLE)lParam); 1220 1221 lpcfw = heap_alloc(sizeof(*lpcfw)); 1222 memcpy(lpcfw, lpcfa, sizeof(CHOOSEFONTA)); 1223 lpcfw->lpLogFont = heap_alloc(sizeof(*lpcfw->lpLogFont)); 1224 memcpy(lpcfw->lpLogFont, lpcfa->lpLogFont, sizeof(LOGFONTA)); 1225 MultiByteToWideChar(CP_ACP, 0, lpcfa->lpLogFont->lfFaceName, 1226 LF_FACESIZE, lpcfw->lpLogFont->lfFaceName, LF_FACESIZE); 1227 1228 if((lpcfa->Flags & CF_USESTYLE) && lpcfa->lpszStyle) { 1229 len = MultiByteToWideChar(CP_ACP, 0, lpcfa->lpszStyle, -1, NULL, 0); 1230 lpcfw->lpszStyle = heap_alloc(len * sizeof(WCHAR)); 1231 MultiByteToWideChar(CP_ACP, 0, lpcfa->lpszStyle, -1, lpcfw->lpszStyle, len); 1232 } 1233 1234 if (!CFn_WMInitDialog(hDlg, lParam, lpcfw)) 1235 { 1236 TRACE("CFn_WMInitDialog returned FALSE\n"); 1237 return FALSE; 1238 } 1239 if (CFn_HookCallChk32(lpcfw)) 1240 return CallWindowProcA((WNDPROC)lpcfa->lpfnHook,hDlg,WM_INITDIALOG,wParam,lParam); 1241 } 1242 switch (uMsg) 1243 { 1244 case WM_MEASUREITEM: 1245 return CFn_WMMeasureItem(hDlg,lParam); 1246 case WM_DRAWITEM: 1247 return CFn_WMDrawItem(lParam); 1248 case WM_COMMAND: 1249 return CFn_WMCommand(hDlg, wParam, lParam, lpcfw); 1250 case WM_DESTROY: 1251 return CFn_WMDestroy(hDlg, lpcfw); 1252 case WM_CHOOSEFONT_GETLOGFONT: 1253 { 1254 LOGFONTA *logfont = (LOGFONTA *)lParam; 1255 TRACE("WM_CHOOSEFONT_GETLOGFONT lParam=%08lX\n", lParam); 1256 memcpy( logfont, lpcfw->lpLogFont, FIELD_OFFSET( LOGFONTA, lfFaceName )); 1257 WideCharToMultiByte( CP_ACP, 0, lpcfw->lpLogFont->lfFaceName, LF_FACESIZE, 1258 logfont->lfFaceName, LF_FACESIZE, NULL, NULL ); 1259 break; 1260 } 1261 case WM_PAINT: 1262 return CFn_WMPaint(hDlg, wParam, lParam, lpcfw); 1263 } 1264 return res; 1265 } 1266 1267 /*********************************************************************** 1268 * FormatCharDlgProcW [internal] 1269 */ 1270 static INT_PTR CALLBACK FormatCharDlgProcW(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam) 1271 { 1272 LPCHOOSEFONTW lpcf; 1273 INT_PTR res = FALSE; 1274 1275 if (uMsg!=WM_INITDIALOG) 1276 { 1277 lpcf= GetPropW(hDlg, strWineFontData); 1278 if (lpcf && CFn_HookCallChk32(lpcf)) 1279 res=CallWindowProcW((WNDPROC)lpcf->lpfnHook, hDlg, uMsg, wParam, lParam); 1280 if (res) 1281 return res; 1282 } 1283 else 1284 { 1285 lpcf=(LPCHOOSEFONTW)lParam; 1286 if (!CFn_WMInitDialog(hDlg, lParam, lpcf)) 1287 { 1288 TRACE("CFn_WMInitDialog returned FALSE\n"); 1289 return FALSE; 1290 } 1291 if (CFn_HookCallChk32(lpcf)) 1292 return CallWindowProcW((WNDPROC)lpcf->lpfnHook,hDlg,WM_INITDIALOG,wParam,lParam); 1293 } 1294 switch (uMsg) 1295 { 1296 case WM_MEASUREITEM: 1297 return CFn_WMMeasureItem(hDlg, lParam); 1298 case WM_DRAWITEM: 1299 return CFn_WMDrawItem(lParam); 1300 case WM_COMMAND: 1301 return CFn_WMCommand(hDlg, wParam, lParam, lpcf); 1302 case WM_DESTROY: 1303 return TRUE; 1304 case WM_CHOOSEFONT_GETLOGFONT: 1305 TRACE("WM_CHOOSEFONT_GETLOGFONT lParam=%08lX\n", lParam); 1306 memcpy( (LOGFONTW *)lParam, lpcf->lpLogFont, sizeof(LOGFONTW) ); 1307 break; 1308 case WM_PAINT: 1309 return CFn_WMPaint(hDlg, wParam, lParam, lpcf); 1310 } 1311 return res; 1312 } 1313