Subversion Repositories Kolibri OS

Rev

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

Rev 7465 Rev 7489
Line 43... Line 43...
43 
 
 43 
 
44 
 
 44 
 
45 
  align 4
 45 
  align 4
- 
 
 46 
  .draw:
- 
 
 47 
        mcall   12, 1
- 
 
 48 
        mcall   48, 3, sc, 40
- 
 
 49 
        edit_boxes_set_sys_color edit_usr,editboxes_end,sc
46 
  .draw:
 50 
        mov     edx, 0x34000000
Line 47... Line 51...
47 
        mcall   12, 1
 51 
        or      edx, [sc.work]
Line 48... Line 52...
48 
        mcall   0, , , 0x34000000+SYS_COL, 0x805080DD, str_title
 52 
        mcall   0, , , , 0x805080DD, str_title
49 
 
 53 
 
Line 50... Line 54...
50 
		call    .draw_editboxes
 54 
		call    .draw_editboxes
- 
 
 55 
 
- 
 
 56 
        ; draw "connect" button
51 
 
 57 
        mcall   8, <162,65>, <150,25>, 2, [sc.work_button]
52 
        ; draw "connect" button
 58 
 
53 
        mcall   8, <162,65>, <150,25>, 2, BT_COL
 59 
        ; draw strings
54 
 
 60 
        mov     ecx, 0x90000000
55 
        ; draw strings
 61 
        or      ecx, [sc.work_text]
- 
 
 62 
        mcall   4, <3,      8>, , gui_str_usr
- 
 
 63 
        mcall    , <3,pad*1+8>, , gui_str_pass
- 
 
 64 
        mcall    , <3,pad*2+8>, , gui_str_server
56 
        mcall   4, <3,      8>, 0xb0000000, gui_str_usr
 65 
        mcall    , <3,pad*3+8>, , gui_str_port
- 
 
 66 
        mcall    , <3,pad*4+8>, , gui_str_path
57 
        mcall    , <3,pad*1+8>,           , gui_str_pass
 67
- 
 
 68 
		mov     ecx, 0x90000000
- 
 
 69 
        or      ecx, [sc.work_button_text]
58 
        mcall    , <3,pad*2+8>,           , gui_str_server
 70 
        mcall    , <167,155>, , gui_str_connect
Line 59... Line 71...
59 
        mcall    , <3,pad*3+8>,           , gui_str_port
 71
60 
        mcall    , <3,pad*4+8>,           , gui_str_path
 72 
		mcall    , <3,185>, 0xb0ff0000, [str_error_addr]
Line 88... Line 100...
88 
 
 100 
 
89 
        dec     ah
 101 
        dec     ah
Line 90... Line 102...
90 
        jz      .exit
 102 
        jz      .exit
91 
 
 103 
 
Line 92... Line 104...
92 
        dec     ah   ; 'Connect' button clicked
 104 
        dec     ah   ; 'Connect' button clicked
Line 93... Line 105...
93 
        jz      gui.main
 105 
        jz      .connect
94 
 
 106 
 
Line 95... Line 107...
95 
        jmp     .still
 107 
        jmp     .still
96 
 
 108 
 
Line 97... Line 109...
97 
  .key:
 109 
  .key:
98 
        mcall   2
 110 
        mcall   2
Line 99... Line 111...
99 
 
 111 
 
Line 109... Line 121...
109 
        stdcall [edit_box_key], edit_port
 121 
        stdcall [edit_box_key], edit_port
110 
        stdcall [edit_box_key], edit_path
 122 
        stdcall [edit_box_key], edit_path
Line 111... Line 123...
111 
 
 123 
 
Line -... Line 124...
- 
 
 124 
        jmp     .still
- 
 
 125
- 
 
 126 
  .connect:
- 
 
 127 
        cmp     [param_server_addr], 0
- 
 
 128 
		jne     gui.main
- 
 
 129
- 
 
 130 
        mov     [str_error_addr], gui_str_no_srvr
112 
        jmp     .still
 131 
        jmp     .redraw
113 
 
 132
114 
  .error:
 133 
  .error:
Line 115... Line 134...
115 
        mov     [str_error_addr], gui_str_error
 134 
        mov     [str_error_addr], gui_str_error
Line 161... Line 180...
161 
gui_str_usr     db 'Username:',0
 180 
gui_str_usr     db 'Username:',0
162 
gui_str_pass    db 'Password:',0
 181 
gui_str_pass    db 'Password:',0
163 
gui_str_server  db 'Server:',0
 182 
gui_str_server  db 'Server:',0
164 
gui_str_port    db 'Port:',0
 183 
gui_str_port    db 'Port:',0
165 
gui_str_path    db 'Path:',0
 184 
gui_str_path    db 'Path:',0
166 
gui_str_error   db 'ERROR! Check log file for details',0
 185 
gui_str_error   db 'Error! Check log file for details',0
- 
 
 186 
gui_str_no_srvr db 'Error! Please set server adress',0
167 
gui_str_null    db ' ',0
 187 
gui_str_null    db ' ',0
Line 168... Line 188...
168 
 
 188 
 
Line 169... Line 189...
169 
str_error_addr  dd gui_str_null
 189 
str_error_addr  dd gui_str_null
170 
 
 190 
 
171 
; login window components
 191 
; login window components
172 
edit_usr    edit_box 300,75,5,      0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_user,mouse_dd,ed_focus
 192 
edit_usr    edit_box 300,75,5,      0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_user,mouse_dd,ed_focus
173 
edit_pass   edit_box 300,75,pad+5,  0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_password,mouse_dd,ed_pass
 193 
edit_pass   edit_box 300,75,pad+5,  0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_password,mouse_dd,ed_pass
174 
edit_server edit_box 300,75,pad*2+5,0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_server_addr,mouse_dd,0
 194 
edit_server edit_box 300,75,pad*2+5,0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_server_addr,mouse_dd,0
- 
 
 195 
edit_port   edit_box 50, 75,pad*3+5,0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_port,mouse_dd,ed_figure_only
Line 175... Line 196...
175 
edit_port   edit_box 50, 75,pad*3+5,0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_port,mouse_dd,ed_figure_only
 196 
edit_path   edit_box 300,75,pad*4+5,0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_path,mouse_dd,0
176 
edit_path   edit_box 300,75,pad*4+5,0xffffff,0x94AECE,0,0xAABBCC,0x10000000,99,param_path,mouse_dd,0
 197 
editboxes_end: