vim-55/src/gui_w32.c

294  * Use the system font for dialogs and tear-off menus.  Remove this line to
304 /* Initial size for the dialog template.  For gui_mch_dialog() it's fixed,
327 static void gui_mch_tearoff(char_u *title, vimmenu_T *menu, int initX, int initY);
524 #define VMOUSEZ_TITLE      "Magellan MSWHEEL"	/* hidden wheel window title */
575     int size;
581 	size = curwin->w_scrollbars[SBAR_RIGHT].size;
586 	size = curwin->w_scrollbars[SBAR_LEFT].size;
591     size = curwin->w_height;
596 	    && mouse_scroll_lines < (size > 2 ? size - 2 : 1))
630  * Set the GUI tabline font to the system menu font
636     HFONT	font;
645     font = CreateFontIndirect(&lfSysmenu);
647     SendMessage(s_tabhwnd, WM_SETFONT, (WPARAM)font, TRUE);
650      * Compute the height of the font used for the tab text
654     hfntOld = SelectFont(hdc, font);
1118     char	*title = (char *)lParam;
1122 	if (strstr(buf, title) != NULL)
1135  * Invoked for '-P "title"' argument: search for parent application to open
1139 gui_mch_set_parent(char *title)
1141     EnumWindows(FindWindowTitle, (LPARAM)title);
1144 	EMSG2(_("E671: Cannot find window title \"%s\""), title);
1316     /* First try using the wide version, so that we can use any title.
1584  * Get the size of the screen, taking position on multiple monitors into
1613  * Set the size of the window to the given width and height in pixels.
1650     /* compute the size of the outside of the window */
1709     long	size,
1719 	size >>= 1;
1724 	++size;
1731     info.nPage = size;
1737  * Set the current text font.
1740 gui_mch_set_font(GuiFont font)
1742     gui.currFont = font;
1938  * set font to IM.
2130  * and you are using a Hebrew font (or Arabic!), Windows does you a favor and
2298     /* On NT, tell the font renderer not to "help" us with Hebrew and Arabic
2369 		 * when the font uses different widths (e.g., bold character
2397 		 * when the font uses different widths (e.g., bold character
2511      * the window size can be made to fit on the screen. */
2598     /* Fix window size if menu may have wrapped */
2973  * title	= dialog title. may be NULL for default title.
2999     char_u	*title,
3024     HFONT	font, oldFont;
3100 	font = CreateFontIndirect(&lfSysmenu);
3105     font = CreateFont(-DLG_FONT_POINT_SIZE, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
3109 	oldFont = SelectFont(hdc, font);
3139 	/* Use our own window for the size, unless it's very small. */
3214     /* Restrict the size to a maximum.  Causes a scrollbar to show up. */
3312     /* copy the title of the dialog */
3313     nchar = nCopyAnsiToWideChar(p, (title ?
3314 				    (LPSTR)title :
3320 	/* do the font, since DS_3DLOOK doesn't work properly */
3324 	    /* point size */
3332 	    *p++ = DLG_FONT_POINT_SIZE;		// point size
3429     DeleteObject(font);
3663  * Decide whether to use the "new look" (small, non-bold font) or the "old
3664  * look" (big, clanky font) for dialogs, and work out a few values for use
3673     SIZE	    size;
3705 		    52, &size);
3708 	    s_dlgfntwidth = (WORD)((size.cx / 26 + 1) / 2);
3709 	    s_dlgfntheight = (WORD)size.cy;
3729     char_u	*title,
3745     HFONT	font, oldFont;
3777     if (*title == MNU_HIDDEN_CHAR)
3778 	title++;
3792 	font = CreateFontIndirect(&lfSysmenu);
3797     font = CreateFont(-DLG_FONT_POINT_SIZE, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
3800 	oldFont = SelectFont(hdc, font);
3853     dlgwidth = GetTextWidthEnc(hdc, title, (int)STRLEN(title));
3890     /* copy the title of the dialog */
3891     nchar = nCopyAnsiToWideChar(p, ((*title)
3892 				    ? (LPSTR)title
3898 	/* do the font, since DS_3DLOOK doesn't work properly */
3902 	    /* point size */
3910 	    *p++ = DLG_FONT_POINT_SIZE;		// point size
3955 	 * actual text, "dname" for estimating the displayed size.  "name"
4042     DeleteObject(font);