[mlalx213]

Ребята помогите пожалуйста! У меня такая задача: в папке нахотится неизвестное количество папок, а в каждой из папок по одному текстоваму файлу, нужно написать программу которая будет вставлять шапку и концовку в каждый текстовый файл, и искать в каждом из них слово worm, при обнаружении данного слова выводить на экран имя текстового файла. Сам данную программу написал, но так как изучаю Delphi 2ой месяц, не очень нравится как она работает. Приведите, пожалуйста, свои примеры данной программы, буду очень благодарен.