Subversion Repositories Kolibri OS

Rev

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

Rev 9197 Rev 9208
Line 38... Line 38...
38
		blur_border_color,
38
		blur_border_color,
39
		text_color*,
39
		text_color*,
40
		max: INTEGER;
40
		max: INTEGER;
41
		text*: INTEGER;
41
		text*: INTEGER;
42
		mouse_variable: tEditBox;
42
		mouse_variable: tEditBox;
43
		flags*,
43
		flags*: SET;
Line 44... Line 44...
44
 
44
 
45
		size,
45
		size,
46
		pos: INTEGER;
46
		pos: INTEGER;
47
		(* The following struct members are not used by the users of API *)
47
		(* The following struct members are not used by the users of API *)
Line 127... Line 127...
127
    new_textbox.text_color := 0;
127
    new_textbox.text_color := 0;
128
    new_textbox.max := max_chars;
128
    new_textbox.max := max_chars;
129
    new_textbox.text := KOSAPI.malloc(max_chars + 2);
129
    new_textbox.text := KOSAPI.malloc(max_chars + 2);
130
    ASSERT(new_textbox.text # 0);
130
    ASSERT(new_textbox.text # 0);
131
    new_textbox.mouse_variable := editbox_interlock;
131
    new_textbox.mouse_variable := editbox_interlock;
132
    new_textbox.flags := 0
132
    new_textbox.flags := {}
Line 133... Line 133...
133
 
133
 
134
    RETURN new_textbox
134
    RETURN new_textbox