annotate lwlib/lwlib.h @ 2619:935833be8506

[xemacs-hg @ 2005-02-28 17:02:09 by aidan] Register the source window as an Xt drawable when receiving an incremental selection transfer. This stops XEmacs looping until interrupted.
author aidan
date Mon, 28 Feb 2005 17:02:10 +0000
parents 4b7d425dd3c2
children 383ab474a241
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
440
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 434
diff changeset
1 #ifndef INCLUDED_lwlib_h_
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 434
diff changeset
2 #define INCLUDED_lwlib_h_
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
3
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
4 #include <X11/Intrinsic.h>
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
5
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
6 #if defined (LWLIB_MENUBARS_LUCID) || defined (LWLIB_MENUBARS_MOTIF) || defined (LWLIB_MENUBARS_ATHENA)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
7 #define NEED_MENUBARS
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
8 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
9 #if defined (LWLIB_SCROLLBARS_LUCID) || defined (LWLIB_SCROLLBARS_MOTIF) || defined (LWLIB_SCROLLBARS_ATHENA)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
10 #define NEED_SCROLLBARS
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
11 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
12 #if defined (LWLIB_DIALOGS_LUCID) || defined (LWLIB_DIALOGS_MOTIF) || defined (LWLIB_DIALOGS_ATHENA)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
13 #define NEED_DIALOGS
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
14 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
15
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
16 /*
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
17 ** Widget values depend on the Widget type:
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
18 **
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
19 ** widget: (name value key enabled data contents/selected)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
20 **
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
21 ** label: ("name" "string" NULL NULL NULL NULL)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
22 ** BUTTON: ("name" "string" "key" T/F data <default-button-p>)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
23 ** CASCADE (button w/menu):
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
24 ** ("name" "string" "key" T/F data (label|button|button w/menu...))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
25 ** INCREMENTAL (button w/menu construction callback):
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
26 ** ("name" "string" NULL T/F <opaque pointer>)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
27 ** menubar: ("name" NULL NULL T/F data (button w/menu))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
28 ** scrollbar:("name" NULL NULL T/F NULL NULL)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
29 ** selectable thing:
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
30 ** ("name" "string" "key" T/F data T/F)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
31 ** checkbox: selectable thing
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
32 ** radio: ("name" NULL NULL T/F data (selectable thing...))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
33 ** strings: ("name" NULL NULL T/F data (selectable thing...))
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
34 ** TEXT: ("name" "string" <ign> T/F data)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
35 **
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
36 ** Note that the above is EXTREMELY bogus. The "type" of the various entities
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
37 ** that a widget_value structure can represent is implicit in the contents of
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
38 ** half a dozen slots, instead of there simply being a type field. This
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
39 ** should all be rethunk. I've added a type field, but for now it's only used
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
40 ** by the new xlwmenu code.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
41 */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
42
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
43 typedef unsigned long LWLIB_ID;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
44
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
45 typedef enum _change_type
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
46 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
47 NO_CHANGE = 0,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
48 INVISIBLE_CHANGE = 1,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
49 VISIBLE_CHANGE = 2,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
50 STRUCTURAL_CHANGE = 3
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
51 } change_type;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
52
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
53 typedef enum _widget_value_type
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
54 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
55 UNSPECIFIED_TYPE = 0,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
56 BUTTON_TYPE = 1,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
57 TOGGLE_TYPE = 2,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
58 RADIO_TYPE = 3,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
59 TEXT_TYPE = 4,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
60 SEPARATOR_TYPE = 5,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
61 CASCADE_TYPE = 6,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
62 PUSHRIGHT_TYPE = 7,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
63 INCREMENTAL_TYPE = 8
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
64 } widget_value_type;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
65
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
66 typedef enum _scroll_action
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
67 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
68 SCROLLBAR_LINE_UP = 0,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
69 SCROLLBAR_LINE_DOWN = 1,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
70 SCROLLBAR_PAGE_UP = 2,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
71 SCROLLBAR_PAGE_DOWN = 3,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
72 SCROLLBAR_DRAG = 4,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
73 SCROLLBAR_CHANGE = 5,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
74 SCROLLBAR_TOP = 6,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
75 SCROLLBAR_BOTTOM = 7
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
76 } scroll_action;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
77
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
78 typedef struct _scroll_event
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
79 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
80 scroll_action action;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
81 int slider_value;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
82 Time time;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
83 } scroll_event;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
84
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
85 typedef struct _scrollbar_values
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
86 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
87 int line_increment;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
88 int page_increment;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
89
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
90 int minimum;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
91 int maximum;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
92
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
93 int slider_size;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
94 int slider_position;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
95
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
96 int scrollbar_width, scrollbar_height;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
97 int scrollbar_x, scrollbar_y;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
98 } scrollbar_values;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
99
434
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
100 typedef struct _widget_args
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
101 {
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
102 /* some things are only possible at creation time. args are applied
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
103 to widgets at creation time. */
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
104 ArgList args;
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
105 int nargs;
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
106 /* Copying args is impossible so we make the caller give us heap allocated
444
576fb035e263 Import from CVS: tag r21-2-37
cvs
parents: 442
diff changeset
107 args and free them when no one wants them any more. */
434
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
108 int ref_count;
450
98528da0b7fc Import from CVS: tag r21-2-40
cvs
parents: 444
diff changeset
109 /* Since we are reference counting we need to be able to determine
98528da0b7fc Import from CVS: tag r21-2-40
cvs
parents: 444
diff changeset
110 when something has changed. */
98528da0b7fc Import from CVS: tag r21-2-40
cvs
parents: 444
diff changeset
111 Boolean args_changed;
434
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
112 } widget_args;
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
113
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
114 typedef struct _widget_value
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
115 {
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
116 /* This slot is only partially utilized right now. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
117 widget_value_type type;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
118
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
119 /* name of widget */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
120 char* name;
444
576fb035e263 Import from CVS: tag r21-2-37
cvs
parents: 442
diff changeset
121 /* value (meaning BOGUSLY depends on widget type) */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
122 char* value;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
123 /* keyboard equivalent. no implications for XtTranslations */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
124 char* key;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
125 /* accelerator key. For XEmacs, this should be a Lisp_Object holding a
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
126 char or symbol suitable for passing to event_matches_key_specifier_p.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
127 Outside of emacs, this can be anything: an X KeySym is a good idea.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
128 lwlib provides support functions for keyboard traversal of menus. Actual
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
129 implementation of those accelerators is up to the application.
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
130 */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
131 XtPointer accel;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
132 /* true if enabled */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
133 Boolean enabled;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
134 /* true if selected */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
135 Boolean selected;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
136 /* true if was edited (maintained by get_value) */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
137 Boolean edited;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
138 /* true if has changed (maintained by lw library) */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
139 change_type change;
444
576fb035e263 Import from CVS: tag r21-2-37
cvs
parents: 442
diff changeset
140 /* Contents of sub-widgets, also selected slot for checkbox */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
141 struct _widget_value* contents;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
142 /* data passed to callback */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
143 XtPointer call_data;
444
576fb035e263 Import from CVS: tag r21-2-37
cvs
parents: 442
diff changeset
144 /* next in the list of siblings */
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
145 struct _widget_value* next;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
146 /* slot for the toolkit dependent part. Always initialize to NULL. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
147 void* toolkit_data;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
148 /* tell us if we should free the toolkit data slot when freeing the
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
149 widget_value itself. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
150 Boolean free_toolkit_data;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
151
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
152 /* data defining a scrollbar; only valid if type == "scrollbar" */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
153 scrollbar_values *scrollbar_data;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
154
434
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
155 /* A reference counted arg structure. */
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
156 struct _widget_args *args;
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
157 /* we resource the widget_value structures; this points to the next
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
158 one on the free list if this one has been deallocated. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
159 struct _widget_value *free_list;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
160
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
161 } widget_value;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
162
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
163
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
164 typedef void (*lw_callback) (Widget w, LWLIB_ID id, XtPointer data);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
165
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
166 /* menu stuff */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
167 /* maybe this should go into a generic lwmenu.h */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
168
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
169 extern int lw_menu_active;
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
170
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
171 #if defined (LWLIB_MENUBARS_LUCID)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
172 #include "xlwmenu.h"
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
173 #define lw_set_menu xlw_set_menu
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
174 #define lw_push_menu xlw_push_menu
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
175 #define lw_pop_menu xlw_pop_menu
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
176 #define lw_set_item xlw_set_item
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
177 #define lw_map_menu xlw_map_menu
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
178 #define lw_display_menu xlw_display_menu
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
179 #define lw_kill_menus xlw_kill_menus
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
180 #define lw_get_entries xlw_get_entries
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
181 #define lw_menu_level xlw_menu_level
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
182 #else /* LWLIB_MENUBARS_LUCID */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
183 /* do this for the other toolkits too */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
184 #endif /* LWLIB_MENUBARS_LUCID */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
185
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
186 #if defined (LWLIB_TABS_LUCID)
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
187 #include "xlwtabs.h"
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
188 #endif
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
189
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
190 void lw_register_widget (const char* type, const char* name, LWLIB_ID id,
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
191 widget_value* val, lw_callback pre_activate_cb,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
192 lw_callback selection_cb,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
193 lw_callback post_activate_cb);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
194 Widget lw_get_widget (LWLIB_ID id, Widget parent, Boolean pop_up_p);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
195 Widget lw_make_widget (LWLIB_ID id, Widget parent, Boolean pop_up_p);
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
196 Widget lw_create_widget (const char* type, const char* name, LWLIB_ID id,
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
197 widget_value* val, Widget parent, Boolean pop_up_p,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
198 lw_callback pre_activate_cb,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
199 lw_callback selection_cb,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
200 lw_callback post_activate_cb);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
201 LWLIB_ID lw_get_widget_id (Widget w);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
202 int lw_map_widget_values (LWLIB_ID id, int (*mapfunc) (widget_value *value,
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
203 void *closure),
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
204 void *closure);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
205 void lw_modify_all_widgets (LWLIB_ID id, widget_value* val, Boolean deep_p);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
206 void lw_destroy_widget (Widget w);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
207 void lw_destroy_all_widgets (LWLIB_ID id);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
208 void lw_destroy_everything (void);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
209 void lw_destroy_all_pop_ups (void);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
210 Widget lw_raise_all_pop_up_widgets (void);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
211 widget_value* lw_get_all_values (LWLIB_ID id);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
212 Boolean lw_get_some_values (LWLIB_ID id, widget_value* val);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
213 void lw_pop_up_all_widgets (LWLIB_ID id);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
214 void lw_pop_down_all_widgets (LWLIB_ID id);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
215 void lw_add_value_args_to_args (widget_value* wv, ArgList addto, int* offset);
434
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
216 void lw_add_widget_value_arg (widget_value* wv, String name, XtArgVal value);
639
4b7d425dd3c2 [xemacs-hg @ 2001-07-28 05:08:58 by andyp]
andyp
parents: 450
diff changeset
217 XtArgVal lw_get_value_arg (widget_value* wv, String name);
434
9d177e8d4150 Import from CVS: tag r21-2-25
cvs
parents: 428
diff changeset
218 void lw_copy_widget_value_args (widget_value* copy, widget_value* val);
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
219 widget_value * copy_widget_value_tree (widget_value *val, change_type change);
428
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
220
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
221 widget_value *malloc_widget_value (void);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
222 void free_widget_value (widget_value *);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
223 void free_widget_value_tree (widget_value *wv);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
224 widget_value *replace_widget_value_tree (widget_value*, widget_value*);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
225
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
226 void lw_popup_menu (Widget, XEvent *);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
227
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
228 /* Toolkit independent way of focusing on a Widget at the Xt level. */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
229 void lw_set_keyboard_focus (Widget parent, Widget w);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
230
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
231 /* Silly Energize hack to invert the "sheet" button */
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
232 void lw_show_busy (Widget w, Boolean busy);
3ecd8885ac67 Import from CVS: tag r21-2-22
cvs
parents:
diff changeset
233
442
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
234 void lw_remove_accelerator_spec (char *val);
abe6d1db359e Import from CVS: tag r21-2-36
cvs
parents: 440
diff changeset
235
440
8de8e3f6228a Import from CVS: tag r21-2-28
cvs
parents: 434
diff changeset
236 #endif /* INCLUDED_lwlib_h_ */