Subversion Repositories Kolibri OS

Rev

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

Rev 7575 Rev 7576
Line 67... Line 67...
67
	jl .test_lib_open
67
	jl .test_lib_open
Line 68... Line 68...
68
 
68
 
69
;---------------------------------------------------------------------
69
;---------------------------------------------------------------------
70
	stdcall [ted_init], tedit0
70
	stdcall [ted_init], tedit0
-
 
71
	stdcall [tl_data_init], tree1
Line 71... Line 72...
71
	stdcall [tl_data_init], tree1
72
	option_boxes_set_sys_color sc,opt_grlist1
72
 
73
 
Line 73... Line 74...
73
; OpenDialog initialisation
74
; OpenDialog initialisation
Line 236... Line 237...
236
		ret
237
		ret
237
	@@:
238
	@@:
238
		stdcall [ted_mouse], tedit0
239
		stdcall [ted_mouse], tedit0
239
	.no_edit:
240
	.no_edit:
Line -... Line 241...
-
 
241
 
240
 
242
	;¯à®¢¥àª  ¡®ª®¢ëå ¯ ­¥«¥©
241
	cmp byte[tedit0.panel_id],TED_PANEL_FIND ;if not panel
243
	cmp byte[tedit0.panel_id],TED_PANEL_FIND
242
	jne @f
244
	jne @f
-
 
245
		stdcall [edit_box_mouse], edit2
243
		stdcall [edit_box_mouse], edit2
246
		stdcall [option_box_mouse], opt_grlist1
-
 
247
	@@:
-
 
248
	cmp byte[tedit0.panel_id],TED_PANEL_REPLACE
-
 
249
	jne @f
-
 
250
		stdcall [edit_box_mouse], edit2
-
 
251
		stdcall [edit_box_mouse], edit1
-
 
252
		stdcall [option_box_mouse], opt_grlist1
244
	@@:
253
	@@:
245
	cmp byte[tedit0.panel_id],TED_PANEL_SYNTAX ;if not panel
254
	cmp byte[tedit0.panel_id],TED_PANEL_SYNTAX
246
	jne @f
255
	jne @f
247
		stdcall [tl_mouse], tree1
256
		stdcall [tl_mouse], tree1
248
	@@:
257
	@@:
249
	ret
258
	ret
Line 287... Line 296...
287
 
296
 
288
	mcall SF_SYSTEM_GET,SSF_KEYBOARD_LAYOUT,,conv_tabl ;26.2 ¯®«ãç¨âì à áª« ¤ªã ª« ¢¨ âãàë
297
	mcall SF_SYSTEM_GET,SSF_KEYBOARD_LAYOUT,,conv_tabl ;26.2 ¯®«ãç¨âì à áª« ¤ªã ª« ¢¨ âãàë
289
	mcall SF_GET_KEY
298
	mcall SF_GET_KEY
Line -... Line 299...
-
 
299
	stdcall [tl_key], tree1
-
 
300
 
-
 
301
	test word [edit1.flags],10b ;ed_focus ;¥á«¨ ­¥ ¢ 䮪ãá¥, ¢ë室¨¬
-
 
302
	je @f
-
 
303
		cmp ah,0x80 ;if key up
-
 
304
		ja still
-
 
305
		cmp ah,42 ;[Shift] (left)
-
 
306
		je still
-
 
307
		cmp ah,54 ;[Shift] (right)
-
 
308
		je still
-
 
309
		cmp ah,56 ;[Alt]
-
 
310
		je still
-
 
311
		cmp ah,29 ;[Ctrl]
-
 
312
		je still
-
 
313
		cmp ah,69 ;[Pause Break]
-
 
314
		je still
-
 
315
 
-
 
316
		stdcall KeyConvertToASCII, conv_tabl
-
 
317
		stdcall [edit_box_key], edit1
290
	stdcall [tl_key], tree1
318
		jmp still
291
 
319
	@@:
292
	test word [edit2.flags],10b;ed_focus ; ¥á«¨ ­¥ ¢ 䮪ãá¥, ¢ë室¨¬
320
	test word [edit2.flags],10b ;ed_focus ;¥á«¨ ­¥ ¢ 䮪ãá¥, ¢ë室¨¬
293
	je @f
321
	je @f
294
		cmp ah,0x80 ;if key up
322
		cmp ah,0x80 ;if key up
Line 311... Line 339...
311
 
339
 
312
	stdcall [ted_key], tedit0, conv_tabl,esi
340
	stdcall [ted_key], tedit0, conv_tabl,esi
Line 313... Line 341...
313
	jmp still
341
	jmp still
-
 
342
 
314
 
343
align 4
Line 315... Line 344...
315
align 4
344
edit1 edit_box TED_PANEL_WIDTH-1, 0, 20, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 300, buf_replace, mouse_dd, 0
Line 316... Line 345...
316
edit2 edit_box TED_PANEL_WIDTH-1, 0, 20, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 300, buf_find, mouse_dd, 0
345
edit2 edit_box TED_PANEL_WIDTH-1, 0, 20, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 300, buf_find, mouse_dd, 0
Line 374... Line 403...
374
	wnd_s_pos: ;¬¥áâ® ¤«ï ­ áâ஥ª áâ à⮢®© ¯®§¨æ¨¨ ®ª­ 
403
	wnd_s_pos: ;¬¥áâ® ¤«ï ­ áâ஥ª áâ à⮢®© ¯®§¨æ¨¨ ®ª­ 
375
		rq 1
404
		rq 1
376
	last_open_synt_file rb 32 ;¨¬ï ¯®á«¥¤­¥£® ¯®¤ª«î祭­®£® ä ©«  ᨭ⠪á¨á 
405
	last_open_synt_file rb 32 ;¨¬ï ¯®á«¥¤­¥£® ¯®¤ª«î祭­®£® ä ©«  ᨭ⠪á¨á 
377
	buf rb BUF_SIZE ;¡ãä¥à ¤«ï ª®¯¨à®¢ ­¨ï ¨ ¢áâ ¢ª¨
406
	buf rb BUF_SIZE ;¡ãä¥à ¤«ï ª®¯¨à®¢ ­¨ï ¨ ¢áâ ¢ª¨
378
	buf_find rb 302 ;¡ãä¥à ¤«ï ¯®¨áª  ⥪áâ 
407
	buf_find rb 302 ;¡ãä¥à ¤«ï ¯®¨áª  ⥪áâ 
-
 
408
	buf_replace rb 302 ;¡ãä¥à ¤«ï § ¬¥­ë ⥪áâ 
379
	sc system_colors
409
	sc system_colors
380
IncludeUGlobals
410
IncludeUGlobals
381
	align 16
411
	align 16
382
	procinfo process_information
412
	procinfo process_information
383
		rb 1024
413
		rb 1024