Subversion Repositories Kolibri OS

Rev

Rev 7447 | Rev 7806 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7447 Rev 7506
Line 84... Line 84...
84
//editbox flags
84
//editbox flags
85
#define ed_pass                        1b
85
#define ed_pass                        1b
86
#define ed_focus                      10b   //focused
86
#define ed_focus                      10b   //focused
87
#define ed_shift                     100b   //flag is set when Shift is pressed
87
#define ed_shift                     100b   //flag is set when Shift is pressed
88
#define ed_shift_on                 1000b
88
#define ed_shift_on                 1000b
89
#define ed_shift_bac               10000b   //bif for Shift reset, if set the smth is selected
89
#define ed_shift_bac               10000b   //bit for Shift reset, if set the smth is selected
90
#define ed_left_fl                100000b
90
#define ed_left_fl                100000b
91
#define ed_offset_fl             1000000b
91
#define ed_offset_fl             1000000b
92
#define ed_insert               10000000b
92
#define ed_insert               10000000b
93
#define ed_mouse_on            100000000b
93
#define ed_mouse_on            100000000b
94
#define ed_mous_adn_b          100011000b
94
#define ed_mouse_adn_b         100011000b
-
 
95
#define ed_disabled         100000000000b
95
#define ed_always_focus  100000000000000b
96
#define ed_always_focus  100000000000000b
96
#define ed_figure_only  1000000000000000b   //numbers only
97
#define ed_figure_only  1000000000000000b   //numbers only
97
#define ed_shift_cl     1111111111100011b
98
#define ed_shift_cl     1111111111100011b
98
#define ed_shift_mcl    1111111111111011b
99
#define ed_shift_mcl    1111111111111011b
99
#define ed_shift_off    1111111111111011b
100
#define ed_shift_off    1111111111111011b
Line 122... Line 123...
122
	offset,
123
	offset,
123
	cl_curs_x,
124
	cl_curs_x,
124
	cl_curs_y,
125
	cl_curs_y,
125
	shift,
126
	shift,
126
	shift_old,
127
	shift_old,
127
	ed_height,
128
	height,
128
	ed_char_width;
129
	char_width;
129
};
130
};
Line -... Line 131...
-
 
131
 
-
 
132
:void EditBox_UpdateText(dword ed, _flags)
-
 
133
{
-
 
134
	dword ed_text;
-
 
135
	ESI = ed;
-
 
136
	ESI.edit_box.offset = ESI.edit_box.shift = ESI.edit_box.shift_old = 0;
-
 
137
	ESI.edit_box.flags = _flags;
-
 
138
	ed_text = ESI.edit_box.text;
-
 
139
	ESI.edit_box.pos = ESI.edit_box.size = strlen(ed_text);
-
 
140
}
130
 
141
 
131
struct scroll_bar
142
struct scroll_bar
132
{
143
{
133
	word size_x,
144
	word size_x,
134
	start_x,
145
	start_x,