Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
1 / 1 / 0
Регистрация: 30.04.2012
Сообщений: 54

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

05.05.2012, 15:01. Показов 1885. Ответов 10
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Нужна помощь в разбиении строки на подстроки. Есть строка:
"разум дан человеку того чтобы разумно жил того только чтобы понимал неразумно живет"

Ее нужно разбить внахлест, и получить такие строки:
1 = разум дан человеку того чтобы разумно жил того только чтобы
2 = дан человеку того чтобы разумно жил того только чтобы понимал
3 = человеку того чтобы разумно жил того только чтобы понимал неразумно
4 = того чтобы разумно жил того только чтобы понимал неразумно живет

Длина подстроки должна быть 10 слов

так как подстроки составляются внахлест, то всего их будет количество слов в тексте минус длина подстроки плюс 1. textlength - (podstrokalength - 1) -- в данном случае подстрок получилось 4.

Буду очень благодарен за помощь

Добавлено через 28 минут
Вообще никак?=)
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
05.05.2012, 15:01
Ответы с готовыми решениями:

Разбить строку на подстроки
Мне нужно считать строки из файла и разбить их на подстроки Считываю я строки таким образом: TStringList *file= new TStringList; ...

Разбить строку на 2 подстроки
Дана строка символов, состоящая из произвольного текста, слова разделены пробелами. Разбить исходную строку на две подстроки, причем первая...

Разбить исходную строку на 2 подстроки
Дана строка символов, состоящая из произвольного текста, слова разделены пробелами. Разбить исходную строку на 2 подстроки, причём первая...

10
 Аватар для Sergey-K
238 / 229 / 58
Регистрация: 27.10.2011
Сообщений: 249
05.05.2012, 15:26
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
AnsiString SubStr(AnsiString str, int n)
{
  AnsiString result;
  int count = 0;
  str = " " + str;
  n++;
  for(int i = 0; i < str.Length(); i++)
    {
      if(count >= n && count < n + 10)
        result += str[i + 1];
      if(str[i + 1] == ' ')
        count++;
    }
  return result;
}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  AnsiString str = "разум дан человеку того чтобы разумно жил того только чтобы понимал неразумно живет";
  Memo1->Clear();
  Memo1->Lines->Add(SubStr(str, 0));
  Memo1->Lines->Add(SubStr(str, 1));
  Memo1->Lines->Add(SubStr(str, 2));
  Memo1->Lines->Add(SubStr(str, 3));
}
//---------------------------------------------------------------------------
1
1 / 1 / 0
Регистрация: 30.04.2012
Сообщений: 54
05.05.2012, 16:14  [ТС]
Цитата Сообщение от Sergey-K Посмотреть сообщение
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
AnsiString SubStr(AnsiString str, int n)
{
  AnsiString result;
  int count = 0;
  str = " " + str;
  n++;
  for(int i = 0; i < str.Length(); i++)
    {
      if(count >= n && count < n + 10)
        result += str[i + 1];
      if(str[i + 1] == ' ')
        count++;
    }
  return result;
}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  AnsiString str = "разум дан человеку того чтобы разумно жил того только чтобы понимал неразумно живет";
  Memo1->Clear();
  Memo1->Lines->Add(SubStr(str, 0));
  Memo1->Lines->Add(SubStr(str, 1));
  Memo1->Lines->Add(SubStr(str, 2));
  Memo1->Lines->Add(SubStr(str, 3));
}
//---------------------------------------------------------------------------
Дает ошибку [C++ Error] Unit1.cpp(32): E2316 '_fastcall TForm1::Button1Click(TObject *)' is not a member of 'TForm1'

Добавлено через 1 минуту
пардон, всё работатет, просто Билдер глючит. Спасибо
0
 Аватар для cpp_developer
20124 / 5691 / 417
Регистрация: 09.04.2010
Сообщений: 22,546
Записей в блоге: 1
05.05.2012, 16:40
Обработчик Button1Click не копируйте, а создайте в инспекторе объектов для Button1 на вкладке Events в строчке OnClick. Потом в созданный обработчик вставьте код из примера.

Это базовые элементарные вещи, и, приходя на форум, эти вещи надо знать.
0
1 / 1 / 0
Регистрация: 30.04.2012
Сообщений: 54
05.05.2012, 23:06  [ТС]
Цитата Сообщение от LK Посмотреть сообщение
Обработчик Button1Click не копируйте, а создайте в инспекторе объектов для Button1 на вкладке Events в строчке OnClick. Потом в созданный обработчик вставьте код из примера.

Это базовые элементарные вещи, и, приходя на форум, эти вещи надо знать.
Я же написал, что разобрался. Зачем умничать?
0
 Аватар для cpp_developer
