Tinypad 4.0.4 (put filename of current tab into open/save dialog)

git-svn-id: svn://kolibrios.org@327 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Mihail Semenyako (mike.dld)
2007-02-08 00:34:56 +00:00
parent a79e7c4171
commit dfe81eb28d
5 changed files with 29 additions and 20 deletions

View File

@@ -146,7 +146,7 @@ endf
;-----------------------------------------------------------------------------
func load_file ;//////////////////////////////////////////////////////////////
;-----------------------------------------------------------------------------
cmp [tb_opensave.text],0
cmp [tb_opensave.length],0
jne @f
stc
ret
@@ -200,19 +200,23 @@ func load_file ;//////////////////////////////////////////////////////////////
jne @f
mov ebp,cur_editor
jmp .lp1
@@: call create_tab
@@: inc [do_not_draw]
call create_tab
dec [do_not_draw]
.lp1: push ecx esi edi
mov esi,tb_opensave.text
lea edi,[ebp+TABITEM.Editor.FilePath]
movzx ecx,[tb_opensave.length]
cld
rep movsb
mov byte[edi],0
lea edi,[ebp+TABITEM.Editor.FilePath]
movzx ecx,[tb_opensave.length]
@@: cmp byte[edi+ecx-1],'/'
je @f
dec ecx
jmp @b
inc ecx
@@: dec ecx
jz @f
cmp byte[edi+ecx-1],'/'
jne @b
@@: mov [ebp+TABITEM.Editor.FileName],ecx
call flush_cur_tab
pop edi esi ecx