Mercurial > emacs
annotate src/w32term.h @ 97289:6cec2902d7b8
* net/xesam.el (top): Require `wid-edit' always.
(xesam-mode-line, xesam-highlight): New deffaces.
(xesam-objects): New local variable.
(xesam-search-engines): Fix error in field list.
(xesam-mode): Use `xesam-mode-line' instead of
`font-lock-type-face'. Apply `xesam-mode' to a temp buffer, for
proper initiatilzaion (why?).
(xesam-highlight-string, xesam-get-hits)
(xesam-kill-buffer-function): New defuns.
(xesam-refresh-entry): Move code to `xesam-get-hits'. Check
result of "hit.fields", it isn't a string only. Wrap an error of
the strigi search engine ("xesam:size" is returned as string).
Highlight search items.
(xesam-refresh-search-buffer): Make logic of counters more simple.
Prefetch next hits.
(xesam-signal-handler): Use `xesam-mode-line' instead of
`font-lock-type-face'.
(xesam-new-search): Add `xesam-kill-buffer-function' to
`kill-buffer-hook'.
author | Michael Albinus <michael.albinus@gmx.de> |
---|---|
date | Tue, 05 Aug 2008 19:47:27 +0000 |
parents | ad8ead4749dd |
children | 81594681a4bd |
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, |
79759 | 3 2005, 2006, 2007, 2008 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 extern struct frame *x_window_to_frame (); | |
52 | |
53 /* Structure recording bitmaps and reference count. | |
54 If REFCOUNT is 0 then this record is free to be reused. */ | |
55 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
56 struct w32_bitmap_record |
13543 | 57 { |
58 Pixmap pixmap; | |
59 char *file; | |
60 HINSTANCE hinst; /* Used to load the file */ | |
61 int refcount; | |
62 /* Record some info about this pixmap. */ | |
63 int height, width, depth; | |
64 }; | |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
65 |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
66 /* 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
|
67 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
|
68 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
|
69 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
70 extern Lisp_Object Vw32_enable_palette; |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
71 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
72 struct w32_palette_entry { |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
73 struct w32_palette_entry * next; |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
74 PALETTEENTRY entry; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
75 #if 0 |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
76 unsigned refcount; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
77 #endif |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
78 }; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
79 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
80 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
|
81 |
13543 | 82 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
83 /* For each display (currently only one on w32), we have a structure that |
13543 | 84 records information about it. */ |
85 | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
86 struct w32_display_info |
13543 | 87 { |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
88 /* 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
|
89 struct w32_display_info *next; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
90 |
83570
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
91 /* The generic display parameters corresponding to this w32 display. */ |
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
92 struct terminal *terminal; |
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
93 |
13543 | 94 /* This is a cons cell of the form (NAME . FONT-LIST-CACHE). |
95 The same cons cell also appears in x_display_name_list. */ | |
96 Lisp_Object name_list_element; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
97 |
13543 | 98 /* Number of frames that are on this display. */ |
99 int reference_count; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
100 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
101 /* Dots per inch of the screen. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
102 double resx, resy; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
103 |
13543 | 104 /* Number of planes on this screen. */ |
105 int n_planes; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
106 |
13543 | 107 /* Number of bits per pixel on this screen. */ |
108 int n_cbits; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
109 |
13543 | 110 /* Dimensions of this screen. */ |
111 int height, width; | |
112 int height_in,width_in; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
113 |
13543 | 114 /* Mask of things that cause the mouse to be grabbed. */ |
115 int grabbed; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
116 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
117 /* 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
|
118 Or -1 if none has been allocated yet. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
119 int icon_bitmap_id; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
120 |
13543 | 121 /* The root window of this screen. */ |
122 Window root_window; | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
123 |
13543 | 124 /* The cursor to use for vertical scroll bars. */ |
125 Cursor vertical_scroll_bar_cursor; | |
126 | |
50037
bb427a9406c3
(struct w32_display_info): Add xrdb member to support passing resources via -xrm
Juanma Barranquero <lekktu@gmail.com>
parents:
49600
diff
changeset
|
127 /* Resource data base */ |
50366
b8a179bd89b1
(EMACS_CLASS): Remove. Use generic define.
Kim F. Storm <storm@cua.dk>
parents:
50232
diff
changeset
|
128 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
|
129 |
23676
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
130 /* color palette information. */ |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
131 int has_palette; |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
132 struct w32_palette_entry * color_list; |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
133 unsigned num_colors; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
134 HPALETTE palette; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
135 |
23676
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
136 /* 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
|
137 int regen_palette; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
138 |
23676
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
139 /* 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
|
140 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
|
141 int faked_key; |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
142 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
143 /* 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
|
144 int smallest_char_width; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
145 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
146 /* 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
|
147 int smallest_font_height; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
148 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
149 /* 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
|
150 XGCValues *scratch_cursor_gc; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
151 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
152 /* These variables describe the range of text currently shown in its |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
153 mouse-face, together with the window they apply to. As long as |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
154 the mouse stays within this range, we need not redraw anything on |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
155 its account. Rows and columns are glyph matrix positions in |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
156 MOUSE_FACE_WINDOW. */ |
13543 | 157 int mouse_face_beg_row, mouse_face_beg_col; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
158 int mouse_face_beg_x, mouse_face_beg_y; |
13543 | 159 int mouse_face_end_row, mouse_face_end_col; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
160 int mouse_face_end_x, mouse_face_end_y; |
13543 | 161 int mouse_face_past_end; |
162 Lisp_Object mouse_face_window; | |
163 int mouse_face_face_id; | |
40150
eed2220c99a5
(struct w32_output): Use correct spelling of x_compatible.
Jason Rumney <jasonr@gnu.org>
parents:
38569
diff
changeset
|
164 Lisp_Object mouse_face_overlay; |
13543 | 165 |
166 /* 1 if a mouse motion event came and we didn't handle it right away because | |
167 gc was in progress. */ | |
168 int mouse_face_deferred_gc; | |
169 | |
170 /* FRAME and X, Y position of mouse when last checked for | |
171 highlighting. X and Y can be negative or out of range for the frame. */ | |
172 struct frame *mouse_face_mouse_frame; | |
173 int mouse_face_mouse_x, mouse_face_mouse_y; | |
174 | |
175 /* Nonzero means defer mouse-motion highlighting. */ | |
176 int mouse_face_defer; | |
177 | |
43372
e1a8a3f02251
(struct w32_display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
42863
diff
changeset
|
178 /* Nonzero means that the mouse highlight should not be shown. */ |
e1a8a3f02251
(struct w32_display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
42863
diff
changeset
|
179 int mouse_face_hidden; |
e1a8a3f02251
(struct w32_display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
42863
diff
changeset
|
180 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
181 int mouse_face_image_state; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
182 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
183 char *w32_id_name; |
13543 | 184 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
185 /* The number of fonts actually stored in w32_font_table. |
78501 | 186 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
|
187 n_fonts <= font_table_size. and font_table[i].name != 0. */ |
13543 | 188 int n_fonts; |
189 | |
190 /* Pointer to bitmap records. */ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
191 struct w32_bitmap_record *bitmaps; |
13543 | 192 |
193 /* Allocated size of bitmaps field. */ | |
194 int bitmaps_size; | |
195 | |
196 /* Last used bitmap index. */ | |
197 int bitmaps_last; | |
198 | |
199 /* The frame (if any) which has the window that has keyboard focus. | |
200 Zero if none. This is examined by Ffocus_frame in w32fns.c. Note | |
201 that a mere EnterNotify event can set this; if you need to know the | |
202 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
|
203 w32_focus_event_frame. */ |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
204 struct frame *w32_focus_frame; |
13543 | 205 |
206 /* 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
|
207 separate from w32_focus_frame, because whether or not LeaveNotify |
13543 | 208 events cause us to lose focus depends on whether or not we have |
209 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
|
210 struct frame *w32_focus_event_frame; |
13543 | 211 |
212 /* The frame which currently has the visual highlight, and should get | |
213 keyboard input (other sorts of input have the frame encoded in the | |
214 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
|
215 frame. It differs from w32_focus_frame when we're using a global |
13543 | 216 minibuffer. */ |
47149
facc9fbc1777
(struct w32_display_info) <x_highlight_frame>: Renamed from
Kim F. Storm <storm@cua.dk>
parents:
47141
diff
changeset
|
217 struct frame *x_highlight_frame; |
13543 | 218 }; |
219 | |
220 /* 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
|
221 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
|
222 extern struct w32_display_info one_w32_display_info; |
13543 | 223 |
224 /* 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
|
225 one for each element of w32_display_list and in the same order. |
13543 | 226 NAME is the name of the frame. |
227 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
|
228 extern Lisp_Object w32_display_name_list; |
13543 | 229 |
23508
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
230 /* 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
|
231 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
|
232 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
233 struct w32_display_info *x_display_info_for_name (); |
13543 | 234 |
55672
c2e5f1d0cc84
(display_x_get_resource, vga_stdcolor_name): Add prototype.
Jason Rumney <jasonr@gnu.org>
parents:
55031
diff
changeset
|
235 Lisp_Object display_x_get_resource P_ ((struct w32_display_info *, |
c2e5f1d0cc84
(display_x_get_resource, vga_stdcolor_name): Add prototype.
Jason Rumney <jasonr@gnu.org>
parents:
55031
diff
changeset
|
236 Lisp_Object, Lisp_Object, |
c2e5f1d0cc84
(display_x_get_resource, vga_stdcolor_name): Add prototype.
Jason Rumney <jasonr@gnu.org>
parents:
55031
diff
changeset
|
237 Lisp_Object, Lisp_Object)); |
c2e5f1d0cc84
(display_x_get_resource, vga_stdcolor_name): Add prototype.
Jason Rumney <jasonr@gnu.org>
parents:
55031
diff
changeset
|
238 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
239 extern struct w32_display_info *w32_term_init (); |
13543 | 240 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
241 #define PIX_TYPE COLORREF |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
242 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
243 /* 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
|
244 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
|
245 the information that is specific to W32 windows. */ |
13543 | 246 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
247 /* Put some things in x_output for compatibility. |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
248 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
|
249 diffs between X and w32 code. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
250 struct x_output |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
251 { |
83612
e224be42ac30
(x_output): Remove foreground_pixel and background_pixel.
Jason Rumney <jasonr@gnu.org>
parents:
83570
diff
changeset
|
252 #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
|
253 PIX_TYPE background_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
254 PIX_TYPE foreground_pixel; |
83612
e224be42ac30
(x_output): Remove foreground_pixel and background_pixel.
Jason Rumney <jasonr@gnu.org>
parents:
83570
diff
changeset
|
255 #endif |
60949
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
256 |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
257 /* 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
|
258 frame, or IMPLICIT if we received an EnterNotify. |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
259 FocusOut and LeaveNotify clears EXPLICIT/IMPLICIT. */ |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
260 int focus_state; |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
261 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
262 }; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
263 |
60949
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
264 enum |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
265 { |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
266 /* Values for focus_state, used as bit mask. |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
267 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
|
268 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
|
269 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
|
270 FocusOut and LeaveNotify clears EXPLICIT/IMPLICIT. */ |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
271 FOCUS_NONE = 0, |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
272 FOCUS_IMPLICIT = 1, |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
273 FOCUS_EXPLICIT = 2 |
3b4d5e41f3fd
(x_output): add focus_state.
Jason Rumney <jasonr@gnu.org>
parents:
56972
diff
changeset
|
274 }; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
275 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
276 struct w32_output |
13543 | 277 { |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
278 /* 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
|
279 struct x_output x_compatible; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
280 |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
281 /* Menubar "widget" handle. */ |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
282 HMENU menubar_widget; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
283 |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
284 /* 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
|
285 HPALETTE old_palette; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
286 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
287 /* 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
|
288 XGCValues *cursor_gc; /* cursor drawing */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
289 |
13543 | 290 /* The window used for this frame. |
291 May be zero while the frame object is being created | |
292 and the window has not yet been created. */ | |
293 Window window_desc; | |
294 | |
295 /* The window that is the parent of this window. | |
296 Usually this is a window that was made by the window manager, | |
297 but it can be the root window, and it can be explicitly specified | |
298 (see the explicit_parent field, below). */ | |
299 Window parent_desc; | |
300 | |
23508
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
301 /* 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
|
302 struct font *font; |
90866
109057569e6e
(w32_output_data) [USE_FONT_BACKEND]: Add fontp member.
Jason Rumney <jasonr@gnu.org>
parents:
90776
diff
changeset
|
303 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
304 /* The baseline offset of the default ASCII font. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
305 int baseline_offset; |
23508
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
306 |
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
307 /* 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
|
308 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
|
309 int fontset; |
4e067ce42325
Remove redundant font_info struct definition.
Geoff Voelker <voelker@cs.washington.edu>
parents:
22080
diff
changeset
|
310 |
13543 | 311 /* Pixel values used for various purposes. |
312 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
|
313 COLORREF cursor_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
314 COLORREF border_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
315 COLORREF mouse_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
316 COLORREF cursor_foreground_pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
317 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
318 /* 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
|
319 default (black for non-toolkit scroll bars). */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
320 COLORREF scroll_bar_foreground_pixel; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
321 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
322 /* 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
|
323 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
|
324 bars). */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
325 COLORREF scroll_bar_background_pixel; |
13543 | 326 |
327 /* Descriptor for the cursor in use for this window. */ | |
328 Cursor text_cursor; | |
329 Cursor nontext_cursor; | |
330 Cursor modeline_cursor; | |
50232
fbdd920c1fa4
(struct w32_output): Remove cross_cursor member.
Kim F. Storm <storm@cua.dk>
parents:
50155
diff
changeset
|
331 Cursor hand_cursor; |
36254
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
34282
diff
changeset
|
332 Cursor hourglass_cursor; |
34134
296bbdedee11
(struct w32_output): Add member horizontal_drag_cursor.
Jason Rumney <jasonr@gnu.org>
parents:
33453
diff
changeset
|
333 Cursor horizontal_drag_cursor; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
334 |
36254
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
34282
diff
changeset
|
335 /* 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
|
336 unsigned hourglass_p : 1; |
13543 | 337 |
93076
be40d8a9bcc1
* w32fns.c (hourglass_timer, hourglass_hwnd): New variables.
Jason Rumney <jasonr@gnu.org>
parents:
92109
diff
changeset
|
338 /* 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
|
339 Cursor current_cursor; |
be40d8a9bcc1
* w32fns.c (hourglass_timer, hourglass_hwnd): New variables.
Jason Rumney <jasonr@gnu.org>
parents:
92109
diff
changeset
|
340 |
13543 | 341 /* Flag to set when the window needs to be completely repainted. */ |
342 int needs_exposure; | |
343 | |
344 DWORD dwStyle; | |
345 | |
346 /* 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
|
347 /* struct w32_display_info *display_info; */ |
13543 | 348 |
349 /* Nonzero means our parent is another application's window | |
350 and was explicitly specified. */ | |
351 char explicit_parent; | |
352 | |
353 /* Nonzero means tried already to make this frame visible. */ | |
354 char asked_for_visible; | |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
355 |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
356 /* 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
|
357 char menubar_active; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
358 |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
359 /* 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
|
360 brought up to date first. */ |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
361 volatile char pending_menu_activation; |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
362 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
363 /* Relief GCs, colors etc. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
364 struct relief |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
365 { |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
366 XGCValues *gc; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
367 unsigned long pixel; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
368 int allocated_p; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
369 } |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
370 black_relief, white_relief; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
371 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
372 /* 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
|
373 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
|
374 unsigned long relief_background; |
13543 | 375 }; |
376 | |
26729
f5dded41adcc
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
24916
diff
changeset
|
377 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
|
378 |
50155
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
379 /* 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
|
380 #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
|
381 |
13543 | 382 /* 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
|
383 #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
|
384 #define FRAME_X_WINDOW(f) ((f)->output_data.w32->window_desc) |
13543 | 385 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
386 #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
|
387 #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
|
388 #define FRAME_BASELINE_OFFSET(f) ((f)->output_data.w32->baseline_offset) |
13543 | 389 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
390 /* 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
|
391 #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
|
392 #define FRAME_X_DISPLAY_INFO(f) (&one_w32_display_info) |
13543 | 393 |
50155
2b702ff059f8
(FRAME_X_OUTPUT, FRAME_X_WINDOW, FRAME_X_DISPLAY)
Kim F. Storm <storm@cua.dk>
parents:
50037
diff
changeset
|
394 /* 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
|
395 #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
|
396 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
397 /* 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
|
398 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
399 #define FRAME_SMALLEST_CHAR_WIDTH(F) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
400 FRAME_W32_DISPLAY_INFO(F)->smallest_char_width |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
401 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
402 /* 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
|
403 |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
404 #define FRAME_SMALLEST_FONT_HEIGHT(F) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
405 FRAME_W32_DISPLAY_INFO(F)->smallest_font_height |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
406 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
407 /* W32-specific scroll bar stuff. */ |
13543 | 408 |
409 /* We represent scroll bars as lisp vectors. This allows us to place | |
410 references to them in windows without worrying about whether we'll | |
411 end up with windows referring to dead scroll bars; the garbage | |
412 collector will free it when its time comes. | |
413 | |
414 We use struct scroll_bar as a template for accessing fields of the | |
415 vector. */ | |
416 | |
417 struct scroll_bar { | |
418 | |
419 /* These fields are shared by all vectors. */ | |
420 EMACS_INT size_from_Lisp_Vector_struct; | |
421 struct Lisp_Vector *next_from_Lisp_Vector_struct; | |
422 | |
423 /* The window we're a scroll bar for. */ | |
424 Lisp_Object window; | |
425 | |
426 /* The next and previous in the chain of scroll bars in this frame. */ | |
427 Lisp_Object next, prev; | |
428 | |
429 /* The window representing this scroll bar. Since this is a full | |
430 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
|
431 Lisp_Object w32_window_low, w32_window_high; |
13543 | 432 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
433 /* Same as above for the widget. */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
434 Lisp_Object w32_widget_low, w32_widget_high; |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
435 |
13543 | 436 /* The position and size of the scroll bar in pixels, relative to the |
437 frame. */ | |
438 Lisp_Object top, left, width, height; | |
439 | |
440 /* The starting and ending positions of the handle, relative to the | |
441 handle area (i.e. zero is the top position, not | |
442 SCROLL_BAR_TOP_BORDER). If they're equal, that means the handle | |
443 hasn't been drawn yet. | |
444 | |
445 These are not actually the locations where the beginning and end | |
446 are drawn; in order to keep handles from becoming invisible when | |
447 editing large files, we establish a minimum height by always | |
448 drawing handle bottoms VERTICAL_SCROLL_BAR_MIN_HANDLE pixels below | |
449 where they would be normally; the bottom and top are in a | |
450 different co-ordinate system. */ | |
451 Lisp_Object start, end; | |
452 | |
453 /* If the scroll bar handle is currently being dragged by the user, | |
454 this is the number of pixels from the top of the handle to the | |
455 place where the user grabbed it. If the handle isn't currently | |
456 being dragged, this is Qnil. */ | |
457 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
|
458 |
ced9c6afe013
(struct scroll_bar): New member fringe_extended_p.
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
78260
diff
changeset
|
459 /* 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
|
460 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
|
461 Lisp_Object fringe_extended_p; |
13543 | 462 }; |
463 | |
464 /* The number of elements a vector holding a struct scroll_bar needs. */ | |
465 #define SCROLL_BAR_VEC_SIZE \ | |
466 ((sizeof (struct scroll_bar) \ | |
467 - sizeof (EMACS_INT) - sizeof (struct Lisp_Vector *)) \ | |
468 / sizeof (Lisp_Object)) | |
469 | |
470 /* Turning a lisp vector value into a pointer to a struct scroll_bar. */ | |
471 #define XSCROLL_BAR(vec) ((struct scroll_bar *) XVECTOR (vec)) | |
472 | |
473 | |
474 /* Building a 32-bit C integer from two 16-bit lisp integers. */ | |
475 #define SCROLL_BAR_PACK(low, high) (XINT (high) << 16 | XINT (low)) | |
476 | |
477 /* Setting two lisp integers to the low and high words of a 32-bit C int. */ | |
478 #define SCROLL_BAR_UNPACK(low, high, int32) \ | |
479 (XSETINT ((low), (int32) & 0xffff), \ | |
480 XSETINT ((high), ((int32) >> 16) & 0xffff)) | |
481 | |
482 | |
483 /* 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
|
484 #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
|
485 ((Window) SCROLL_BAR_PACK ((ptr)->w32_window_low, (ptr)->w32_window_high)) |
13543 | 486 |
487 /* 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
|
488 #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
|
489 (SCROLL_BAR_UNPACK ((ptr)->w32_window_low, (ptr)->w32_window_high, (int) id)) |
13543 | 490 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
491 /* 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
|
492 #define SCROLL_BAR_X_WIDGET(ptr) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
493 ((Widget) SCROLL_BAR_PACK ((ptr)->x_widget_low, (ptr)->x_widget_high)) |
13543 | 494 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
495 /* 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
|
496 #define SET_SCROLL_BAR_X_WIDGET(ptr, w) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
497 (SCROLL_BAR_UNPACK ((ptr)->x_widget_low, (ptr)->x_widget_high, (int) w)) |
13543 | 498 |
499 /* Return the inside width of a vertical scroll bar, given the outside | |
500 width. */ | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
501 #define VERTICAL_SCROLL_BAR_INSIDE_WIDTH(f,width) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
502 ((width) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
503 - VERTICAL_SCROLL_BAR_LEFT_BORDER \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
504 - VERTICAL_SCROLL_BAR_RIGHT_BORDER \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
505 - VERTICAL_SCROLL_BAR_WIDTH_TRIM * 2) |
13543 | 506 |
507 /* Return the length of the rectangle within which the top of the | |
508 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
|
509 because the scroll bar handle has a minimum height. |
13543 | 510 |
511 This is the real range of motion for the scroll bar, so when we're | |
512 scaling buffer positions to scroll bar positions, we use this, not | |
513 VERTICAL_SCROLL_BAR_INSIDE_HEIGHT. */ | |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
514 #define VERTICAL_SCROLL_BAR_TOP_RANGE(f,height) \ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
515 (VERTICAL_SCROLL_BAR_INSIDE_HEIGHT (f, height) - VERTICAL_SCROLL_BAR_MIN_HANDLE) |
13543 | 516 |
517 /* Return the inside height of vertical scroll bar, given the outside | |
518 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
|
519 #define VERTICAL_SCROLL_BAR_INSIDE_HEIGHT(f,height) \ |
13543 | 520 ((height) - VERTICAL_SCROLL_BAR_TOP_BORDER - VERTICAL_SCROLL_BAR_BOTTOM_BORDER) |
521 | |
522 | |
523 /* Border widths for scroll bars. | |
524 | |
525 Scroll bar windows don't have any borders; their border width is | |
526 set to zero, and we redraw borders ourselves. This makes the code | |
527 a bit cleaner, since we don't have to convert between outside width | |
528 (used when relating to the rest of the screen) and inside width | |
529 (used when sizing and drawing the scroll bar window itself). | |
530 | |
531 The handle moves up and down/back and forth in a rectangle inset | |
532 from the edges of the scroll bar. These are widths by which we | |
533 inset the handle boundaries from the scroll bar edges. */ | |
534 #define VERTICAL_SCROLL_BAR_LEFT_BORDER (0) | |
535 #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
|
536 #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
|
537 #define VERTICAL_SCROLL_BAR_BOTTOM_BORDER (vertical_scroll_bar_bottom_border) |
13543 | 538 |
539 /* 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
|
540 #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
|
541 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
542 /* 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
|
543 text from glomming up against the scroll bar */ |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
544 #define VERTICAL_SCROLL_BAR_WIDTH_TRIM (0) |
13543 | 545 |
546 | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
547 extern void w32_fill_rect (); |
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
548 extern void w32_clear_window (); |
13543 | 549 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
550 #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
|
551 do { \ |
13543 | 552 RECT rect; \ |
553 rect.left = x; \ | |
554 rect.top = y; \ | |
555 rect.right = x + nx; \ | |
556 rect.bottom = y + ny; \ | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
557 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
|
558 } while (0) |
13543 | 559 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
560 #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
|
561 w32_fill_rect (f, hdc, FRAME_BACKGROUND_PIXEL (f), lprect) |
13543 | 562 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
563 #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
|
564 w32_fill_area (f, hdc, FRAME_BACKGROUND_PIXEL (f), px, py, nx, ny) |
13543 | 565 |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
566 /* 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
|
567 #ifndef WM_MOUSEWHEEL |
21876
52ebc509a367
(WM_MOUSEWHEEL): Define relative to WM_MOUSELAST.
Geoff Voelker <voelker@cs.washington.edu>
parents:
21615
diff
changeset
|
568 #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
|
569 #endif /* WM_MOUSEWHEEL */ |
21876
52ebc509a367
(WM_MOUSEWHEEL): Define relative to WM_MOUSELAST.
Geoff Voelker <voelker@cs.washington.edu>
parents:
21615
diff
changeset
|
570 #ifndef MSH_MOUSEWHEEL |
52ebc509a367
(WM_MOUSEWHEEL): Define relative to WM_MOUSELAST.
Geoff Voelker <voelker@cs.washington.edu>
parents:
21615
diff
changeset
|
571 #define MSH_MOUSEWHEEL "MSWHEEL_ROLLMSG" |
52ebc509a367
(WM_MOUSEWHEEL): Define relative to WM_MOUSELAST.
Geoff Voelker <voelker@cs.washington.edu>
parents:
21615
diff
changeset
|
572 #endif /* MSH_MOUSEWHEEL */ |
42718
0546caffda34
(WM_XBUTTONDOWN, WM_XBUTTONUP): New window messages
Jason Rumney <jasonr@gnu.org>
parents:
41735
diff
changeset
|
573 #ifndef WM_XBUTTONDOWN |
0546caffda34
(WM_XBUTTONDOWN, WM_XBUTTONUP): New window messages
Jason Rumney <jasonr@gnu.org>
parents:
41735
diff
changeset
|
574 #define WM_XBUTTONDOWN (WM_MOUSEWHEEL + 1) |
0546caffda34
(WM_XBUTTONDOWN, WM_XBUTTONUP): New window messages
Jason Rumney <jasonr@gnu.org>
parents:
41735
diff
changeset
|
575 #define WM_XBUTTONUP (WM_MOUSEWHEEL + 2) |
0546caffda34
(WM_XBUTTONDOWN, WM_XBUTTONUP): New window messages
Jason Rumney <jasonr@gnu.org>
parents:
41735
diff
changeset
|
576 #endif /* WM_XBUTTONDOWN */ |
83877
eed0e69910d6
(WM_MOUSEHWHEEL): Define if system headers don't.
Jason Rumney <jasonr@gnu.org>
parents:
83652
diff
changeset
|
577 #ifndef WM_MOUSEHWHEEL |
eed0e69910d6
(WM_MOUSEHWHEEL): Define if system headers don't.
Jason Rumney <jasonr@gnu.org>
parents:
83652
diff
changeset
|
578 #define WM_MOUSEHWHEEL (WM_MOUSEWHEEL + 4) |
eed0e69910d6
(WM_MOUSEHWHEEL): Define if system headers don't.
Jason Rumney <jasonr@gnu.org>
parents:
83652
diff
changeset
|
579 #endif /* WM_MOUSEHWHEEL */ |
85978
4c0bb0c5c744
(WM_APPCOMMAND): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
83877
diff
changeset
|
580 #ifndef WM_APPCOMMAND |
4c0bb0c5c744
(WM_APPCOMMAND): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
83877
diff
changeset
|
581 #define WM_APPCOMMAND 0x319 |
4c0bb0c5c744
(WM_APPCOMMAND): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
83877
diff
changeset
|
582 #define GET_APPCOMMAND_LPARAM(lParam) (HIWORD(lParam) & 0x7fff) |
4c0bb0c5c744
(WM_APPCOMMAND): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
83877
diff
changeset
|
583 #endif |
91097
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
584 #ifndef WM_UNICHAR |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
585 #define WM_UNICHAR 0x109 |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
586 #endif |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
587 #ifndef UNICODE_NOCHAR |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
588 #define UNICODE_NOCHAR 0xFFFF |
93265f86dd8b
(WM_UNICHAR, UNICODE_NOCHAR): Define if not already.
Jason Rumney <jasonr@gnu.org>
parents:
91085
diff
changeset
|
589 #endif |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
590 |
13543 | 591 #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
|
592 #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
|
593 #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
|
594 #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
|
595 #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
|
596 #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
|
597 #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
|
598 #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
|
599 #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
|
600 #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
|
601 #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
|
602 #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
|
603 #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
|
604 #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
|
605 #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
|
606 #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
|
607 #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
|
608 #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
|
609 #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
|
610 #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
|
611 #define WM_EMACS_SETCURSOR (WM_EMACS_START + 19) |
fdaa0f133d3f
2003-01-21 KOBAYASHI Yasuhiro <kobayays@otsukakj.co.jp>
Jason Rumney <jasonr@gnu.org>
parents:
47149
diff
changeset
|
612 #define WM_EMACS_END (WM_EMACS_START + 20) |
13543 | 613 |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
614 #define WND_FONTWIDTH_INDEX (0) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
615 #define WND_LINEHEIGHT_INDEX (4) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
616 #define WND_BORDER_INDEX (8) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
617 #define WND_SCROLLBAR_INDEX (12) |
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
618 #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
|
619 #define WND_LAST_INDEX (20) |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
620 |
13543 | 621 #define WND_EXTRA_BYTES (WND_LAST_INDEX) |
622 | |
16886
c686d4f3728a
Change all uses of win95, winnt, and win32 into Windows 95, Windows
Geoff Voelker <voelker@cs.washington.edu>
parents:
16588
diff
changeset
|
623 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
|
624 extern HANDLE hWindowsThread; |
13543 | 625 extern DWORD dwMainThreadId; |
626 extern HANDLE hMainThread; | |
627 | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
628 typedef struct W32Msg { |
13543 | 629 MSG msg; |
630 DWORD dwModifiers; | |
631 RECT rect; | |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
632 } W32Msg; |
13543 | 633 |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
634 /* 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
|
635 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
|
636 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
|
637 typedef struct deferred_msg |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
638 { |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
639 struct deferred_msg * next; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
640 W32Msg w32msg; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
641 LRESULT result; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
642 int completed; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
643 } deferred_msg; |
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
644 |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
645 extern CRITICAL_SECTION critsect; |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
646 |
13543 | 647 extern void init_crit (); |
648 extern void delete_crit (); | |
649 | |
22080
f519dedee9bc
(signal_quit): Add prototype.
Richard M. Stallman <rms@gnu.org>
parents:
21876
diff
changeset
|
650 extern void signal_quit (); |
f519dedee9bc
(signal_quit): Add prototype.
Richard M. Stallman <rms@gnu.org>
parents:
21876
diff
changeset
|
651 |
15152
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
652 #define enter_crit() EnterCriticalSection (&critsect) |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
653 #define leave_crit() LeaveCriticalSection (&critsect) |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
654 |
2dd4961cefaa
(struct win32_palette_entry): New structure.
Geoff Voelker <voelker@cs.washington.edu>
parents:
14984
diff
changeset
|
655 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
|
656 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
|
657 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
|
658 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
|
659 |
24916
dcad7c5b7add
(drain_message_queue): Add extern.
Andrew Innes <andrewi@gnu.org>
parents:
24145
diff
changeset
|
660 extern void drain_message_queue (); |
dcad7c5b7add
(drain_message_queue): Add extern.
Andrew Innes <andrewi@gnu.org>
parents:
24145
diff
changeset
|
661 |
13543 | 662 extern BOOL get_next_msg (); |
663 extern BOOL post_msg (); | |
19714
72fa0e75a0fe
(w32_output): New fields menubar_widget, menubar_active,
Geoff Voelker <voelker@cs.washington.edu>
parents:
16888
diff
changeset
|
664 extern void complete_deferred_msg (HWND hwnd, UINT msg, LRESULT result); |
13543 | 665 extern void wait_for_sync (); |
666 | |
667 extern BOOL parse_button (); | |
14809
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
668 |
83570
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
669 extern void w32_sys_ring_bell (struct frame *f); |
c6328b40e293
(w32_display_info): Add terminal.
Jason Rumney <jasonr@gnu.org>
parents:
83556
diff
changeset
|
670 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
|
671 |
16588
481b7874a1e9
Change identifiers of the form win32* to w32*.
Geoff Voelker <voelker@cs.washington.edu>
parents:
15152
diff
changeset
|
672 /* 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
|
673 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
|
674 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
|
675 #define VK_NUMPAD_BEGIN 0x92 |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
676 #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
|
677 #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
|
678 #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
|
679 #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
|
680 #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
|
681 #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
|
682 #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
|
683 #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
|
684 #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
|
685 #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
|
686 #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
|
687 #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
|
688 |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
689 #ifndef VK_LWIN |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
690 /* 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
|
691 #define VK_LWIN 0x5B |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
692 #define VK_RWIN 0x5C |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
693 #define VK_APPS 0x5D |
fb9e2125fc2e
(VK_NUMPAD_*, VK_LWIN, VK_RWIN, VK_APPS):
Geoff Voelker <voelker@cs.washington.edu>
parents:
14521
diff
changeset
|
694 #endif |
23676
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
695 |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
696 /* 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
|
697 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
|
698 KEY_EVENT_RECORD. */ |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
699 #define LEFT_WIN_PRESSED 0x8000 |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
700 #define RIGHT_WIN_PRESSED 0x4000 |
704d2e178bcb
(struct w32_display_info): New element faked_key.
Geoff Voelker <voelker@cs.washington.edu>
parents:
23508
diff
changeset
|
701 #define APPS_PRESSED 0x2000 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
702 |
41735
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
703 /* 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
|
704 (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
|
705 #ifndef WM_MOUSELEAVE |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
706 #define WM_MOUSELEAVE 0x02A3 |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
707 #define TME_LEAVE 0x00000002; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
708 |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49370
diff
changeset
|
709 typedef struct tagTRACKMOUSEEVENT |
41735
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
710 { |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
711 DWORD cbSize; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
712 DWORD dwFlags; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
713 HWND hwndTrack; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
714 DWORD dwHoverTime; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
715 } TRACKMOUSEEVENT; |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
716 #endif |
cd985673cfc3
(WM_MOUSELEAVE, TME_LEAVE, TRACKMOUSEEVENT) [!WM_MOUSELEAVE]: Define.
Jason Rumney <jasonr@gnu.org>
parents:
41728
diff
changeset
|
717 |
37698
e97aa7dfaf5c
(struct image, struct face): Forward declaration, to avoid compiler warnings.
Eli Zaretskii <eliz@gnu.org>
parents:
36254
diff
changeset
|
718 struct image; |
e97aa7dfaf5c
(struct image, struct face): Forward declaration, to avoid compiler warnings.
Eli Zaretskii <eliz@gnu.org>
parents:
36254
diff
changeset
|
719 struct face; |
e97aa7dfaf5c
(struct image, struct face): Forward declaration, to avoid compiler warnings.
Eli Zaretskii <eliz@gnu.org>
parents:
36254
diff
changeset
|
720 |
27403
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
721 XGCValues *XCreateGC (void *, Window, unsigned long, XGCValues *); |
220407a99b21
(XCharStruct): New struct for emulating X.
Jason Rumney <jasonr@gnu.org>
parents:
26729
diff
changeset
|
722 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
|
723 |
29309 | 724 EXFUN (Fx_display_color_p, 1); |
725 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
|
726 |
51775
864ebf80c8ca
(ClipboardSequence_Proc): New type.
Jason Rumney <jasonr@gnu.org>
parents:
51205
diff
changeset
|
727 typedef DWORD (WINAPI * ClipboardSequence_Proc) (); |
56972
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
728 typedef BOOL (WINAPI * AppendMenuW_Proc) ( |
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
729 IN HMENU, |
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
730 IN UINT, |
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
731 IN UINT_PTR, |
c6a3ae6654db
(AppendMenuW_Proc): Move declaration from w32menu.c.
Jason Rumney <jasonr@gnu.org>
parents:
55672
diff
changeset
|
732 IN LPCWSTR); |
52401 | 733 |
734 /* arch-tag: f201d05a-1240-4fc5-8ea4-ca24d4ee5671 | |
735 (do not change this comment) */ |