Board.KolibriOS.org

Официальный форум KolibriOS
Текущее время: Вс мар 26, 2017 12:46 am

Часовой пояс: UTC+03:00




Начать новую тему  Ответить на тему  [ 3 сообщения ] 
Автор Сообщение
 Заголовок сообщения: GenFiles
СообщениеДобавлено: Пт июн 10, 2016 4:48 pm 
Не в сети

Зарегистрирован: Вс окт 30, 2011 6:43 pm
Сообщения: 905
Это для демонстрации работы ProgressBar.
Программа просто создаёт файлы в папке (edit1) в количестве (edit2).
Вложение:
GenFiles.kex [1.36 КБ]
44 скачивания

Исходник
Вложение:
GenFiles.asm [12.78 КБ]
38 скачиваний

Суть в этом месте
Спойлер: Показать
Код:
        mov    [pb.max], ecx
        mov    [pb.value], dword 0
; draw progressbar
        push   pb
        call   [progressbar_draw]
; ------------------------------------- ;
        cmp    [count], dword 0
        jz     .done
; SetCurrentDirectory
        mov    eax, 30
        mov    ebx, 1
        mov    ecx, [edit1.text]
        int    64
;
        mov    [status_string], dword sz_doing
        call   DrawStatus
.do:
        CreateNextFile
        test   eax, eax
        jnz    .error
; increase progress
        push   pb
        call   [progressbar_progress]
; CheckEvent
        mov    eax, 11
        int    64
        call   [eax * 4 + Events]
        dec    dword [count]
        jnz   .do
.done:
        mov    [status_string], dword sz_done
        call   DrawStatus
   ret
.error:
        mov    [status_string], dword sz_error
        call   DrawStatus
   ret


Скриншот во время работы:
Спойлер: Показать
Вложение:
GenerateFiles.PNG
GenerateFiles.PNG [ 31.49 КБ | 286 просмотров ]


Вот, кстати, такой баг обнаружился, иногда создаются файлы с неверными атрибутами, например, месяц ну никак не может быть равен 15. Проявляется примерно 1 из 10000.
Спойлер: Показать
Вложение:
15_04_16.png
15_04_16.png [ 75.66 КБ | 286 просмотров ]


Последний раз редактировалось 0CodErr Вт дек 20, 2016 2:32 pm, всего редактировалось 1 раз.

Вернуться к началу
 Заголовок сообщения: Re: GenFiles
СообщениеДобавлено: Пт окт 07, 2016 11:35 am 
Не в сети
Designer
Аватара пользователя

Зарегистрирован: Чт янв 25, 2007 3:33 pm
Сообщения: 4078
Спасибо за программу. Позволила обнаружить баг.
Залью на SVN.
P.S. Ссылка на тему висела в закладках браузера с июня, ждала моего возвращения :)

_________________
Через тернии к звездам


Вернуться к началу
 Заголовок сообщения: Re: GenFiles
СообщениеДобавлено: Пт окт 07, 2016 12:22 pm 
Не в сети
Designer
Аватара пользователя

Зарегистрирован: Чт янв 25, 2007 3:33 pm
Сообщения: 4078
Залил рев. #6573

Кроме этого:
- сделал поле путь активным по-умолчанию
- сделал то в поле количество можно вводить только цифры

Добавлю в автосборку. Наверное, на ISO.

_________________
Через тернии к звездам


Вернуться к началу
Показать сообщения за:  Поле сортировки  
Начать новую тему  Ответить на тему  [ 3 сообщения ] 

Часовой пояс: UTC+03:00


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и 1 гость


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Создано на основе phpBB® Forum Software © phpBB Limited
Русская поддержка phpBB