Как вывести 5 е слово из Memo

@inquisitor · Регистрация: 22.12.2015

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

"посчитать количество слов и вывести к примеру 5е слово".
результат будет слово"вывести".

@volvo · 19.05.2018, 23:38

В нормальных Билдерах есть SplitString (в StrUtils.hpp)

C++
1
2
    TStringDynArray arr = SplitString(Memo1->Text, " ");
    ShowMessage(String().sprintf(_T("Пятое слово: %s, количество слов: %d"), arr[4], arr.get_length()));

@inquisitor · 20.05.2018, 00:22 **[ТС]**

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

ShowMessage(String().sprintf(_T("Пятое слово: %s, количество слов: %d"), arr[4], arr.get_length()));

[bcc32 Error] Unit1.cpp(142): E2268 Call to undefined function '_T'
Full parser context
Unit1.cpp(99): parsing: void _fastcall TForm1::Button5Click(TObject *)
[bcc32 Error] Unit1.cpp(142): E2034 Cannot convert 'int' to 'const wchar_t *'
Full parser context
Unit1.cpp(99): parsing: void _fastcall TForm1::Button5Click(TObject *)
[bcc32 Error] Unit1.cpp(142): E2342 Type mismatch in parameter 'format' (wanted 'const wchar_t *', got 'int')
Full parser context
Unit1.cpp(99): parsing: void _fastcall TForm1::Button5Click(TObject *)

@volvo · 20.05.2018, 00:38

Карма...

Что ж ты не учишься ничему? Я же уже писал, что надо

C++
1
#include <tchar.h>

использовать...

@inquisitor · 20.05.2018, 11:56 **[ТС]**

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

В нормальных Билдерах есть SplitString (в StrUtils.hpp)

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

Я же уже писал, что надо

Компиляция без ошибок,по факту ничего не выводит из номера слов.

@inquisitor · 20.05.2018, 14:35 **[ТС]**

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

Что ж ты не учишься ничему?

Я атеист.
Получилось.

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
void __fastcall TForm1::Button5Click(TObject *Sender)
{
//выводим номер символа
 //String Text=Memo1->Text;
 // for(int i=1;i<Text.Length();i++)
 //  if( Text[i]  == '#' )
  // ShowMessage("Find in "+String(i));
 
  //определяет количество слов в строке
String Stroka=Memo1->Text;  //твоя строка
 while (Stroka.Pos(":")!=0) {
    Stroka=Stroka.SubString(1,Stroka.Pos(":")-1)+" "+Stroka.SubString(Stroka.Pos(":")+1,Stroka.Length()-Stroka.Pos(":"));
 }
 int Count=0;
 while (Stroka.Pos(" ")!=0) {
    Count++;
    int a=Stroka.Pos(" ");
    String tmpStr="";
    tmpStr=Stroka.SubString(1,a);
    Stroka=Stroka.SubString(a+1,Stroka.Length()-a);
}
//количество слов в строке
 Memo3->Lines->Add("Всего слов = "+IntToStr(Count+1));
 
    //вывод слов
        TStringDynArray arr = SplitString(Memo1->Text, " ");
      for (int i = 0; i < Count+1; i++)
      {
           Memo3->Lines->Add (IntToStr(i)+' '+' '+String().sprintf(_T(" -e слово: %s"), arr[i], arr.get_length()) );
 
      }
 
 }
//---------------------------------------------------------------------------

@inquisitor · 20.05.2018, 14:38 **[ТС]**

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

использовать...

а вот теперь можно и ReplaceStr применить.Мы теперь уверены,что из текста Memo1 мы читаем слова правильно.

Новые блоги и статьи Все статьи Все блоги /
Контроль заполнения и очистка дат в зависимости от значения перечислений 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 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ

@inquisitor 25 / 9 / 17 Регистрация: 22.12.2015 Сообщений: 2,097

	Как вывести 5 е слово из Memo 19.05.2018, 22:55. Показов 1264. Ответов 6 Метки нет (Все метки) "посчитать количество слов и вывести к примеру 5е слово". результат будет слово"вывести". 0

Как вывести 5 е слово из Memo

Решение