1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
|
/*
* This file is part of XForms.
*
* XForms is free software; you can redistribute it and/or modify it
* under the terms of the GNU Lesser General Public License as
* published by the Free Software Foundation; either version 2.1, or
* (at your option) any later version.
*
* XForms is distributed in the hope that it will be useful, but
* WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with XForms; see the file COPYING. If not, write to
* the Free Software Foundation, 59 Temple Place - Suite 330, Boston,
* MA 02111-1307, USA.
*
* Author: Jens Thoms Toerring <jt@toerring.de>
*/
/* This demo program is called "strange button" since the important
button used here doesn't really look like one. The program is
meant to demonstrate how one could use the ability to determine
on which character of the label of an object the mouse is on can
be used. Within the callback for the object this functionality is
used to modify the label in a useful way. (Mis-) Using a button
is necessary since a kind of object is needed that receives events
and thus can have callbacks (in principle also a box or frame might
do but they are static objects and thus can't have callbacks). */
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <stdlib.h>
#include "include/forms.h"
typedef struct {
FL_FORM * x;
void * vdata;
char * cdata;
long ldata;
FL_OBJECT * c;
} FD_x;
/***************************************
***************************************/
static void
ccb( FL_OBJECT * ob,
long data FL_UNUSED_ARG )
{
unsigned int button = fl_mouse_button( );
int idx = fl_get_label_char_at_mouse( ob );
char digit;
const char * label = fl_get_object_label( ob );
char * str;
/* If the mouse isn't over one of the digits return */
if ( idx == -1 )
return;
/* Get the digit it's on */
digit = label[ idx ];
/* Left button or sroll up increment the value of the digit (with wrap
around if we would get beyond '9') and right button and scroll down
reduce its value (again with wrap around if it would drop below '1') */
if ( button == FL_LEFT_MOUSE || button == FL_SCROLLUP_MOUSE )
{
if ( digit == '9' )
digit = '0';
else
++digit;
}
else if ( button == FL_RIGHT_MOUSE || button == FL_SCROLLDOWN_MOUSE)
{
if ( digit == '0' )
digit = '9';
else
--digit;
}
/* Make a copy of the label and replace the digit we want to change */
str = fl_strdup( label );
str[ idx ] = digit;
/* Set this as the new label and get rid of the memory we allocated */
fl_set_object_label( ob, str );
fl_free( str );
}
/***************************************
***************************************/
static FD_x *
create_form_x( void )
{
FL_OBJECT *obj;
FD_x *fdui = ( FD_x * ) fl_malloc( sizeof *fdui );
fdui->vdata = fdui->cdata = NULL;
fdui->ldata = 0;
fdui->x = fl_bgn_form( FL_FLAT_BOX, 170, 175 );
obj = fl_add_text( FL_NORMAL_TEXT, 20, 10, 150, 50,
"Click on the digits...\n(left or right button)" );
fl_set_object_lsize( obj, FL_NORMAL_SIZE );
/* Create a button that rather looks like an embossed box (but boxes
don't get events, so we need some object like a button that does. */
fdui->c = obj = fl_add_button( FL_TOUCH_BUTTON, 25, 65, 120, 40, "012345" );
fl_set_object_boxtype( obj, FL_EMBOSSED_BOX );
fl_set_object_color( obj, FL_YELLOW, FL_YELLOW );
fl_set_object_lstyle( obj, FL_FIXED_STYLE | FL_EMBOSSED_STYLE );
fl_set_object_lsize( obj, FL_LARGE_SIZE );
fl_set_object_callback( obj, ccb, 0 );
fl_set_button_mouse_buttons( obj, 1 | 4 | 8 | 16 );
fl_set_object_helper( obj, "May not look like a button but it's one...\n"
"(Also try the scroll wheel if you have.)" );
obj = fl_add_button( FL_RETURN_BUTTON, 50, 130, 70, 30, "Exit" );
fl_set_button_mouse_buttons( obj, 1 );
fl_end_form( );
/* Just to make sure the label fits completely into the button */
fl_adjust_form_size( fdui->x );
fdui->x->fdui = fdui;
return fdui;
}
/***************************************
***************************************/
int
main( int argc,
char * argv[ ] )
{
FD_x *fd_x;
fl_initialize( &argc, argv, 0, 0, 0 );
fd_x = create_form_x( );
fl_show_form( fd_x->x, FL_PLACE_CENTERFREE, FL_FULLBORDER,
"strange button" );
fl_do_forms( );
if ( fl_form_is_visible( fd_x->x ) )
fl_hide_form( fd_x->x );
fl_free( fd_x );
fl_finish( );
return 0;
}
/*
* Local variables:
* tab-width: 4
* indent-tabs-mode: nil
* End:
*/
|
