comparison src/w32fns.c @ 90573:858cb33ae39d

Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 357-381) - Merge from gnus--rel--5.10 - Update from CVS - Merge from erc--emacs--21 * gnus--rel--5.10 (patch 116-122) - Update from CVS - Merge from emacs--devo--0 Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-98
author Miles Bader <miles@gnu.org>
date Thu, 03 Aug 2006 11:45:23 +0000
parents 138ce2701550 0bfda07cccbc
children 7f3f771c85fa
comparison
equal deleted inserted replaced
90572:ab9b8d043c39 90573:858cb33ae39d
2065 w32_createwindow (f) 2065 w32_createwindow (f)
2066 struct frame *f; 2066 struct frame *f;
2067 { 2067 {
2068 HWND hwnd; 2068 HWND hwnd;
2069 RECT rect; 2069 RECT rect;
2070 Lisp_Object top, left;
2070 2071
2071 rect.left = rect.top = 0; 2072 rect.left = rect.top = 0;
2072 rect.right = FRAME_PIXEL_WIDTH (f); 2073 rect.right = FRAME_PIXEL_WIDTH (f);
2073 rect.bottom = FRAME_PIXEL_HEIGHT (f); 2074 rect.bottom = FRAME_PIXEL_HEIGHT (f);
2074 2075
2079 2080
2080 if (!hprevinst) 2081 if (!hprevinst)
2081 { 2082 {
2082 w32_init_class (hinst); 2083 w32_init_class (hinst);
2083 } 2084 }
2085
2086 /* When called with RES_TYPE_NUMBER, w32_get_arg will return zero
2087 for anything that is not a number and is not Qunbound. */
2088 left = w32_get_arg (Qnil, Qleft, "left", "Left", RES_TYPE_NUMBER);
2089 top = w32_get_arg (Qnil, Qtop, "top", "Top", RES_TYPE_NUMBER);
2084 2090
2085 FRAME_W32_WINDOW (f) = hwnd 2091 FRAME_W32_WINDOW (f) = hwnd
2086 = CreateWindow (EMACS_CLASS, 2092 = CreateWindow (EMACS_CLASS,
2087 f->namebuf, 2093 f->namebuf,
2088 f->output_data.w32->dwStyle | WS_CLIPCHILDREN, 2094 f->output_data.w32->dwStyle | WS_CLIPCHILDREN,
2089 CW_USEDEFAULT, 2095 EQ (left, Qunbound) ? CW_USEDEFAULT : XINT (left),
2090 SW_SHOW, 2096 EQ (top, Qunbound) ? CW_USEDEFAULT : XINT (top),
2091 rect.right - rect.left, 2097 rect.right - rect.left,
2092 rect.bottom - rect.top, 2098 rect.bottom - rect.top,
2093 NULL, 2099 NULL,
2094 NULL, 2100 NULL,
2095 hinst, 2101 hinst,