Subversion Repositories Kolibri OS

Rev

Rev 6489 | Rev 6516 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
6479 siemargl 1
/*
2
    KolibriGUI demobox
3
    -Button
4
    -CheckBox
5
    -EditBox
6
    -Frame
7
 
8
    Free for all
9
 
10
    Initially written by ashmew2, 2015
11
 
12
    Updated by Siemargl, 2016
13
 
14
    ToDo
15
*/
16
 
17
#include 
18
#include 
19
#include 
6457 punk_joker 20
#include 
6391 ashmew2 21
 
22
int main()
23
{
6395 siemargl 24
  /* Load all libraries, initialize global tables like system color table and
6391 ashmew2 25
     operations table. kolibri_gui_init() will EXIT with mcall -1 if it fails
26
     to do it's job. This is all you need to call and all libraries and GUI
27
     elements can be used after a successful call to this function
28
  */
29
  kolibri_gui_init();
30
  /* Set gui_event to REDRAW so that window is drawn in first iteration  */
31
  unsigned int gui_event = KOLIBRI_EVENT_REDRAW;
6393 punk_joker 32
  oskey_t key;
6391 ashmew2 33
 
6491 punk_joker 34
  kolibri_window *main_window = kolibri_new_window(50, 50, 400, 120, "BoardMsg");
35
  check_box *checkbox = kolibri_new_check_box(20, 25, 12, 12, "Append BOARDMSG to entered message.");
6479 siemargl 36
 
37
  edit_box *editbox_interlock = NULL;
6491 punk_joker 38
  edit_box *textbox = kolibri_new_edit_box(20, 40, 40, &editbox_interlock);
39
  edit_box *textbox2 = kolibri_new_edit_box(20, 60, 30, &editbox_interlock);
40
  kolibri_button *button = kolibri_new_button(310, 40, 24, 14, 0x21, kolibri_color_table.color_work_button);
41
  frame *fr = kolibri_new_frame(X_Y(12, 350), X_Y(15, 70), 0x00FCFCFC, 0x00DCDCDC, "Frame Title", 0, kolibri_color_table.color_work_text, kolibri_color_table.color_work_area);
6395 siemargl 42
 
6391 ashmew2 43
  kolibri_window_add_element(main_window, KOLIBRI_EDIT_BOX, textbox);
6479 siemargl 44
  kolibri_window_add_element(main_window, KOLIBRI_EDIT_BOX, textbox2);
6391 ashmew2 45
  kolibri_window_add_element(main_window, KOLIBRI_CHECK_BOX, checkbox);
46
  kolibri_window_add_element(main_window, KOLIBRI_BUTTON, button);
6466 siemargl 47
  kolibri_window_add_element(main_window, KOLIBRI_FRAME, fr);
6489 siemargl 48
 
49
  (*edit_box_set_text)(textbox2, "Sample text very long to get shorted");
6395 siemargl 50
 
6397 siemargl 51
  extern volatile unsigned press_key;
6395 siemargl 52
 
6391 ashmew2 53
  do  /* Start of main activity loop */
54
    {
55
      if(gui_event == KOLIBRI_EVENT_REDRAW)
56
	{
57
	  kolibri_handle_event_redraw(main_window);
58
	}
59
      else if(gui_event == KOLIBRI_EVENT_KEY)
6395 siemargl 60
	{
6393 punk_joker 61
	  key = get_key();
62
	  switch (key.code)
63
	  {
64
		  case 13:
6397 siemargl 65
			if(checkbox -> flags & CHECKBOX_IS_SET) /* Append BoardMsg checkbox is set */
6393 punk_joker 66
				debug_board_write_str("BOARDMSG: ");
67
 
68
			debug_board_write_str(textbox->text);
69
			debug_board_write_str("\n");
70
			break;
71
	  }
72
	  press_key = key.val;
6397 siemargl 73
 
6391 ashmew2 74
	  kolibri_handle_event_key(main_window);
75
	}
76
      else if(gui_event == KOLIBRI_EVENT_BUTTON)
77
	{
78
	  unsigned int pressed_button = kolibri_button_get_identifier();
6393 punk_joker 79
	  switch (pressed_button)
80
	  {
81
		  case 0x21:
82
			if(checkbox -> flags & CHECKBOX_IS_SET) /* Append BoardMsg checkbox is set */
83
			debug_board_write_str("BOARDMSG: ");
84
			debug_board_write_str(textbox->text);
85
			debug_board_write_str("\n");
86
			break;
6457 punk_joker 87
	      case BUTTON_CLOSE:
6393 punk_joker 88
			kolibri_exit();
89
	  }
90
	 }
6391 ashmew2 91
      else if(gui_event == KOLIBRI_EVENT_MOUSE)
92
	{
93
	  kolibri_handle_event_mouse(main_window);
94
	}
95
 
6466 siemargl 96
    } while((gui_event = get_os_event())); /* End of main activity loop */
6391 ashmew2 97
 
98
  /* kolibri_quit(); */
99
 
100
  return 0;
101
}