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