|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
14.12.2017, 09:01 | #1 |
Пользователь
Регистрация: 29.06.2011
Сообщений: 56
|
Посчитать количество классов в программе
Нужно сделать программу-тестировщик, которая будет выводить количество классов в другой программе на delphi.
В программе указываешь папку с тестируемой программой, где есть расширение .pas, программа сканирует все файлы с этим расширением и выводит общее количество классов в тестируемой программе. С помощью каких компонентов/функций можно сделать выбор папки и прочтение всех файлов с одинаковым расширением в ней? Чтобы посчитать количество классов в файле, достаточно только посчитать сколько раз попадается слово class? |
14.12.2017, 09:19 | #2 | ||
Старожил
Регистрация: 20.04.2008
Сообщений: 5,515
|
Цитата:
(поиск)find(файлов)file(все)*(c одинаковым расширением).pas Цитата:
Код:
программа — запись алгоритма на языке понятном транслятору
Последний раз редактировалось evg_m; 14.12.2017 в 09:24. |
||
14.12.2017, 09:26 | #3 | |
Старожил
Регистрация: 17.11.2010
Сообщений: 19,042
|
Цитата:
Код:
Код:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Последний раз редактировалось Аватар; 14.12.2017 в 09:29. |
|
14.12.2017, 09:29 | #4 | ||
Старожил
Регистрация: 09.01.2008
Сообщений: 26,238
|
Цитата:
НО! но нужно обязательно учитывать синтаксис, искать слово class нужно целиком, искать желательно только в разделе type... обязательно делать синтаксический разбор кода, т.к. Код:
а это нет: Код:
Так что, по хорошему, без синтаксического анализатора не обойтись. Добавлено пока писал, уже без меня всё разжевали... ну и из той же серии Цитата:
Последний раз редактировалось Serge_Bliznykov; 14.12.2017 в 09:33. |
||
14.12.2017, 09:34 | #5 |
Цифровой кот
Старожил
Регистрация: 29.08.2014
Сообщений: 7,656
|
Какой дебил придумал эту задачу?
Сломай ему нос. Скажи - я разрешил. Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
|
14.12.2017, 10:02 | #6 |
Старожил
Регистрация: 16.05.2012
Сообщений: 3,211
|
Вот зря Вы так. У меня стояла реальная аналогичная задача, только в неё кроме классов ещё и функции/процедуры входили. В проекте на 50 тыщ строк
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
|
14.12.2017, 10:14 | #7 | |
Цифровой кот
Старожил
Регистрация: 29.08.2014
Сообщений: 7,656
|
Цитата:
Ненужная дебильная пустая работа! Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
|
|
14.12.2017, 10:57 | #8 | |
Старожил
Регистрация: 16.05.2012
Сообщений: 3,211
|
Цитата:
P.S. А что без картинки? Неужели подходящей по случаю не нашли?
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
|
|
14.12.2017, 11:05 | #9 | ||
Старожил
Регистрация: 20.04.2008
Сообщений: 5,515
|
Цитата:
Цитата:
а большой проект можно разложить и по вложенным папкам. а если в папке есть "'мусорные" unit (файлы не включенные в проект)? и наоборот есть файлы проекта, НО за пределами папки(директории)?
программа — запись алгоритма на языке понятном транслятору
|
||
17.12.2017, 23:14 | #10 |
Пользователь
Регистрация: 29.06.2011
Сообщений: 56
|
Всем спасибо, у меня появилась проблема: как сделать так, чтобы список выводимых файлов появлялся в Memo?
После выбора директории ничего не происходит. Код:
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
[VB] Нужно посчитать их количество | Никита222 | Помощь студентам | 3 | 22.10.2017 21:53 |
Можно ли посчитать количество строк в программе, зная только ее вес? | Olga_Mi | Помощь студентам | 3 | 06.10.2016 08:46 |
как посчитать количество | xauto-pro | Microsoft Office Excel | 6 | 23.08.2015 15:18 |
Посчитать количество | Aqil_f | Microsoft Office Excel | 6 | 11.03.2014 08:51 |
Посчитать количество слов | OPEJI | Паскаль, Turbo Pascal, PascalABC.NET | 5 | 19.05.2011 17:58 |