Mercurial > hg > xemacs-beta

comparison src/objects-msw.h @ 440:8de8e3f6228a r21-2-28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-28
author cvs
date Mon, 13 Aug 2007 11:33:38 +0200
parents 3ecd8885ac67
children abe6d1db359e
comparison
equal deleted inserted replaced
439:357dd071b03c 440:8de8e3f6228a
29 Rewritten by Ben Wing. 29 Rewritten by Ben Wing.
30 Rewritten for mswindows by Jonathan Harris, November 1997 for 21.0. 30 Rewritten for mswindows by Jonathan Harris, November 1997 for 21.0.
31 */ 31 */
32 32
33 33
34 #ifndef _XEMACS_OBJECTS_MSW_H_ 34 #ifndef INCLUDED_objects_msw_h_
35 #define _XEMACS_OBJECTS_MSW_H_ 35 #define INCLUDED_objects_msw_h_
36 36
37 #include "objects.h" 37 #include "objects.h"
38 38
39 struct mswindows_color_instance_data 39 struct mswindows_color_instance_data
40 { 40 {
44 #define MSWINDOWS_COLOR_INSTANCE_DATA(c) \ 44 #define MSWINDOWS_COLOR_INSTANCE_DATA(c) \
45 ((struct mswindows_color_instance_data *) (c)->data) 45 ((struct mswindows_color_instance_data *) (c)->data)
46 #define COLOR_INSTANCE_MSWINDOWS_COLOR(c) \ 46 #define COLOR_INSTANCE_MSWINDOWS_COLOR(c) \
47 (MSWINDOWS_COLOR_INSTANCE_DATA (c)->color) 47 (MSWINDOWS_COLOR_INSTANCE_DATA (c)->color)
48 48
49 #define FONT_INSTANCE_MSWINDOWS_HFONT(c) ((HFONT) (c)->data) 49 /* The four HFONTS are for the 4 (underlined, strikethrough)
50 combinations. Only the one at index 0, neither underlined nor
51 struk through is created with the font instance. Other fonts are
52 created as necessary during redisplay, using the one at index 0
53 as protptype */
54 #define MSWINDOWS_NUM_FONT_VARIANTS 4
55 struct mswindows_font_instance_data
56 {
57 HFONT hfont [MSWINDOWS_NUM_FONT_VARIANTS];
58 };
50 59
51 #endif /* _XEMACS_OBJECTS_MSW_H_ */ 60 #define MSWINDOWS_FONT_INSTANCE_DATA(c) \
61 ((struct mswindows_font_instance_data *) (c)->data)
62
63 #define FONT_INSTANCE_MSWINDOWS_HFONT_I(c,i) \
64 (MSWINDOWS_FONT_INSTANCE_DATA(c)->hfont[(i)])
65
66 #define FONT_INSTANCE_MSWINDOWS_HFONT_VARIANT(c,under,strike) \
67 FONT_INSTANCE_MSWINDOWS_HFONT_I (c, (!!(strike)<<1)|!!(under))
68
69 /* If font creation during redisplay fails, then the following
70 value is used to prevent future attempts to create this font.
71 Redisplay uses the "main" font when encounters this value */
72 #define MSWINDOWS_BAD_HFONT INVALID_HANDLE_VALUE
73
74 HFONT mswindows_get_hfont (Lisp_Font_Instance* f, int under, int strike);
75
76 #endif /* INCLUDED_objects_msw_h_ */