Цикл - HiAsm

Этот топик читают: Гость

Ответов: 8930

Рейтинг: 823

#16: 2011-12-27 10:08:26 ЛС | профиль | цитата

MBTY, коррекция схемы:
1. При каждой активации происходит добавление в список всех файлов из папки и этот список разбухает без нужды на каждом клике по иконке -- достаточно одного поиска на запуске программы.
2. В список попадают ВСЕ файлы из папки, в том числе и НЕ КАРТИНКИ -- надо поставить фильтр на поиске.

карма: 19

Разработчик

Ответов: 26163

Рейтинг: 2127

#17: 2011-12-27 10:19:01 ЛС | профиль | цитата

Леонид писал(а):

достаточно одного поиска на запуске программы.

Это неправильное решение. Файлы могут добавляться в любую папку и при запущенной проге. А по твоему получается так, что для перечитывания папки необходимо перезапустить прогу

карма: 22

Ответов: 70

Рейтинг: 1

#18: 2011-12-27 10:21:39 ЛС | профиль | цитата

упс... про 1 пункт да, видимо случайно спутал, когда создавал схему и не заметил. Спасибо.
Филтр настроил пока только на jpg, хотябы, но как была ошибка

так и осталась

карма: 0

Разработчик

Ответов: 26163

Рейтинг: 2127

#19: 2011-12-27 10:25:22 ЛС | профиль | цитата

MBTY, а вот список, перед обращением к перебору, чистить надо



Add(FileSearch,3509777,224,154)
{
 Dir="walls"
 link(onSearch,3752004:doAdd,[])
}
Add(StrList,3752004,280,154)
{
 Point(doGetString)
 Point(String)
}
Add(Hub,14106833,196,147)
{
 link(onEvent1,3752004:doClear,[(267,153)(267,167)])
 link(onEvent2,3509777:doSearch,[])
}

карма: 22

Ответов: 70

Рейтинг: 1

#20: 2011-12-27 10:27:47 ЛС | профиль | цитата

nesco, спасибо, за совет. А у Вас, если ХР, нормально отработала утилитка или тоже вылетела?

карма: 0

Разработчик

Ответов: 26163

Рейтинг: 2127

#21: 2011-12-27 10:30:12 ЛС | профиль | цитата

MBTY писал(а):

но как была ошибка
так и осталась

Отключи все от Strlist-a или отсоедени Desktop и проверь
------------ Дoбавленo в 10.30:

MBTY писал(а):

А у Вас, если ХР, нормально отработала утилитка или тоже вылетела?

У меня Семерка, проверить не на чем.

карма: 22

Ответов: 70

Рейтинг: 1

#22: 2011-12-27 10:36:40 ЛС | профиль | цитата

Если Desktop Отрубить, то всё работает. Ну и если его заменить скажем тем же ListBoxом, то список прекрасно заполняет перебраными картинками,
Walls1.jpg
Walls2.jpg
Walls3.jpg
Walls1.jpg
И так далее

карма: 0

Разработчик

Ответов: 26163

Рейтинг: 2127

#23: 2011-12-27 10:38:47 ЛС | профиль | цитата

MBTY, а при активации, сколько картинок туда пихается сразу

карма: 22

Ответов: 70

Рейтинг: 1

#24: 2011-12-27 10:47:30 ЛС | профиль | цитата

nesco, Ну если заменить StrList на ListBox, то при каждом нажатии список чистится и забивается полным набором один раз. Тоесть при активации туда пихается столько картинок, сколько есть в папке Walls

карма: 0

Разработчик

Ответов: 26163

Рейтинг: 2127

#25: 2011-12-27 10:53:52 ЛС | профиль | цитата

MBTY, не про список, я про Desktop

карма: 22

Ответов: 70

Рейтинг: 1

#26: 2011-12-27 10:58:20 ЛС | профиль | цитата

nesco, А. Одна за одно нажатие

карма: 0

Разработчик

Ответов: 26163

Рейтинг: 2127

#27: 2011-12-27 11:32:01 ЛС | профиль | цитата

Подведем итоги: отключаем компонент Desktop, остальное не трогаем -- выбросов нет, подключаем Desktop -- начинаются выбросы. Так, или не так

------------ Дoбавленo в 19.29:
Стоп, а компилируем чем -- FPC или Delphi

карма: 22

Ответов: 70

Рейтинг: 1

#28: 2011-12-27 11:39:46 ЛС | профиль | цитата

nesco, Итоги подведены верно. Именно так.
Компилирую Delphi, так как на FPC вылетает даже при первом нажатии на иконке, о проходе всего цикла Count и мечтать на FPC Не приходится. Ну и, опять таки, если на FPC отключить Desktop, то всё работает

карма: 0

Разработчик

Ответов: 26163

Рейтинг: 2127

#29: 2011-12-27 12:21:36 ЛС | профиль | цитата

Продолжим дальше, необходимо уточнить -- вылетает после загрузке списка файлов или только при клике

карма: 22

Ответов: 70

Рейтинг: 1

#30: 2011-12-27 12:29:04 ЛС | профиль | цитата

Вылетает при клике.
У меня появилась догадка, что виноваты сами картинки. Попробуйте, кому не в тягость протестировать именно с этим набором картинок http://rghost.ru/35623429
У меня подозрения на 004.jpg, потому как без нее цикл проходит без ошибок

карма: 0

Форумы Между деломЦикл ← Ctrl123Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)