1 /*
2 * This file is part of XForms.
3 *
4 * XForms is free software; you can redistribute it and/or modify it
5 * under the terms of the GNU Lesser General Public License as
6 * published by the Free Software Foundation; either version 2.1, or
7 * (at your option) any later version.
8 *
9 * XForms is distributed in the hope that it will be useful, but
10 * WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
13 *
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with XForms; see the file COPYING. If not, write to
16 * the Free Software Foundation, 59 Temple Place - Suite 330, Boston,
17 * MA 02111-1307, USA.
18 */
19
20
21 /* This demo shows the different types of sliders */
22
23 #ifdef HAVE_CONFIG_H
24 #include "config.h"
25 #endif
26
27 #include "include/forms.h"
28
29
30 FL_FORM *form;
31 FL_OBJECT *exitobj;
32
33
34 /***************************************
35 ***************************************/
36
37 void
create_form_form(void)38 create_form_form( void )
39 {
40 FL_OBJECT *obj;
41
42 form = fl_bgn_form( FL_NO_BOX, 780, 320 );
43
44 obj = fl_add_box( FL_UP_BOX, 0, 0, 780, 320, "" );
45 fl_set_object_color( obj, FL_PALEGREEN, FL_COL1 );
46
47 obj = fl_add_box( FL_SHADOW_BOX, 20, 30, 360, 270, "SLIDER" );
48 fl_set_object_color( obj, FL_SLATEBLUE, 47 );
49 fl_set_object_lalign( obj, FL_ALIGN_TOP );
50 fl_set_object_lstyle( obj, FL_BOLD_STYLE );
51
52 obj = fl_add_box( FL_SHADOW_BOX, 390, 30, 370, 270, "VALSLIDER" );
53 fl_set_object_color( obj, FL_SLATEBLUE, FL_COL1 );
54 fl_set_object_lalign( obj, FL_ALIGN_TOP );
55 fl_set_object_lstyle( obj, FL_BOLD_STYLE );
56
57 obj = fl_add_slider( FL_VERT_SLIDER, 30, 50, 40, 220, "vert" );
58 fl_set_object_color( obj, FL_INDIANRED, FL_PALEGREEN );
59 fl_set_slider_mouse_buttons( obj, 7 );
60
61 obj = fl_add_slider( FL_VERT_FILL_SLIDER, 80, 50, 40, 220, "vert_fill" );
62 fl_set_object_color( obj, FL_INDIANRED, FL_PALEGREEN );
63
64 obj = fl_add_slider( FL_HOR_SLIDER, 180, 50, 195, 40, "hor" );
65 fl_set_object_color( obj, FL_INDIANRED, FL_PALEGREEN );
66
67 obj = fl_add_slider( FL_HOR_FILL_SLIDER, 180, 110, 190, 40, "hor_fill" );
68 fl_set_object_color( obj, FL_INDIANRED, FL_PALEGREEN );
69
70 obj = fl_add_valslider( FL_VERT_NICE_SLIDER, 610, 50, 30, 220,
71 "vert_nice" );
72 fl_set_object_boxtype( obj, FL_FLAT_BOX );
73 fl_set_object_color( obj, FL_SLATEBLUE, FL_INDIANRED );
74
75 obj = fl_add_valslider( FL_VERT_FILL_SLIDER, 660, 50, 40, 220,
76 "vert_fill" );
77 fl_set_object_color( obj, FL_INDIANRED, FL_PALEGREEN );
78
79 obj = fl_add_valslider( FL_HOR_SLIDER, 400, 50, 190, 40, "hor" );
80 fl_set_object_color( obj, FL_INDIANRED, FL_PALEGREEN );
81
82 obj = fl_add_valslider( FL_HOR_FILL_SLIDER, 400, 110, 190, 40, "hor_fill" );
83 fl_set_object_color( obj, FL_INDIANRED, FL_PALEGREEN );
84
85 fl_add_valslider( FL_HOR_BROWSER_SLIDER, 400, 220, 190, 25, "hor_browser" );
86
87 exitobj = obj = fl_add_button( FL_NORMAL_BUTTON, 450, 260, 100, 30,
88 "Exit" );
89 fl_set_object_color( obj, FL_INDIANRED, FL_RED );
90
91 obj = fl_add_slider( FL_VERT_NICE_SLIDER, 130, 50, 30, 220, "vert_nice" );
92 fl_set_object_boxtype( obj, FL_FLAT_BOX );
93 fl_set_object_color( obj, FL_SLATEBLUE, FL_INDIANRED );
94
95 obj = fl_add_slider( FL_HOR_NICE_SLIDER, 180, 170, 190, 30, "hor_nice" );
96 fl_set_object_boxtype( obj, FL_FLAT_BOX );
97 fl_set_object_color( obj, FL_SLATEBLUE, FL_INDIANRED );
98
99 fl_add_slider( FL_HOR_BROWSER_SLIDER, 180, 220, 190, 25, "hor_browser" );
100
101 obj = fl_add_valslider( FL_HOR_NICE_SLIDER, 400, 170, 190, 30, "hor_nice" );
102 fl_set_object_boxtype( obj, FL_FLAT_BOX );
103 fl_set_object_color( obj, FL_SLATEBLUE, FL_INDIANRED );
104
105 obj = fl_add_valslider( FL_VERT_SLIDER, 710, 50, 40, 220, "vert" );
106 fl_set_object_color( obj, FL_INDIANRED, FL_PALEGREEN );
107
108 fl_end_form( );
109 }
110
111
112 /***************************************
113 ***************************************/
114
115 int
main(int argc,char * argv[])116 main( int argc,
117 char * argv[ ] )
118 {
119 FL_OBJECT *obj;
120
121 fl_initialize( &argc, argv, "FormDemo", 0, 0 );
122 create_form_form( );
123
124 fl_show_form( form, FL_PLACE_CENTER | FL_FREE_SIZE, FL_FULLBORDER,
125 "All Sliders" );
126
127 do
128 obj = fl_do_forms( );
129 while ( obj != exitobj );
130
131 fl_hide_form( form );
132
133 return 0;
134 }
135
136
137 /*
138 * Local variables:
139 * tab-width: 4
140 * indent-tabs-mode: nil
141 * End:
142 */
143