Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
3 / 3 / 0
Регистрация: 08.02.2013
Сообщений: 25

Просмотреть содержимое одного любого раздела файла

08.02.2013, 13:08. Показов 1225. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте!Помогите,пожалуйста,со следующей задачей:
Дан файл с текстовой информацией,состоящий из разделов.
Каждый раздел начинается с строкой заголовка вида <Раздел Имя_раздела> и заканчивается строкой вида <Конец Имя_раздела>, между которыми располагаются строки текста раздела.
Нужно написать программу,с помощью которой можно просмотреть содержимое одного любого раздела файла.
Как просмотреть содержимое всего файла-понятно,а как просмотреть содержимое определённого раздела?
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
08.02.2013, 13:08
Ответы с готовыми решениями:

Можно ли просмотреть содержимое класса TButton?
Можно ли просмотреть содержимое класса TButton? Его код в Delphi?

Нужно скопировать все содержимое одного файла (не текстового) F1 и вставить в файл F2 с добавлением
Нужна помощь - я еще новичок.. Нужно скопировать все содержимое одного файла (не текстового) F1 и вставить в файл F2 с добавлением.. ...

Как просмотреть содержимое папки на FTP сервере
Всем доброго дня! Разобрался с подключением к FTP серверу. Подскажите 1) Как просмотреть содержимое папки на FTP сервере (для...

3
 Аватар для Xotabu4
98 / 98 / 14
Регистрация: 02.02.2013
Сообщений: 328
08.02.2013, 16:09
Почитайте о Copy, Pos, Del.

Нужно парсить код, самый простой пример вот.
Delphi
1
2
3
4
5
//Сюда записываете фесь файл
origin:=S;
//Это уже парсите сам код. 
       origin:=copy(origin,pos('<Раздел Имя_раздела>',origin)+length('<Раздел Имя_раздела>'),length(origin));
       origin:=copy(origin,1,pos('<Конец Имя_раздела>',origin)-1);
1
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33393 / 21503 / 8236
Регистрация: 22.10.2011
Сообщений: 36,899
Записей в блоге: 12
08.02.2013, 16:31
Лучший ответ Сообщение было отмечено volvo как решение

Решение

Цитата Сообщение от Xotabu4 Посмотреть сообщение
Copy, Pos, Del.
идут лесом. Для решения подобной задачи используются регулярные выражения. В современных Дельфях они встроенные, в допотопных - TRegExpr в гугле.

TRegEx.Match решает эту задачу в одно движение:
Delphi
1
Origin := TRegEx.Match(string_in, '<Раздел Имя_раздела>(.*?)</Конец Имя_раздела>').Result('$1');
1
3 / 3 / 0
Регистрация: 08.02.2013
Сообщений: 25
08.02.2013, 20:30  [ТС]
Благодарю за помощь=)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
08.02.2013, 20:30
Помогаю со студенческими работами здесь

Просмотреть содержимое каталога, ввести с клавиатуры имя одного из файлов
Задание : просмотреть содержимое каталога, ввести с клавиатуры имя одного из файлов.Если этот файл имеет ненулевую длину, то вывести его...

Как программно из php-файла просмотреть содержимое dbf-файла на экране?
Перегнав содержимое из таблицы на mysql в dbf-файл,добавив дополнительно некоторую информацию в этот dbf подскажите как на экране...

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

Копировать содержимое одного указанного файла в другой указанный файл, дописывая, а не стирая его содержимое
Dragokas, Помогите пожалуйста с заданием! Задание 3. Написать командный файл, копирующий содержимое всех файлов, записанных в задании...

Заданы два текстовых файла. Дописать содержимое одного файла в конец другого
1.Заданы два текстовых файла.Дописать содержимое одного файла в конец другого 2.В файле содержится информация об учениках класса по такой...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Символьное дифференцирование
igorrr37 13.02.2026
/ * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru