Рекурсия
Отрывок из книги
{ 96 } then { 97 } begin { 98 } inc(CCount); // + 1 в счетчик { 99 } Items.Delete(i); { 100 } end; { 101 } end; { 102 } if Items.Count = 0 { 103 } then ShowMessage('Удалено ' + IntToStr(CCount) +' папок.') { 104 } else ShowMessage('Не могу удалить '+intToStr(Items.Count)+' папок'); { 105 } end; { 106 } end; { 107 } { 108 } end. // конец кода Скопируй сей текст в какой либо файл и давай на него посмотрим.
|go| Готово. У матросов есть вопросов. Я понял, почему ты переназвал функцию ScanEmtyDir, но почему наименование счетчика сменилось на Ccount |t_| Сменил, чтобы не было конфликта имен с списком CheckListBox1, тут я немного схалтурил, рекомендуется давать осмысленные имена, ну бывает, поленился. |go| Я не понял эти строки: { 54 } with Form1.CheckListBox1 do { 55 } Checked[Items.Add(Target+'\'+ SR.Name)] := true;
|t_| Это можно было бы написать более подробно (и более понятно)
Комментарии:
Популярные книги
Гримуар тёмного лорда I
Фантастика
:фэнтези
,попаданцы
,аниме
.
5.00
рейтинг книги
Кодекс Охотника. Книга ХХХ
30. Кодекс Охотника
Фантастика
:попаданцы
,аниме
,фэнтези
.
5.00
рейтинг книги
Адвокат империи
1. Адвокат империи
Фантастика
:городское фэнтези
,попаданцы
,фэнтези
.
5.75
рейтинг книги
Инженер Петра Великого 2
2. Инженер Петра Великого
Фантастика
:попаданцы
,альтернативная история
,фэнтези
.
5.00
рейтинг книги
Бракованная невеста. Академия драконов
Фантастика
:фэнтези
,сказочная фантастика
.
5.00
рейтинг книги
Изгой Проклятого Клана. Том 6
6. Изгой
Фантастика
:аниме
,фэнтези
,фантастика: прочее
,попаданцы
.
5.00
рейтинг книги
Паладин из прошлого тысячелетия
1. Соприкосновение миров
Фантастика
:боевая фантастика
,попаданцы
.
6.25
рейтинг книги
Симфония теней
3. Хроники геноцида
Фантастика
:попаданцы
,фэнтези
.
5.00
рейтинг книги
Мастер 7
7. Мастер
Фантастика
:фэнтези
,боевая фантастика
,попаданцы
,технофэнтези
,аниме
.
5.00
рейтинг книги
Вперед в прошлое 6
6. Вперед в прошлое
Фантастика
:попаданцы
,альтернативная история
.
5.00
рейтинг книги
Газлайтер. Том 26
26. История Телепата
Фантастика
:боевая фантастика
,попаданцы
,аниме
.
5.00
рейтинг книги
Имя нам Легион. Том 6
6. Меж двух миров
Фантастика
:боевая фантастика
,рпг
,аниме
.
5.00
рейтинг книги
На границе империй. Том 10. Часть 1
Вселенная EVE Online
Фантастика
:космическая фантастика
,попаданцы
.
5.00
рейтинг книги
Газлайтер. Том 3
3. История Телепата
Фантастика
:попаданцы
,альтернативная история
,аниме
.
5.00
рейтинг книги
Тайны затерянных звезд. Том 2
2. Тайны затерянных звезд
Фантастика
:боевая фантастика
,космическая фантастика
,космоопера
,фэнтези
.
5.00
рейтинг книги
Имя нам Легион. Том 18
18. Меж двух миров
Фантастика
:боевая фантастика
,рпг
,аниме
.
5.00
рейтинг книги
Имя нам Легион. Том 1
1. Меж двух миров
Фантастика
:боевая фантастика
,рпг
,аниме
.
5.00