20124 / 5691 / 417
Регистрация: 09.04.2010
Сообщений: 22,546
Записей в блоге: 1
05.05.2012, 23:36
FedExpress, я написал, потому что ошибка - элементарная, и спрашивать об этом на форуме - стыдно. И не надо меня провоцировать.
0
1 / 1 / 0
Регистрация: 30.04.2012
Сообщений: 54
05.05.2012, 23:39  [ТС]
Цитата Сообщение от LK Посмотреть сообщение
FedExpress, я написал, потому что ошибка - элементарная, и спрашивать об этом на форуме - стыдно. И не надо меня провоцировать.
Форумы созданы не для обучения?
0
 Аватар для cpp_developer
20124 / 5691 / 417
Регистрация: 09.04.2010
Сообщений: 22,546
Записей в блоге: 1
05.05.2012, 23:49
FedExpress, нет, для обучения созданы школы и прочие учебные заведения.
0
1 / 1 / 0
Регистрация: 30.04.2012
Сообщений: 54
06.05.2012, 00:02  [ТС]
Цитата Сообщение от LK Посмотреть сообщение
FedExpress, нет, для обучения созданы школы и прочие учебные заведения.
Для чего тогда созданы форумы?
0
 Аватар для cpp_developer
20124 / 5691 / 417
Регистрация: 09.04.2010
Сообщений: 22,546
Записей в блоге: 1
06.05.2012, 00:18
Для общения, в данном случае, на тему программирования в C++ Builder, оперативного решения возникших вопросов, да, в каком-то виде это - обучение. Но учится основам на форуме все же не стоит, имхо, поскольку это вызывает однозначно скептическую, мягко говоря, реакцию у людей, которые учились по толстым книгам без рисунков с изображением Бивиса и Баттхеда .
1
1 / 1 / 0
Регистрация: 30.04.2012
Сообщений: 54
09.05.2012, 15:40  [ТС]
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
AnsiString SubStr(AnsiString str, int n)
{
  AnsiString result;
  int count = 0;
  str = " " + str;
  n++;
  for(int i = 0; i < str.Length(); i++)
    {
      if(count >= n && count < n + 10)
        result += str[i + 1];
      if(str[i + 1] == ' ')
        count++;
    }
  return result;
}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  AnsiString str = "разум дан человеку того чтобы разумно жил того только чтобы понимал неразумно живет";
  Memo1->Clear();
  Memo1->Lines->Add(SubStr(str, 0));
  Memo1->Lines->Add(SubStr(str, 1));
  Memo1->Lines->Add(SubStr(str, 2));
  Memo1->Lines->Add(SubStr(str, 3));
}
//---------------------------------------------------------------------------
Этот код работает отлично, теперь я его хочу немного переделать. Начальную строку я беру из Memo3 и хочу, чтоб разбивка прошла по той же самой формуле "количество слов в тексте минус длина подстроки плюс 1. textlength - (podstrokalength - 1)".

C++
1
2
3
4
5
6
AnsiString strx = Memo3->Text;
for (int i=0; i<= strx.Length()-(10 - 1); i++){
 
Memo4->Lines->Add(SubStr(strx, i));
}
}
Но в мемо4 ничего не выводит. В чем проблема (чувствует мое сердце, что ошибка элементарная, но мои слабые знания в программировании не позволяют мне ее обнаружить=))

Добавлено через 2 минуты
На доли секунды в мемо4 появляется какой-то текст, вроде как обрабатывается, но потом исчезает.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
09.05.2012, 15:40
Помогаю со студенческими работами здесь

Разбить строку с разделителем на подстроки
Добрый день. Не могу понять как разбить строку на подстроки. Пример строки &quot;08:00-09:35; 10:20-11:50; 13:00-14:25; &quot;. За разделитель...

Разбить исходную строку на две подстроки
Дана строка, состоящая из слов, разделенных пробелами. Разбить исходную строку на две подстроки, причем первая длиной k символов, если на...

Копирование подстроки в строку
Идея вот в чем: Есть 4 поля S1, S2. pos,kol. В S1 и S2 нужно ввести значения букв или цифр, в строках: pos,kol мы вводим начальную...

Разбить строку на все "связные" подстроки. Получившиеся подстроки записать в вектор
Нужно разбить минимальную строку на &quot;связные&quot; подстроки Например: строка Mas: &quot;qwe&quot; нужны подстроки:...

Разбить строку на подстроки
Нужно разбить строку на подстроки , вот пример : ababa a,b,a,b,a,ab,ba,ab,ba,aba,bab,aba,abab,baba,ababa


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

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Новые блоги и статьи
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru