3 * Read the file COPYING
7 * Full author contact details are available in file CREDITS
13 #pragma implementation
17 #include "xforms_helpers.h"
19 #include FORMS_H_LOCATION
24 #ifndef CXX_GLOBAL_CSTD
33 extern "C" void C_CompletedCB(FL_OBJECT * ob, long)
35 DropDown * d = static_cast<DropDown*>(ob->u_vdata);
40 extern "C" int C_PeekCB(FL_FORM * form, void *xev)
42 DropDown * d = static_cast<DropDown*>(form->u_vdata);
43 return d->peek(static_cast<XEvent*>(xev));
49 DropDown::DropDown(FL_OBJECT * ob)
51 form_ = fl_bgn_form(FL_NO_BOX, ob->w, 100);
52 fl_add_box(FL_UP_BOX, 0, 0, ob->w, 100, "");
53 browser_ = fl_add_browser(FL_SELECT_BROWSER, 0, 0, ob->w, 100, "");
54 form_->u_vdata = this;
55 browser_->u_vdata = this;
56 fl_set_object_callback(browser_, C_CompletedCB, 0);
57 fl_register_raw_callback(form_, KeyPressMask|ButtonPressMask, C_PeekCB);
70 void DropDown::select(vector<string> const & choices, int x, int y, int w)
75 fl_set_form_geometry(form_, x, y - 100, w, 100);
76 fl_clear_browser(browser_);
78 vector<string>::const_iterator cit = choices.begin();
79 vector<string>::const_iterator end = choices.end();
80 for (; cit != end; ++cit) {
81 fl_add_browser_line(browser_, cit->c_str());
83 fl_select_browser_line(browser_, 1);
84 fl_show_form(form_, FL_PLACE_POSITION, FL_NOBORDER, "");
85 XGrabPointer(fl_get_display(), form_->window, false,
86 ButtonPressMask | ButtonReleaseMask | PointerMotionMask,
87 GrabModeAsync, GrabModeAsync, 0, 0, 0);
88 XFlush(fl_get_display());
92 void DropDown::line_up()
94 if (fl_get_browser(browser_) > 1)
95 fl_select_browser_line(browser_, fl_get_browser(browser_) - 1);
96 if (fl_get_browser(browser_) >= fl_get_browser_topline(browser_) +
97 fl_get_browser_screenlines(browser_))
98 fl_set_browser_topline(browser_, fl_get_browser(browser_)
99 - fl_get_browser_screenlines(browser_) + 1);
100 if (fl_get_browser(browser_) < fl_get_browser_topline(browser_))
101 fl_set_browser_topline(browser_, fl_get_browser(browser_));
105 void DropDown::line_down()
107 if (fl_get_browser(browser_) < fl_get_browser_maxline(browser_))
108 fl_select_browser_line(browser_, fl_get_browser(browser_) + 1);
109 if (fl_get_browser(browser_) >= fl_get_browser_topline(browser_) +
110 fl_get_browser_screenlines(browser_))
111 fl_set_browser_topline(browser_, fl_get_browser(browser_)
112 - fl_get_browser_screenlines(browser_) + 1);
113 if (fl_get_browser(browser_) < fl_get_browser_topline(browser_))
114 fl_set_browser_topline(browser_, fl_get_browser(browser_));
118 int DropDown::peek(XEvent * xev)
121 unsigned int keymask;
123 fl_get_mouse(&x, &y, &keymask);
125 if (xev->type == ButtonPress) {
126 if (!(x >= form_->x && x <= (form_->x + form_->w) &&
127 y >= form_->y && y << (form_->y + form_->h))) {
131 XUngrabPointer(fl_get_display(), CurrentTime);
132 } else if (xev->type == KeyPress) {
133 char s_r[10]; s_r[9] = '\0';
134 KeySym keysym_return;
135 XLookupString(&xev->xkey, s_r, 10, &keysym_return, 0);
136 switch (keysym_return) {
156 fl_deselect_browser(browser_);
160 // FIXME: if someone has a got a way to
161 // convince the event to fall back to the
162 // minibuffer, I'm glad to hear it.
163 // fl_XPutBackEvent() doesn't work.
165 // This is a bit less elegant perhaps, but works
166 // well enough. Angus 11 Jan 2002
167 if (s_r[0] && isprint(s_r[0])) {
177 void DropDown::completed()
179 XUngrabPointer(fl_get_display(), CurrentTime);
181 result(getString(browser_));
185 void DropDown::key_pressed(char c)
187 XUngrabPointer(fl_get_display(), CurrentTime);