Subversion Repositories Kolibri OS

Rev

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

Rev 1464 Rev 1467
Line 24... Line 24...
24 
  tc dd ?   ; +10 ¢à¥¬. ᮧ¤ ­¨ï
 24 
  tc dd ?   ; +10 ¢à¥¬. ᮧ¤ ­¨ï
25 
  td dd ?   ; +14 ¢à¥¬. 㤠«¥­¨ï
 25 
  td dd ?   ; +14 ¢à¥¬. 㤠«¥­¨ï
26 
ends
 26 
ends
Line 27... Line 27...
27 
 
 27 
 
28 
 
 28 
 
Line 29... Line 29...
29 
hed db 'TextEditor 17.05.10',0 ;¯®¤¯¨áì ®ª­ 
 29 
hed db 'TextEditor 27.05.10',0 ;¯®¤¯¨áì ®ª­ 
30 
sc system_colors
 30 
sc system_colors
31 
 
 31 
 
Line 124... Line 124...
124 
 
 124 
 
125 
;description:
 125 
;description:
126 
; äã­ªæ¨ï ®âªàëâ¨ï ä ©«  á ¢®§¬®¦­ë¬ ®ª­®¬ á®®¡é¥­¨ï (® ¢®§¬®¦­®á⨠®â¬¥­¨âì ®âªàë⨥)
 126 
; äã­ªæ¨ï ®âªàëâ¨ï ä ©«  á ¢®§¬®¦­ë¬ ®ª­®¬ á®®¡é¥­¨ï (® ¢®§¬®¦­®á⨠®â¬¥­¨âì ®âªàë⨥)
127 
align 4
 127 
align 4
128 
ted_but_open_file:
 128 
ted_but_open_file:
- 
 
 129 
	pushad
129 
	push eax ebx
 130 
 
130 
	stdcall [ted_can_save], tedit0
 131 
	stdcall [ted_can_save], tedit0
131 
	cmp al,1
 132 
	cmp al,1
132 
	jne @f
 133 
	jne @f
133 
		stdcall [mb_create],msgbox_5,thread ;message: save changes in file?
 134 
		stdcall [mb_create],msgbox_5,thread ;message: save changes in file?
134 
		stdcall [mb_setfunctions],msgbox_5_funct
 135 
		stdcall [mb_setfunctions],msgbox_5_funct
135 
		jmp .ret_f
 136 
		jmp .ret_f
- 
 
 137 
	@@:
- 
 
 138 
 
- 
 
 139 
	copy_path open_dialog_name,sys_path,file_name,0
- 
 
 140 
	mov [OpenDialog_data.type],0
- 
 
 141 
	start_OpenDialog OpenDialog_data
- 
 
 142 
	cmp [OpenDialog_data.status],2
- 
 
 143 
	jne @f
- 
 
 144 
		stdcall [mb_create],msgbox_9,thread ;message: error run 'open file dialog'
- 
 
 145 
		jmp .ret_f
- 
 
 146 
	@@:
- 
 
 147 
	mov esi,[OpenDialog_data.openfile_path]
- 
 
 148 
	call strlen
- 
 
 149 
	mov [edit1.size],eax
- 
 
 150 
	mov [edit1.pos],eax
136 
	@@:
 151 
	stdcall [edit_box_draw], edit1
137 
	stdcall [ted_open_file], tedit0,run_file_70,[edit1.text]
 152 
	stdcall [ted_open_file], tedit0,run_file_70,[edit1.text]
138 
	call ted_messages_after_open_file
 153 
	call ted_messages_after_open_file
139 
	.ret_f:
 154 
	.ret_f:
140 
	pop ebx eax
 155 
	popad
Line 141... Line 156...
141 
	ret
 156 
	ret
142 
 
 157 
 
143 
;input:
 158 
;input: