Выделить в строке подстроку, которая задает действительное число с фиксированной точкой

@San4ezs · Регистрация: 08.05.2020

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

Со строки,которая состоит из букв, цифр, запятых, точек, знаков + и -, выделить
подстроку, что задает действительное число с фиксированной точкой.

@D1973 · 08.05.2020, 15:14

Пример строки?

@San4ezs · 08.05.2020, 16:36 **[ТС]**

В оконном приложении нужно исходные данные вводить с компоненты Edit в ListBox
. Скалярное результат выводить в компонента Label. Для выхода из программы использовать кнопку «Close».

@D1973 · 09.05.2020, 04:36

San4ezs, я не спрашиваю Вас, куда вводить и куда выводить. Я Вас просил пример строки привести.

@San4ezs · 09.05.2020, 15:38 **[ТС]**

Понял, например такая строка: начинаем работу, нужно успеть сделать за 1 час.

@D1973 · 10.05.2020, 12:48

San4ezs, и где в этой строке действительное число с фиксированной точкой? Число тут одно, и оно, если что, целое...

@San4ezs · 10.05.2020, 13:06 **[ТС]**

Понял, например такая строка: начинаем работу, нужно успеть сделать за 1.5 часа.
Тут не принципиально какой текст будет

@D1973 · 11.05.2020, 04:05

Все очень просто:
1. Создаем список строк (объект типа TStringList)
2. Заполняем список строк, разбивая исходный текст на отдельные слова по разделителю - пробелу
3. Проходим циклом по всем строкам списка и анализируем каждую строку:
4. Если в очередной строке списка содержится символы "." или "," - то в этой строке меняем найденный символ на системный символ-разделитель целой и дробной части числа.
5. Пробуем преобразовать измененную строку в действительное число.
6. Если попытка удачна - выводим текущую строку списка (подстроку исходного текста) отдельной строкой в компонент Мемо.

Сделайте сами, не подглядывая!

Ну я же просил не подглядывать!!!

ЛОДЫРЬ!!!

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#include <memory>
...
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   std::auto_ptr<TStringList> L (new TStringList);
   L->Delimiter = ' ';
   L->DelimitedText = Edit1->Text;
   for(int i =0; i < L->Count; i++)
     {
        String s = L->Strings[i];
        if((s.Pos(".") > 0) || (s.Pos(",") > 0))
          {
             s = StringReplace(s, ".", FormatSettings.DecimalSeparator, TReplaceFlags() << rfReplaceAll);
             s = StringReplace(s, ",", FormatSettings.DecimalSeparator, TReplaceFlags() << rfReplaceAll);
             double d;
             if(TryStrToFloat(s, d)) Memo1->Lines->Add(L->Strings[i]);
          }
     }
}

@San4ezs · 11.05.2020, 09:45 **[ТС]**

спасибо большое

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .

@San4ezs 0 / 0 / 0 Регистрация: 08.05.2020 Сообщений: 10

	Builder 6 Выделить в строке подстроку, которая задает действительное число с фиксированной точкой 08.05.2020, 14:34. Показов 1160. Ответов 8 Метки нет (Все метки) Со строки,которая состоит из букв, цифр, запятых, точек, знаков + и -, выделить подстроку, что задает действительное число с фиксированной точкой. 0

@D1973 Модератор 9929 / 6467 / 2457 Регистрация: 21.01.2014 Сообщений: 27,424 Записей в блоге: 3
	08.05.2020, 15:14
	Пример строки? 0

@San4ezs 0 / 0 / 0 Регистрация: 08.05.2020 Сообщений: 10
	08.05.2020, 16:36 [ТС]
	В оконном приложении нужно исходные данные вводить с компоненты Edit в ListBox . Скалярное результат выводить в компонента Label. Для выхода из программы использовать кнопку «Close». 0

@D1973 Модератор 9929 / 6467 / 2457 Регистрация: 21.01.2014 Сообщений: 27,424 Записей в блоге: 3
	09.05.2020, 04:36
	San4ezs, я не спрашиваю Вас, куда вводить и куда выводить. Я Вас просил пример строки привести. 0

@San4ezs 0 / 0 / 0 Регистрация: 08.05.2020 Сообщений: 10
	09.05.2020, 15:38 [ТС]
	Понял, например такая строка: начинаем работу, нужно успеть сделать за 1 час. 0

@D1973 Модератор 9929 / 6467 / 2457 Регистрация: 21.01.2014 Сообщений: 27,424 Записей в блоге: 3
	10.05.2020, 12:48
	San4ezs, и где в этой строке действительное число с фиксированной точкой? Число тут одно, и оно, если что, целое... 0

@San4ezs 0 / 0 / 0 Регистрация: 08.05.2020 Сообщений: 10
	10.05.2020, 13:06 [ТС]
	Понял, например такая строка: начинаем работу, нужно успеть сделать за 1.5 часа. Тут не принципиально какой текст будет 0

@San4ezs 0 / 0 / 0 Регистрация: 08.05.2020 Сообщений: 10
	11.05.2020, 09:45 [ТС]
	спасибо большое 0