]> git.lyx.org Git - lyx.git/blob - src/frontends/xforms/form_browser.C
controller-view split of FormLog and FormVCLog.
[lyx.git] / src / frontends / xforms / form_browser.C
1 // File modified by fdfix.sh for use by lyx (with xforms >= 0.88) and gettext
2 #include <config.h>
3 #include "lyx_gui_misc.h"
4 #include "gettext.h"
5
6 /* Form definition file generated with fdesign. */
7
8 #include FORMS_H_LOCATION
9 #include <stdlib.h>
10 #include "form_browser.h"
11 #include "FormBrowser.h"
12
13 FD_form_browser::~FD_form_browser()
14 {
15   if ( form->visible ) fl_hide_form( form );
16   fl_free_form( form );
17 }
18
19
20 FD_form_browser * FormBrowser::build_browser()
21 {
22   FL_OBJECT *obj;
23   FD_form_browser *fdui = new FD_form_browser;
24
25   fdui->form = fl_bgn_form(FL_NO_BOX, 470, 380);
26   fdui->form->u_vdata = this;
27   obj = fl_add_box(FL_UP_BOX, 0, 0, 470, 380, "");
28   fdui->browser = obj = fl_add_browser(FL_NORMAL_BROWSER, 10, 10, 450, 320, "");
29     fl_set_object_gravity(obj, FL_NorthWest, FL_SouthEast);
30   {
31     char const * const dummy = N_("Close|^[^M");
32     fdui->button_close = obj = fl_add_button(FL_NORMAL_BUTTON, 370, 340, 90, 30, idex(_(dummy)));
33     fl_set_button_shortcut(obj, scex(_(dummy)), 1);
34   }
35     fl_set_object_lsize(obj, FL_NORMAL_SIZE);
36     fl_set_object_gravity(obj, FL_SouthEast, FL_SouthEast);
37     fl_set_object_callback(obj, C_FormBaseCancelCB, 0);
38   {
39     char const * const dummy = N_("Update|#Uu");
40     fdui->button_update = obj = fl_add_button(FL_NORMAL_BUTTON, 270, 340, 90, 30, idex(_(dummy)));
41     fl_set_button_shortcut(obj, scex(_(dummy)), 1);
42   }
43     fl_set_object_lsize(obj, FL_NORMAL_SIZE);
44     fl_set_object_gravity(obj, FL_SouthEast, FL_SouthEast);
45     fl_set_object_callback(obj, C_FormBaseRestoreCB, 0);
46   fl_end_form();
47
48   fdui->form->fdui = fdui;
49
50   return fdui;
51 }
52 /*---------------------------------------*/
53