Mercurial > emacs
annotate src/w32term.h @ 111686:e8049570c647
* lisp/eshell/: Use with-silent-modifications.
* lisp/eshell/esh-cmd.el (eshell-parse-command):
* lisp/eshell/esh-arg.el (eshell-parse-arguments):
* lisp/eshell/em-script.el (eshell-source-file):
Use with-silent-modifications.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Tue, 23 Nov 2010 12:36:15 -0500 |
parents | 2186ab0af4a5 |
children | 417b1e4d63cd |
rev | line source |
---|---|
16886
c686d4f3728a
Change all uses of win95, winnt, and win32 into Windows 95, Windows
Geoff Voelker <voelker@cs.washington.edu>
parents:
16588
diff
changeset
|
1 /* Definitions and headers for communication on the Microsoft W32 API. |
64770
a0d1312ede66
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64084
diff
changeset
|
2 Copyright (C) 1995, 2001, 2002, 2003, 2004, |
106815 | 3 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. |
13543 | 4 |
5 This file is part of GNU Emacs. | |
6 | |
94994
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
94913
diff
changeset
|
7 GNU Emacs is free software: you can redistribute it and/or modify |
13543 | 8 it under the terms of the GNU General Public License as published by |
94994
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
94913
diff
changeset
|
9 the Free Software Foundation, either version 3 of the License, or |
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
94913
diff
changeset
|
10 (at your option) any later version. |
13543 | 11 |
12 GNU Emacs 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 | |
15 GNU General Public License for more details. | |
16 | |
17 You should have received a copy of the GNU General Public License | |
94994
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
94913
diff
changeset
|
18 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ |
13543 | 19 |
20 /* Added by Kevin Gallo */ | |
21 | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
22 #include "w32gui.h" |
13543 | 23 |
24 | |
14984
e8a969370f33
(BLACK_PIX_DEFAULT, WHITE_PIX_DEFAULT): Use PALETTERGB instead of RGB.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14809
diff
changeset
|
25 #define BLACK_PIX_DEFAULT(f) PALETTERGB(0,0,0) |
e8a969370f33
(BLACK_PIX_DEFAULT, WHITE_PIX_DEFAULT): Use PALETTERGB instead of RGB.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14809
diff
changeset
|
26 #define WHITE_PIX_DEFAULT(f) PALETTERGB(255,255,255) |
13543 | 27 |
94913
c83563acc3aa
Throughout the file, delete all USE_FONT_BACKEND
Kenichi Handa <handa@m17n.org>
parents:
93076
diff
changeset
|
28 #define FONT_WIDTH(f) ((f)->max_width) |
c83563acc3aa
Throughout the file, delete all USE_FONT_BACKEND
Kenichi Handa <handa@m17n.org>
parents:
93076
diff
changeset
|
29 #define FONT_HEIGHT(f) ((f)->height) |
c83563acc3aa
Throughout the file, delete all USE_FONT_BACKEND
Kenichi Handa <handa@m17n.org>
parents:
93076
diff
changeset
|
30 #define FONT_BASE(f) ((f)->ascent) |
c83563acc3aa
Throughout the file, delete all USE_FONT_BACKEND
Kenichi Handa <handa@m17n.org>
parents:
93076
diff
changeset
|
31 #define FONT_DESCENT(f) ((f)->descent) |
13543 | 32 |
29309 | 33 #define CP_DEFAULT 1004 |
34 | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
35 #define CHECK_W32_FRAME(f, frame) \ |
13543 | 36 if (NILP (frame)) \ |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
37 f = SELECTED_FRAME (); \ |
13543 | 38 else \ |
39 { \ | |
40 CHECK_LIVE_FRAME (frame, 0); \ | |
41 f = XFRAME (frame); \ | |
42 } \ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
43 if (! FRAME_W32_P (f)) |
13543 | 44 |
45 /* Indicates whether we are in the readsocket call and the message we | |
46 are processing in the current loop */ | |
47 | |
48 extern MSG CurMsg; | |
49 extern BOOL bUseDflt; | |
50 | |
51 /* Structure recording bitmaps and reference count. | |
52 If REFCOUNT is 0 then this record is free to be reused. */ | |
53 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
54 struct w32_bitmap_record |
13543 | 55 { |
56 Pixmap pixmap; | |
57 char *file; | |
58 HINSTANCE hinst; /* Used to load the file */ | |
59 int refcount; | |
60 /* Record some info about this pixmap. */ | |
61 int height, width, depth; | |
62 }; | |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
63 |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
64 /* Palette book-keeping stuff for mapping requested colors into the |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
65 system palette. Keep a ref-counted list of requested colors and |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
66 regenerate the app palette whenever the requested list changes. */ |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
67 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
68 extern Lisp_Object Vw32_enable_palette; |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
69 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
70 struct w32_palette_entry { |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
71 struct w32_palette_entry * next; |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
72 PALETTEENTRY entry; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
73 #if 0 |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
74 unsigned refcount; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
75 #endif |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
76 }; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
77 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
78 extern void w32_regenerate_palette(struct frame *f); |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
79 |
13543 | 80 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
81 /* For each display (currently only one on w32), we have a structure that |
13543 | 82 records information about it. */ |
83 | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
84 struct w32_display_info |
13543 | 85 { |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
86 /* Chain of all w32_display_info structures. */ |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
87 struct w32_display_info *next; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
88 |
83570
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
89 /* The generic display parameters corresponding to this w32 display. */ |
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
90 struct terminal *terminal; |
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
91 |
13543 | 92 /* This is a cons cell of the form (NAME . FONT-LIST-CACHE). |
93 The same cons cell also appears in x_display_name_list. */ | |
94 Lisp_Object name_list_element; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
95 |
13543 | 96 /* Number of frames that are on this display. */ |
97 int reference_count; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
98 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
99 /* Dots per inch of the screen. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
100 double resx, resy; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
101 |
13543 | 102 /* Number of planes on this screen. */ |
103 int n_planes; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
104 |
13543 | 105 /* Number of bits per pixel on this screen. */ |
106 int n_cbits; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
107 |
13543 | 108 /* Mask of things that cause the mouse to be grabbed. */ |
109 int grabbed; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
110 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
111 /* Emacs bitmap-id of the default icon bitmap for this frame. |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
112 Or -1 if none has been allocated yet. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
113 int icon_bitmap_id; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
114 |
13543 | 115 /* The root window of this screen. */ |
116 Window root_window; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
117 |
13543 | 118 /* The cursor to use for vertical scroll bars. */ |
119 Cursor vertical_scroll_bar_cursor; | |
120 | |
50037
bb427a9406c3
(struct w32_display_info): Add xrdb member to support passing resources via -xrm
Juanma Barranquero <lekktu@gmail.com>
parents:
49600
diff
changeset
|
121 /* Resource data base */ |
50366
b8a179bd89b1
(EMACS_CLASS): Remove. Use generic define.
Kim F. Storm <storm@cua.dk>
parents:
50232
diff
changeset
|
122 XrmDatabase xrdb; |
50037
bb427a9406c3
(struct w32_display_info): Add xrdb member to support passing resources via -xrm
Juanma Barranquero <lekktu@gmail.com>
parents:
49600
diff
changeset
|
123 |
23676
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
124 /* color palette information. */ |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
125 int has_palette; |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
126 struct w32_palette_entry * color_list; |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
127 unsigned num_colors; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
128 HPALETTE palette; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
129 |
23676
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
130 /* deferred action flags checked when starting frame update. */ |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
131 int regen_palette; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
132 |
23676
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
133 /* Keystroke that has been faked by Emacs and will be ignored when |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
134 received; value is reset after key is received. */ |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
135 int faked_key; |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
136 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
137 /* Minimum width over all characters in all fonts in font_table. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
138 int smallest_char_width; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
139 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
140 /* Minimum font height over all fonts in font_table. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
141 int smallest_font_height; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
142 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
143 /* Reusable Graphics Context for drawing a cursor in a non-default face. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
144 XGCValues *scratch_cursor_gc; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
145 |
111340
2186ab0af4a5
Start redesigning portable mouse highlight. Not compiled.
Eli Zaretskii <eliz@gnu.org>
parents:
109516
diff
changeset
|
146 /* Information about the range of text currently shown in |
2186ab0af4a5
Start redesigning portable mouse highlight. Not compiled.
Eli Zaretskii <eliz@gnu.org>
parents:
109516
diff
changeset
|
147 mouse-face. */ |
2186ab0af4a5
Start redesigning portable mouse highlight. Not compiled.
Eli Zaretskii <eliz@gnu.org>
parents:
109516
diff
changeset
|
148 Mouse_HLInfo mouse_highlight; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
149 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
150 char *w32_id_name; |
13543 | 151 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
152 /* The number of fonts actually stored in w32_font_table. |
78501 | 153 font_table[n] is used and valid if 0 <= n < n_fonts. 0 <= |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
154 n_fonts <= font_table_size. and font_table[i].name != 0. */ |
13543 | 155 int n_fonts; |
156 | |
157 /* Pointer to bitmap records. */ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
158 struct w32_bitmap_record *bitmaps; |
13543 | 159 |
160 /* Allocated size of bitmaps field. */ | |
161 int bitmaps_size; | |
162 | |
163 /* Last used bitmap index. */ | |
164 int bitmaps_last; | |
165 | |
166 /* The frame (if any) which has the window that has keyboard focus. | |
167 Zero if none. This is examined by Ffocus_frame in w32fns.c. Note | |
168 that a mere EnterNotify event can set this; if you need to know the | |
169 last frame specified in a FocusIn or FocusOut event, use | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
170 w32_focus_event_frame. */ |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
171 struct frame *w32_focus_frame; |
13543 | 172 |
173 /* The last frame mentioned in a FocusIn or FocusOut event. This is | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
174 separate from w32_focus_frame, because whether or not LeaveNotify |
13543 | 175 events cause us to lose focus depends on whether or not we have |
176 received a FocusIn event for it. */ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
177 struct frame *w32_focus_event_frame; |
13543 | 178 |
179 /* The frame which currently has the visual highlight, and should get | |
180 keyboard input (other sorts of input have the frame encoded in the | |
181 event). It points to the focus frame's selected window's | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
182 frame. It differs from w32_focus_frame when we're using a global |
13543 | 183 minibuffer. */ |
47149
facc9fbc1777
(struct w32_display_info) <x_highlight_frame>: Renamed from
Kim F. Storm <storm@cua.dk>
parents:
47141
diff
changeset
|
184 struct frame *x_highlight_frame; |
13543 | 185 }; |
186 | |
187 /* This is a chain of structures for all the displays currently in use. */ | |
38569
dbf5f78bc403
(x_display_list): New extern.
Andrew Innes <andrewi@gnu.org>
parents:
37698
diff
changeset
|
188 extern struct w32_display_info *x_display_list; |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
189 extern struct w32_display_info one_w32_display_info; |
13543 | 190 |
191 /* This is a list of cons cells, each of the form (NAME . FONT-LIST-CACHE), | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
192 one for each element of w32_display_list and in the same order. |
13543 | 193 NAME is the name of the frame. |
194 FONT-LIST-CACHE records previous values returned by x-list-fonts. */ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
195 extern Lisp_Object w32_display_name_list; |
13543 | 196 |
23508
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
197 /* Regexp matching a font name whose width is the same as `PIXEL_SIZE'. */ |
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
198 extern Lisp_Object Vx_pixel_size_width_font_regexp; |
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
199 |
109516
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
200 extern struct frame *x_window_to_frame (struct w32_display_info *, HWND); |
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
201 |
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
202 struct w32_display_info *x_display_info_for_name (Lisp_Object); |
13543 | 203 |
109099 | 204 Lisp_Object display_x_get_resource (struct w32_display_info *, |
205 Lisp_Object, Lisp_Object, | |
206 Lisp_Object, Lisp_Object); | |
55672
c2e5f1d0cc84
(display_x_get_resource, vga_stdcolor_name): Add prototype.
Jason Rumney <jasonr@gnu.org>
parents:
55031
diff
changeset
|
207 |
109516
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
208 extern struct w32_display_info *w32_term_init (Lisp_Object, |
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
209 char *, char *); |
98226
81594681a4bd
(w32_display_info): Remove `height', `width', `height_in', and
Chong Yidong <cyd@stupidchicken.com>
parents:
96331
diff
changeset
|
210 |
109099 | 211 extern int x_display_pixel_height (struct w32_display_info *); |
212 extern int x_display_pixel_width (struct w32_display_info *); | |
98226
81594681a4bd
(w32_display_info): Remove `height', `width', `height_in', and
Chong Yidong <cyd@stupidchicken.com>
parents:
96331
diff
changeset
|
213 |
13543 | 214 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
215 #define PIX_TYPE COLORREF |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
216 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
217 /* Each W32 frame object points to its own struct w32_display object |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
218 in the output_data.w32 field. The w32_display structure contains all |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
219 the information that is specific to W32 windows. */ |
13543 | 220 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
221 /* Put some things in x_output for compatibility. |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
222 NTEMACS_TODO: Move all common things here to eliminate unneccesary |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
223 diffs between X and w32 code. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
224 struct x_output |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
225 { |
83612
e224be42ac30
(x_output): Remove foreground_pixel and background_pixel.
Jason Rumney <jasonr@gnu.org>
parents:
83570
diff
changeset
|
226 #if 0 /* These are also defined in struct frame. Use that instead. */ |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
227 PIX_TYPE background_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
228 PIX_TYPE foreground_pixel; |
83612
e224be42ac30
(x_output): Remove foreground_pixel and background_pixel.
Jason Rumney <jasonr@gnu.org>
parents:
83570
diff
changeset
|
229 #endif |
60949
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
230 |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
231 /* Keep track of focus. May be EXPLICIT if we received a FocusIn for this |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
232 frame, or IMPLICIT if we received an EnterNotify. |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
233 FocusOut and LeaveNotify clears EXPLICIT/IMPLICIT. */ |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
234 int focus_state; |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
235 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
236 }; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
237 |
60949
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
238 enum |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
239 { |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
240 /* Values for focus_state, used as bit mask. |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
241 EXPLICIT means we received a FocusIn for the frame and know it has |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
242 the focus. IMPLICIT means we recevied an EnterNotify and the frame |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
243 may have the focus if no window manager is running. |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
244 FocusOut and LeaveNotify clears EXPLICIT/IMPLICIT. */ |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
245 FOCUS_NONE = 0, |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
246 FOCUS_IMPLICIT = 1, |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
247 FOCUS_EXPLICIT = 2 |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
248 }; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
249 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
250 struct w32_output |
13543 | 251 { |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
252 /* Placeholder for things accessed through output_data.x. */ |
40150
eed2220c99a5
(struct w32_output): Use correct spelling of x_compatible.
Jason Rumney <jasonr@gnu.org>
parents:
38569
diff
changeset
|
253 struct x_output x_compatible; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
254 |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
255 /* Menubar "widget" handle. */ |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
256 HMENU menubar_widget; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
257 |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
258 /* Original palette (used to deselect real palette after drawing) */ |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
259 HPALETTE old_palette; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
260 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
261 /* Here are the Graphics Contexts for the default font. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
262 XGCValues *cursor_gc; /* cursor drawing */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
263 |
13543 | 264 /* The window used for this frame. |
265 May be zero while the frame object is being created | |
266 and the window has not yet been created. */ | |
267 Window window_desc; | |
268 | |
269 /* The window that is the parent of this window. | |
270 Usually this is a window that was made by the window manager, | |
271 but it can be the root window, and it can be explicitly specified | |
272 (see the explicit_parent field, below). */ | |
273 Window parent_desc; | |
274 | |
23508
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
275 /* Default ASCII font of this frame. */ |
94913
c83563acc3aa
Throughout the file, delete all USE_FONT_BACKEND
Kenichi Handa <handa@m17n.org>
parents:
93076
diff
changeset
|
276 struct font *font; |
90866
109057569e6e
(w32_output_data) [USE_FONT_BACKEND]: Add fontp member.
Jason Rumney <jasonr@gnu.org>
parents:
90776
diff
changeset
|
277 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
278 /* The baseline offset of the default ASCII font. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
279 int baseline_offset; |
23508
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
280 |
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
281 /* If a fontset is specified for this frame instead of font, this |
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
282 value contains an ID of the fontset, else -1. */ |
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
283 int fontset; |
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
284 |
13543 | 285 /* Pixel values used for various purposes. |
286 border_pixel may be -1 meaning use a gray tile. */ | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
287 COLORREF cursor_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
288 COLORREF border_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
289 COLORREF mouse_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
290 COLORREF cursor_foreground_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
291 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
292 /* Foreground color for scroll bars. A value of -1 means use the |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
293 default (black for non-toolkit scroll bars). */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
294 COLORREF scroll_bar_foreground_pixel; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
295 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
296 /* Background color for scroll bars. A value of -1 means use the |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
297 default (background color of the frame for non-toolkit scroll |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
298 bars). */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
299 COLORREF scroll_bar_background_pixel; |
13543 | 300 |
301 /* Descriptor for the cursor in use for this window. */ | |
302 Cursor text_cursor; | |
303 Cursor nontext_cursor; | |
304 Cursor modeline_cursor; | |
50232
fbdd920c1fa4
(struct w32_output): Remove cross_cursor member.
Kim F. Storm <storm@cua.dk>
parents:
50155
diff
changeset
|
305 Cursor hand_cursor; |
36254
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
34282
diff
changeset
|
306 Cursor hourglass_cursor; |
34134
296bbdedee11
(struct w32_output): Add member horizontal_drag_cursor.
Jason Rumney <jasonr@gnu.org>
parents:
33453
diff
changeset
|
307 Cursor horizontal_drag_cursor; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
308 |
36254
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
34282
diff
changeset
|
309 /* Non-zero means hourglass cursor is currently displayed. */ |
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
34282
diff
changeset
|
310 unsigned hourglass_p : 1; |
13543 | 311 |
93076
be40d8a9bcc1
* w32fns.c (hourglass_timer, hourglass_hwnd): New variables.
Jason Rumney <jasonr@gnu.org>
parents:
92109
diff
changeset
|
312 /* Non-hourglass cursor that is currently active. */ |
be40d8a9bcc1
* w32fns.c (hourglass_timer, hourglass_hwnd): New variables.
Jason Rumney <jasonr@gnu.org>
parents:
92109
diff
changeset
|
313 Cursor current_cursor; |
be40d8a9bcc1
* w32fns.c (hourglass_timer, hourglass_hwnd): New variables.
Jason Rumney <jasonr@gnu.org>
parents:
92109
diff
changeset
|
314 |
13543 | 315 /* Flag to set when the window needs to be completely repainted. */ |
316 int needs_exposure; | |
317 | |
318 DWORD dwStyle; | |
319 | |
320 /* This is the Emacs structure for the display this frame is on. */ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
321 /* struct w32_display_info *display_info; */ |
13543 | 322 |
323 /* Nonzero means our parent is another application's window | |
324 and was explicitly specified. */ | |
325 char explicit_parent; | |
326 | |
327 /* Nonzero means tried already to make this frame visible. */ | |
328 char asked_for_visible; | |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
329 |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
330 /* Nonzero means menubar is currently active. */ |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
331 char menubar_active; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
332 |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
333 /* Nonzero means menubar is about to become active, but should be |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
334 brought up to date first. */ |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
335 volatile char pending_menu_activation; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
336 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
337 /* Relief GCs, colors etc. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
338 struct relief |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
339 { |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
340 XGCValues *gc; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
341 unsigned long pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
342 int allocated_p; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
343 } |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
344 black_relief, white_relief; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
345 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
346 /* The background for which the above relief GCs were set up. |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
347 They are changed only when a different background is involved. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
348 unsigned long relief_background; |
13543 | 349 }; |
350 | |
26729
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
24916
diff
changeset
|
351 extern struct w32_output w32term_display; |
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
24916
diff
changeset
|
352 |
50155
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
353 /* Return the X output data for frame F. */ |
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
354 #define FRAME_X_OUTPUT(f) ((f)->output_data.w32) |
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
355 |
13543 | 356 /* Return the window associated with the frame F. */ |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
357 #define FRAME_W32_WINDOW(f) ((f)->output_data.w32->window_desc) |
50155
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
358 #define FRAME_X_WINDOW(f) ((f)->output_data.w32->window_desc) |
13543 | 359 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
360 #define FRAME_FONT(f) ((f)->output_data.w32->font) |
23508
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
361 #define FRAME_FONTSET(f) ((f)->output_data.w32->fontset) |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
362 #define FRAME_BASELINE_OFFSET(f) ((f)->output_data.w32->baseline_offset) |
13543 | 363 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
364 /* This gives the w32_display_info structure for the display F is on. */ |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
365 #define FRAME_W32_DISPLAY_INFO(f) (&one_w32_display_info) |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
366 #define FRAME_X_DISPLAY_INFO(f) (&one_w32_display_info) |
13543 | 367 |
50155
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
368 /* This is the `Display *' which frame F is on. */ |
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
369 #define FRAME_X_DISPLAY(f) (0) |
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
370 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
371 /* Value is the smallest width of any character in any font on frame F. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
372 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
373 #define FRAME_SMALLEST_CHAR_WIDTH(F) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
374 FRAME_W32_DISPLAY_INFO(F)->smallest_char_width |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
375 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
376 /* Value is the smallest height of any font on frame F. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
377 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
378 #define FRAME_SMALLEST_FONT_HEIGHT(F) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
379 FRAME_W32_DISPLAY_INFO(F)->smallest_font_height |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
380 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
381 /* W32-specific scroll bar stuff. */ |
13543 | 382 |
383 /* We represent scroll bars as lisp vectors. This allows us to place | |
384 references to them in windows without worrying about whether we'll | |
385 end up with windows referring to dead scroll bars; the garbage | |
386 collector will free it when its time comes. | |
387 | |
388 We use struct scroll_bar as a template for accessing fields of the | |
389 vector. */ | |
390 | |
391 struct scroll_bar { | |
392 | |
393 /* These fields are shared by all vectors. */ | |
394 EMACS_INT size_from_Lisp_Vector_struct; | |
395 struct Lisp_Vector *next_from_Lisp_Vector_struct; | |
396 | |
397 /* The window we're a scroll bar for. */ | |
398 Lisp_Object window; | |
399 | |
400 /* The next and previous in the chain of scroll bars in this frame. */ | |
401 Lisp_Object next, prev; | |
402 | |
403 /* The window representing this scroll bar. Since this is a full | |
404 32-bit quantity, we store it split into two 32-bit values. */ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
405 Lisp_Object w32_window_low, w32_window_high; |
13543 | 406 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
407 /* Same as above for the widget. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
408 Lisp_Object w32_widget_low, w32_widget_high; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
409 |
13543 | 410 /* The position and size of the scroll bar in pixels, relative to the |
411 frame. */ | |
412 Lisp_Object top, left, width, height; | |
413 | |
414 /* The starting and ending positions of the handle, relative to the | |
415 handle area (i.e. zero is the top position, not | |
416 SCROLL_BAR_TOP_BORDER). If they're equal, that means the handle | |
417 hasn't been drawn yet. | |
418 | |
419 These are not actually the locations where the beginning and end | |
420 are drawn; in order to keep handles from becoming invisible when | |
421 editing large files, we establish a minimum height by always | |
422 drawing handle bottoms VERTICAL_SCROLL_BAR_MIN_HANDLE pixels below | |
423 where they would be normally; the bottom and top are in a | |
424 different co-ordinate system. */ | |
425 Lisp_Object start, end; | |
426 | |
427 /* If the scroll bar handle is currently being dragged by the user, | |
428 this is the number of pixels from the top of the handle to the | |
429 place where the user grabbed it. If the handle isn't currently | |
430 being dragged, this is Qnil. */ | |
431 Lisp_Object dragging; | |
82171
ced9c6afe013
(struct scroll_bar): New member fringe_extended_p.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
78260
diff
changeset
|
432 |
ced9c6afe013
(struct scroll_bar): New member fringe_extended_p.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
78260
diff
changeset
|
433 /* t if the background of the fringe that is adjacent to a scroll |
ced9c6afe013
(struct scroll_bar): New member fringe_extended_p.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
78260
diff
changeset
|
434 bar is extended to the gap between the fringe and the bar. */ |
ced9c6afe013
(struct scroll_bar): New member fringe_extended_p.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
78260
diff
changeset
|
435 Lisp_Object fringe_extended_p; |
13543 | 436 }; |
437 | |
438 /* The number of elements a vector holding a struct scroll_bar needs. */ | |
439 #define SCROLL_BAR_VEC_SIZE \ | |
440 ((sizeof (struct scroll_bar) \ | |
441 - sizeof (EMACS_INT) - sizeof (struct Lisp_Vector *)) \ | |
442 / sizeof (Lisp_Object)) | |
443 | |
444 /* Turning a lisp vector value into a pointer to a struct scroll_bar. */ | |
445 #define XSCROLL_BAR(vec) ((struct scroll_bar *) XVECTOR (vec)) | |
446 | |
447 | |
448 /* Building a 32-bit C integer from two 16-bit lisp integers. */ | |
449 #define SCROLL_BAR_PACK(low, high) (XINT (high) << 16 | XINT (low)) | |
450 | |
451 /* Setting two lisp integers to the low and high words of a 32-bit C int. */ | |
452 #define SCROLL_BAR_UNPACK(low, high, int32) \ | |
453 (XSETINT ((low), (int32) & 0xffff), \ | |
454 XSETINT ((high), ((int32) >> 16) & 0xffff)) | |
455 | |
456 | |
457 /* Extract the window id of the scroll bar from a struct scroll_bar. */ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
458 #define SCROLL_BAR_W32_WINDOW(ptr) \ |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
459 ((Window) SCROLL_BAR_PACK ((ptr)->w32_window_low, (ptr)->w32_window_high)) |
13543 | 460 |
461 /* Store a window id in a struct scroll_bar. */ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
462 #define SET_SCROLL_BAR_W32_WINDOW(ptr, id) \ |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
463 (SCROLL_BAR_UNPACK ((ptr)->w32_window_low, (ptr)->w32_window_high, (int) id)) |
13543 | 464 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
465 /* Extract the X widget of the scroll bar from a struct scroll_bar. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
466 #define SCROLL_BAR_X_WIDGET(ptr) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
467 ((Widget) SCROLL_BAR_PACK ((ptr)->x_widget_low, (ptr)->x_widget_high)) |
13543 | 468 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
469 /* Store a widget id in a struct scroll_bar. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
470 #define SET_SCROLL_BAR_X_WIDGET(ptr, w) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
471 (SCROLL_BAR_UNPACK ((ptr)->x_widget_low, (ptr)->x_widget_high, (int) w)) |
13543 | 472 |
473 /* Return the inside width of a vertical scroll bar, given the outside | |
474 width. */ | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
475 #define VERTICAL_SCROLL_BAR_INSIDE_WIDTH(f,width) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
476 ((width) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
477 - VERTICAL_SCROLL_BAR_LEFT_BORDER \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
478 - VERTICAL_SCROLL_BAR_RIGHT_BORDER \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
479 - VERTICAL_SCROLL_BAR_WIDTH_TRIM * 2) |
13543 | 480 |
481 /* Return the length of the rectangle within which the top of the | |
482 handle must stay. This isn't equivalent to the inside height, | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
483 because the scroll bar handle has a minimum height. |
13543 | 484 |
485 This is the real range of motion for the scroll bar, so when we're | |
486 scaling buffer positions to scroll bar positions, we use this, not | |
487 VERTICAL_SCROLL_BAR_INSIDE_HEIGHT. */ | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
488 #define VERTICAL_SCROLL_BAR_TOP_RANGE(f,height) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
489 (VERTICAL_SCROLL_BAR_INSIDE_HEIGHT (f, height) - VERTICAL_SCROLL_BAR_MIN_HANDLE) |
13543 | 490 |
491 /* Return the inside height of vertical scroll bar, given the outside | |
492 height. See VERTICAL_SCROLL_BAR_TOP_RANGE too. */ | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
493 #define VERTICAL_SCROLL_BAR_INSIDE_HEIGHT(f,height) \ |
13543 | 494 ((height) - VERTICAL_SCROLL_BAR_TOP_BORDER - VERTICAL_SCROLL_BAR_BOTTOM_BORDER) |
495 | |
496 | |
497 /* Border widths for scroll bars. | |
498 | |
499 Scroll bar windows don't have any borders; their border width is | |
500 set to zero, and we redraw borders ourselves. This makes the code | |
501 a bit cleaner, since we don't have to convert between outside width | |
502 (used when relating to the rest of the screen) and inside width | |
503 (used when sizing and drawing the scroll bar window itself). | |
504 | |
505 The handle moves up and down/back and forth in a rectangle inset | |
506 from the edges of the scroll bar. These are widths by which we | |
507 inset the handle boundaries from the scroll bar edges. */ | |
508 #define VERTICAL_SCROLL_BAR_LEFT_BORDER (0) | |
509 #define VERTICAL_SCROLL_BAR_RIGHT_BORDER (0) | |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
510 #define VERTICAL_SCROLL_BAR_TOP_BORDER (vertical_scroll_bar_top_border) |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
511 #define VERTICAL_SCROLL_BAR_BOTTOM_BORDER (vertical_scroll_bar_bottom_border) |
13543 | 512 |
513 /* Minimum lengths for scroll bar handles, in pixels. */ | |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
514 #define VERTICAL_SCROLL_BAR_MIN_HANDLE (vertical_scroll_bar_min_handle) |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
515 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
516 /* Trimming off a few pixels from each side prevents |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
517 text from glomming up against the scroll bar */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
518 #define VERTICAL_SCROLL_BAR_WIDTH_TRIM (0) |
13543 | 519 |
520 | |
109516
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
521 struct frame; /* from frame.h */ |
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
522 |
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
523 extern void w32_fill_rect (struct frame *, HDC, COLORREF, RECT *); |
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
524 extern void w32_clear_window (struct frame *); |
13543 | 525 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
526 #define w32_fill_area(f,hdc,pix,x,y,nx,ny) \ |
82171
ced9c6afe013
(struct scroll_bar): New member fringe_extended_p.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
78260
diff
changeset
|
527 do { \ |
13543 | 528 RECT rect; \ |
529 rect.left = x; \ | |
530 rect.top = y; \ | |
531 rect.right = x + nx; \ | |
532 rect.bottom = y + ny; \ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
533 w32_fill_rect (f,hdc,pix,&rect); \ |
82171
ced9c6afe013
(struct scroll_bar): New member fringe_extended_p.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
78260
diff
changeset
|
534 } while (0) |
13543 | 535 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
536 #define w32_clear_rect(f,hdc,lprect) \ |
83612
e224be42ac30
(x_output): Remove foreground_pixel and background_pixel.
Jason Rumney <jasonr@gnu.org>
parents:
83570
diff
changeset
|
537 w32_fill_rect (f, hdc, FRAME_BACKGROUND_PIXEL (f), lprect) |
13543 | 538 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
539 #define w32_clear_area(f,hdc,px,py,nx,ny) \ |
83612
e224be42ac30
(x_output): Remove foreground_pixel and background_pixel.
Jason Rumney <jasonr@gnu.org>
parents:
83570
diff
changeset
|
540 w32_fill_area (f, hdc, FRAME_BACKGROUND_PIXEL (f), px, py, nx, ny) |
13543 | 541 |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
542 /* Define for earlier versions of Visual C */ |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
543 #ifndef WM_MOUSEWHEEL |
21876
52ebc509a367
(WM_MOUSEWHEEL): Define relative to WM_MOUSELAST.
Geoff Voelker <voelker@cs.washington.edu>
parents:
21615
diff
changeset
|
544 #define WM_MOUSEWHEEL (WM_MOUSELAST + 1) |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
545 #endif /* WM_MOUSEWHEEL */ |
21876
52ebc509a367
(WM_MOUSEWHEEL): Define relative to WM_MOUSELAST.
Geoff Voelker <voelker@cs.washington.edu>
parents:
21615
diff
changeset
|
546 #ifndef MSH_MOUSEWHEEL |
52ebc509a367
(WM_MOUSEWHEEL): Define relative to WM_MOUSELAST.
Geoff Voelker <voelker@cs.washington.edu>
parents:
21615
diff
changeset
|
547 #define MSH_MOUSEWHEEL "MSWHEEL_ROLLMSG" |
52ebc509a367
(WM_MOUSEWHEEL): Define relative to WM_MOUSELAST.
Geoff Voelker <voelker@cs.washington.edu>
parents:
21615
diff
changeset
|
548 #endif /* MSH_MOUSEWHEEL */ |
42718
0546caffda34
(WM_XBUTTONDOWN, WM_XBUTTONUP): New window messages
Jason Rumney <jasonr@gnu.org>
parents:
41735
diff
changeset
|
549 #ifndef WM_XBUTTONDOWN |
0546caffda34
(WM_XBUTTONDOWN, WM_XBUTTONUP): New window messages
Jason Rumney <jasonr@gnu.org>
parents:
41735
diff
changeset
|
550 #define WM_XBUTTONDOWN (WM_MOUSEWHEEL + 1) |
0546caffda34
(WM_XBUTTONDOWN, WM_XBUTTONUP): New window messages
Jason Rumney <jasonr@gnu.org>
parents:
41735
diff
changeset
|
551 #define WM_XBUTTONUP (WM_MOUSEWHEEL + 2) |
0546caffda34
(WM_XBUTTONDOWN, WM_XBUTTONUP): New window messages
Jason Rumney <jasonr@gnu.org>
parents:
41735
diff
changeset
|
552 #endif /* WM_XBUTTONDOWN */ |
83877
eed0e69910d6
(WM_MOUSEHWHEEL): Define if system headers don't.
Jason Rumney <jasonr@gnu.org>
parents:
83652
diff
changeset
|
553 #ifndef WM_MOUSEHWHEEL |
eed0e69910d6
(WM_MOUSEHWHEEL): Define if system headers don't.
Jason Rumney <jasonr@gnu.org>
parents:
83652
diff
changeset
|
554 #define WM_MOUSEHWHEEL (WM_MOUSEWHEEL + 4) |
eed0e69910d6
(WM_MOUSEHWHEEL): Define if system headers don't.
Jason Rumney <jasonr@gnu.org>
parents:
83652
diff
changeset
|
555 #endif /* WM_MOUSEHWHEEL */ |
85978
4c0bb0c5c744
(WM_APPCOMMAND): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
83877
diff
changeset
|
556 #ifndef WM_APPCOMMAND |
4c0bb0c5c744
(WM_APPCOMMAND): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
83877
diff
changeset
|
557 #define WM_APPCOMMAND 0x319 |
4c0bb0c5c744
(WM_APPCOMMAND): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
83877
diff
changeset
|
558 #define GET_APPCOMMAND_LPARAM(lParam) (HIWORD(lParam) & 0x7fff) |
4c0bb0c5c744
(WM_APPCOMMAND): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
83877
diff
changeset
|
559 #endif |
91097
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
560 #ifndef WM_UNICHAR |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
561 #define WM_UNICHAR 0x109 |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
562 #endif |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
563 #ifndef UNICODE_NOCHAR |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
564 #define UNICODE_NOCHAR 0xFFFF |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
565 #endif |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
566 |
13543 | 567 #define WM_EMACS_START (WM_USER + 1) |
23676
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
568 #define WM_EMACS_KILL (WM_EMACS_START + 0) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
569 #define WM_EMACS_CREATEWINDOW (WM_EMACS_START + 1) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
570 #define WM_EMACS_DONE (WM_EMACS_START + 2) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
571 #define WM_EMACS_CREATESCROLLBAR (WM_EMACS_START + 3) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
572 #define WM_EMACS_SHOWWINDOW (WM_EMACS_START + 4) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
573 #define WM_EMACS_SETWINDOWPOS (WM_EMACS_START + 5) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
574 #define WM_EMACS_DESTROYWINDOW (WM_EMACS_START + 6) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
575 #define WM_EMACS_TRACKPOPUPMENU (WM_EMACS_START + 7) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
576 #define WM_EMACS_SETFOCUS (WM_EMACS_START + 8) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
577 #define WM_EMACS_SETFOREGROUND (WM_EMACS_START + 9) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
578 #define WM_EMACS_SETLOCALE (WM_EMACS_START + 10) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
579 #define WM_EMACS_SETKEYBOARDLAYOUT (WM_EMACS_START + 11) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
580 #define WM_EMACS_REGISTER_HOT_KEY (WM_EMACS_START + 12) |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
581 #define WM_EMACS_UNREGISTER_HOT_KEY (WM_EMACS_START + 13) |
23805
44ad68548ff9
(WM_EMACS_TOGGLE_LOCK_KEY): New define.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23676
diff
changeset
|
582 #define WM_EMACS_TOGGLE_LOCK_KEY (WM_EMACS_START + 14) |
40382
771aec14ad74
(WM_EMACS_TRACK_CARET, WM_EMACS_DESTROY_CARET): New messages types.
Jason Rumney <jasonr@gnu.org>
parents:
40150
diff
changeset
|
583 #define WM_EMACS_TRACK_CARET (WM_EMACS_START + 15) |
771aec14ad74
(WM_EMACS_TRACK_CARET, WM_EMACS_DESTROY_CARET): New messages types.
Jason Rumney <jasonr@gnu.org>
parents:
40150
diff
changeset
|
584 #define WM_EMACS_DESTROY_CARET (WM_EMACS_START + 16) |
42863
cff9c12217fd
(WM_EMACS_SHOW_CARET, WM_EMACS_HIDE_CARET): New
Jason Rumney <jasonr@gnu.org>
parents:
42718
diff
changeset
|
585 #define WM_EMACS_SHOW_CARET (WM_EMACS_START + 17) |
cff9c12217fd
(WM_EMACS_SHOW_CARET, WM_EMACS_HIDE_CARET): New
Jason Rumney <jasonr@gnu.org>
parents:
42718
diff
changeset
|
586 #define WM_EMACS_HIDE_CARET (WM_EMACS_START + 18) |
49370
fdaa0f133d3f
2003-01-21 KOBAYASHI Yasuhiro <kobayays@otsukakj.co.jp>
Jason Rumney <jasonr@gnu.org>
parents:
47149
diff
changeset
|
587 #define WM_EMACS_SETCURSOR (WM_EMACS_START + 19) |
102584
5cd33b0be96f
* w32term.h (WM_EMACS_PAINT): New message.
Jason Rumney <jasonr@gnu.org>
parents:
100951
diff
changeset
|
588 #define WM_EMACS_PAINT (WM_EMACS_START + 20) |
5cd33b0be96f
* w32term.h (WM_EMACS_PAINT): New message.
Jason Rumney <jasonr@gnu.org>
parents:
100951
diff
changeset
|
589 #define WM_EMACS_END (WM_EMACS_START + 21) |
13543 | 590 |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
591 #define WND_FONTWIDTH_INDEX (0) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
592 #define WND_LINEHEIGHT_INDEX (4) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
593 #define WND_BORDER_INDEX (8) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
594 #define WND_SCROLLBAR_INDEX (12) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
595 #define WND_BACKGROUND_INDEX (16) |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
596 #define WND_LAST_INDEX (20) |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
597 |
13543 | 598 #define WND_EXTRA_BYTES (WND_LAST_INDEX) |
599 | |
16886
c686d4f3728a
Change all uses of win95, winnt, and win32 into Windows 95, Windows
Geoff Voelker <voelker@cs.washington.edu>
parents:
16588
diff
changeset
|
600 extern DWORD dwWindowsThreadId; |
c686d4f3728a
Change all uses of win95, winnt, and win32 into Windows 95, Windows
Geoff Voelker <voelker@cs.washington.edu>
parents:
16588
diff
changeset
|
601 extern HANDLE hWindowsThread; |
13543 | 602 extern DWORD dwMainThreadId; |
603 extern HANDLE hMainThread; | |
604 | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
605 typedef struct W32Msg { |
13543 | 606 MSG msg; |
607 DWORD dwModifiers; | |
608 RECT rect; | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
609 } W32Msg; |
13543 | 610 |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
611 /* Structure for recording message when input thread must return a |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
612 result that depends on lisp thread to compute. Lisp thread can |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
613 complete deferred messages out of order. */ |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
614 typedef struct deferred_msg |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
615 { |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
616 struct deferred_msg * next; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
617 W32Msg w32msg; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
618 LRESULT result; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
619 int completed; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
620 } deferred_msg; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
621 |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
622 extern CRITICAL_SECTION critsect; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
623 |
109516
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
624 extern void init_crit (void); |
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
625 extern void delete_crit (void); |
13543 | 626 |
109516
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
627 extern void signal_quit (void); |
22080
f519dedee9bc
(signal_quit): Add prototype.
Richard M. Stallman <rms@gnu.org>
parents:
21876
diff
changeset
|
628 |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
629 #define enter_crit() EnterCriticalSection (&critsect) |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
630 #define leave_crit() LeaveCriticalSection (&critsect) |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
631 |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
632 extern void select_palette (struct frame * f, HDC hdc); |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
633 extern void deselect_palette (struct frame * f, HDC hdc); |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
634 extern HDC get_frame_dc (struct frame * f); |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
635 extern int release_frame_dc (struct frame * f, HDC hDC); |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
636 |
109516
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
637 extern void drain_message_queue (void); |
24916
dcad7c5b7add
(drain_message_queue): Add extern.
Andrew Innes <andrewi@gnu.org>
parents:
24145
diff
changeset
|
638 |
109516
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
639 extern BOOL get_next_msg (W32Msg *, BOOL); |
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
640 extern BOOL post_msg (W32Msg *); |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
641 extern void complete_deferred_msg (HWND hwnd, UINT msg, LRESULT result); |
13543 | 642 |
109516
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
643 extern BOOL parse_button (int, int, int *, int *); |
14809
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
644 |
83570
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
645 extern void w32_sys_ring_bell (struct frame *f); |
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
646 extern void x_delete_display (struct w32_display_info *dpyinfo); |
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
647 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
648 /* Keypad command key support. W32 doesn't have virtual keys defined |
14809
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
649 for the function keys on the keypad (they are mapped to the standard |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
650 fuction keys), so we define our own. */ |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
651 #define VK_NUMPAD_BEGIN 0x92 |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
652 #define VK_NUMPAD_CLEAR (VK_NUMPAD_BEGIN + 0) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
653 #define VK_NUMPAD_ENTER (VK_NUMPAD_BEGIN + 1) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
654 #define VK_NUMPAD_PRIOR (VK_NUMPAD_BEGIN + 2) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
655 #define VK_NUMPAD_NEXT (VK_NUMPAD_BEGIN + 3) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
656 #define VK_NUMPAD_END (VK_NUMPAD_BEGIN + 4) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
657 #define VK_NUMPAD_HOME (VK_NUMPAD_BEGIN + 5) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
658 #define VK_NUMPAD_LEFT (VK_NUMPAD_BEGIN + 6) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
659 #define VK_NUMPAD_UP (VK_NUMPAD_BEGIN + 7) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
660 #define VK_NUMPAD_RIGHT (VK_NUMPAD_BEGIN + 8) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
661 #define VK_NUMPAD_DOWN (VK_NUMPAD_BEGIN + 9) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
662 #define VK_NUMPAD_INSERT (VK_NUMPAD_BEGIN + 10) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
663 #define VK_NUMPAD_DELETE (VK_NUMPAD_BEGIN + 11) |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
664 |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
665 #ifndef VK_LWIN |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
666 /* Older compiler environments don't have these defined. */ |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
667 #define VK_LWIN 0x5B |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
668 #define VK_RWIN 0x5C |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
669 #define VK_APPS 0x5D |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
670 #endif |
23676
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
671 |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
672 /* Support for treating Windows and Apps keys as modifiers. These |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
673 constants must not overlap with any of the dwControlKeyState flags in |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
674 KEY_EVENT_RECORD. */ |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
675 #define LEFT_WIN_PRESSED 0x8000 |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
676 #define RIGHT_WIN_PRESSED 0x4000 |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
677 #define APPS_PRESSED 0x2000 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
678 |
41735
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
679 /* When compiling on Windows 9x/ME and NT 3.x, the following are not defined |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
680 (even though they are supported on 98 and ME. */ |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
681 #ifndef WM_MOUSELEAVE |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
682 #define WM_MOUSELEAVE 0x02A3 |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
683 #define TME_LEAVE 0x00000002; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
684 |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
685 typedef struct tagTRACKMOUSEEVENT |
41735
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
686 { |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
687 DWORD cbSize; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
688 DWORD dwFlags; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
689 HWND hwndTrack; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
690 DWORD dwHoverTime; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
691 } TRACKMOUSEEVENT; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
692 #endif |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
693 |
37698
e97aa7dfaf5c
(struct image, struct face): Forward declaration, to avoid compiler warnings.
Eli Zaretskii <eliz@gnu.org>
parents:
36254
diff
changeset
|
694 struct image; |
e97aa7dfaf5c
(struct image, struct face): Forward declaration, to avoid compiler warnings.
Eli Zaretskii <eliz@gnu.org>
parents:
36254
diff
changeset
|
695 struct face; |
e97aa7dfaf5c
(struct image, struct face): Forward declaration, to avoid compiler warnings.
Eli Zaretskii <eliz@gnu.org>
parents:
36254
diff
changeset
|
696 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
697 XGCValues *XCreateGC (void *, Window, unsigned long, XGCValues *); |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
698 struct frame * check_x_frame (Lisp_Object); |
55672
c2e5f1d0cc84
(display_x_get_resource, vga_stdcolor_name): Add prototype.
Jason Rumney <jasonr@gnu.org>
parents:
55031
diff
changeset
|
699 |
29309 | 700 EXFUN (Fx_display_color_p, 1); |
701 EXFUN (Fx_display_grayscale_p, 1); | |
50155
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
702 |
109516
68ca98ae70fb
Make building under stricter warning flags somewhat cleaner.
Juanma Barranquero <lekktu@gmail.com>
parents:
109099
diff
changeset
|
703 typedef DWORD (WINAPI * ClipboardSequence_Proc) (void); |
56972
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
704 typedef BOOL (WINAPI * AppendMenuW_Proc) ( |
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
705 IN HMENU, |
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
706 IN UINT, |
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
707 IN UINT_PTR, |
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
708 IN LPCWSTR); |
52401 | 709 |
710 /* arch-tag: f201d05a-1240-4fc5-8ea4-ca24d4ee5671 | |
711 (do not change this comment) */ |