Разбить строку с разделителем на подстроки

@xaochuk · Регистрация: 25.04.2019

Студворк — интернет-сервис помощи студентам

Добрый день. Не могу понять как разбить строку на подстроки. Пример строки "08:00-09:35; 10:20-11:50; 13:00-14:25; ". За разделитель принять "; ". На форумах нашёл что многие делают это с помощью компонента StringList, но я в своей версии ПО такого не нашёл( И функцией strtok тоже ничего не вышло. Буду признателен за любые наводки на верный путь)

Добавлено через 18 минут
Есть необходимость вывести в Edit, 2 или 3 подстроку. Получается прочитать только первую подстроку

C++
1
2
3
char *time_char = time_to_change.c_str();
char * time_parsed = strtok(time_char,"; ");
Edit8->Text=time_parsed;

@nick42 · 24.07.2019, 20:39

В старых Билдерах приемлемо такое...

C++
1
2
3
4
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    Memo2->Lines->CommaText = Memo1->Text; 
}

@nick42 · 24.07.2019, 20:53

... в новых (и так правильней в вашем случае) - используя delimited (delimiter - ';').

Добавлено через 6 минут
P.S.

Сообщение от xaochuk

многие делают это с помощью компонента StringList, но я в своей версии...

Это не привычный компонент, вернее - не графический, чтоб его найти в палитре. Просто пишете:
TStringList *List = new TStringList; в частности это аналог Memo (списочная структура). А после разделения исходного текста на строки выбираете нужную...
Edit1->Text = List->Strings[1] - для второй строки; соотв. List->Strings[2] для третьей.

@D1973 · 25.07.2019, 07:19

Сообщение от xaochuk

я в своей версии ПО такого не нашёл

1. А в какой это "в своей"? Мы сами угадать должны?
2. TStringList, как уже сказал nick42, не компонент из палитры, а класс, производное из класса TStrings, описанный в модуле Classes.
3. Свойство Lines визуального компонента TMemo и ТStringList имеют одного и того же предка - класс TStrings, поэтому гораздо практичнее работать именно с невизуальным СтрингЛист-ом, при необходимости отображая данные из него в компоненте Мемо.
4. При создании СтрингЛист-а при помощи оператора new - не забывайте уничтожать его с помощью delete. Но если работа со СтрингЛистом предполагается только в какой-то одной определенной области видимости - практичнее использовать "умный указатель", это избавит Вас от необходимости чистить память за собой...
5. В итоге, код для решения Вашей задачи может быть таким:

C++
1
2
3
4
5
6
7
8
#include <memory> //если Вы будете использовать "умный указатель"
...
sts::auto_ptr<TStringList> L (new TStringList); //создание экземпляра класса TStringList с помощью "умного указателя"
//TStringList *L = new TStringList; - создание экземпляра класса TStringList без "умного указателя"
L->Delimiter = ';'; //установка значения символа-разделителя
L->DelimitedText = Memo1->Text; //занесение данных из Мемо1 с одновременной построчной разбивкой по разделителю
Edit1->Text = L->Strings[1]; //добавление второй строки СтрингЛист-а в Эдит
//delete L; - удаление СтрингЛист-а при отсутствии "умного указателя"

Новые блоги и статьи Все статьи Все блоги /
Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Programma_Boinc 01.01.2026 Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .

Разбить строку с разделителем на подстроки

Решение