Subversion Repositories Kolibri OS

Rev

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

Rev 1619 Rev 1620
Line 336... Line 336...
336
 
336
 
337
		push dword [OpenDialog_data.filename_area]
337
		push dword [OpenDialog_data.filename_area]
338
		push dword edit1
338
		push dword edit1
Line -... Line 339...
-
 
339
		call dword [edit_box_set_text]
-
 
340
 
-
 
341
		push dword [OpenDialog_data.filename_area]
-
 
342
		push dword edit2
-
 
343
		call dword [edit_box_set_text]
-
 
344
 
-
 
345
		mov esi,[edit2.text]
-
 
346
		xor eax,eax
-
 
347
		cld
-
 
348
		.cycle:
-
 
349
			lodsb
-
 
350
			test eax,eax
-
 
351
			jnz .cycle
-
 
352
		sub esi,4
-
 
353
		cmp esi,[edit2.text]
-
 
354
		jle .short_fn
-
 
355
			mov byte[esi],0
-
 
356
			sub dword [edit2.size],4
-
 
357
			sub dword [edit2.pos],4
339
		call dword [edit_box_set_text]
358
		.short_fn:
340
 
359
 
-
 
360
		push dword edit1
-
 
361
		call dword [edit_box_draw]
341
		push dword edit1
362
		push dword edit2
342
		call dword [edit_box_draw]
363
		call dword [edit_box_draw]
343
		push dword edit3
364
		push dword edit3
344
		call dword [edit_box_draw]
365
		call dword [edit_box_draw]
345
	@@:
366
	@@: