Посчитать количество символов в кажой строке файла.

@wildfires · Регистрация: 09.01.2012

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

Ребят, задание в название темы. Можете помочь ?

Комментарий модератора

2.4. На каждый вопрос создавайте по одной теме - это помогает избежать путаницы в ответах и облегчает поиск.

Заранее спасибо.

Добавлено через 3 часа 7 минут
В delphi можно же было вывести текстовый файл через мемо, а потом прописать.

Delphi
1
Label1.Caption:= IntToStr(Length(Memo1.Lines[1]));

и должно работать ?
А в c++ как ?

cpp_developer · 26.02.2012, 00:24

так же

C++
1
2
3
4
5
6
7
TSringList *list = new TSringList;
list->LoadFromFile("file.txt");
for (int i;i<list->Count;i++) {
  Memo->Lines-Add("Длина строки "+
                  IntToStr(i+1)+
                  " : "+
                  IntToStr(list->Strings[i].Length()));

@wildfires · 26.02.2012, 00:35 **[ТС]**

LK, list - это что за компонент ?

cpp_developer · 26.02.2012, 00:37

TSringList - невизуальный компонент, список строк.
Сохранение файла
Класс TStringList

@wildfires · 26.02.2012, 00:44 **[ТС]**

А в Buildere нужно подключать какие библиотеки ?

cpp_developer · 26.02.2012, 00:46

Нет, для TSringList не надо.

@wildfires · 26.02.2012, 00:56 **[ТС]**

спасибо за помощь, только:

C++
1
2
list->LoadFromFile("file.txt");
for (int i;i<list->Count;i++) {

вот на эти строки ругается:

[C++ Error] Unit1.cpp(27): E2288 Pointer to structure required on left side of -> or ->*
[C++ Error] Unit1.cpp(28): E2288 Pointer to structure required on left side of -> or ->*

cpp_developer · 26.02.2012, 01:12

или так, не помню:

C
1
2
list.LoadFromFile("file.txt");
for (int i;i<list.Count;i++) {

@Sergey-K · 26.02.2012, 01:14

wildfires, все работает

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  TStringList* list = new TStringList;
  list->LoadFromFile("file.txt");
  for(int i = 0; i < list->Count; i++)
    Memo1->Lines->Add("Длина строки " + IntToStr(i + 1) +
    " : " + IntToStr(list->Strings[i].Length()));
}

@wildfires · 26.02.2012, 01:20 **[ТС]**

да с точками теперь все работает.
только как теперь можно сделать, что бы пробелы не считало ?

@Sergey-K · 26.02.2012, 01:36

wildfires,

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//---------------------------------------------------------------------------
int _Length(AnsiString str)
{
  int l = 0;
  for(int i = 0; i < str.Length(); i++)
    if(str[i + 1] != ' ')
      l++;
  return l;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button6Click(TObject *Sender)
{
  TStringList *list = new TStringList;
  list->LoadFromFile("file.txt");
  for(int i = 0; i < list->Count; i++)
    Memo1->Lines->Add("Длина строки " +
    IntToStr(i + 1) + " : " + IntToStr(_Length(list->Strings[i])));
}
//---------------------------------------------------------------------------

@spaum · 26.02.2012, 12:48

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

for (int i;i<list->Count;i++) {

Не удержался.. Если не инициализировать нулем, в i ведь будет черти что! Условие цикла не разу не выполнится, или я не прав?

cpp_developer · 26.02.2012, 13:28

Не по теме:

spaum, а голова зачем :) ? чтобы шляпу носить ? тем более, что выше уже все поправили, как бы.
но замечание может и правильное.

Новые блоги и статьи Все статьи Все блоги /
Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита, которое может. . .	Команды "Заполнить" и "Очистить" на форме документа Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". На примере нетипового документа разработанного в конфигурации КА2. В качестве источника данных указан регистр накопления, в который записываются данные о. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip

@wildfires 1 / 1 / 1 Регистрация: 09.01.2012 Сообщений: 114
	26.02.2012, 00:35 [ТС]
	LK, list - это что за компонент ? 0

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	26.02.2012, 00:37
	TSringList - невизуальный компонент, список строк. Сохранение файла Класс TStringList 1

@wildfires 1 / 1 / 1 Регистрация: 09.01.2012 Сообщений: 114
	26.02.2012, 00:44 [ТС]
	А в Buildere нужно подключать какие библиотеки ? 0

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	26.02.2012, 00:46
	Нет, для TSringList не надо. 1

@wildfires 1 / 1 / 1 Регистрация: 09.01.2012 Сообщений: 114
	26.02.2012, 01:20 [ТС]
	да с точками теперь все работает. только как теперь можно сделать, что бы пробелы не считало ? 0

cpp_developer
	26.02.2012, 13:28
	Не по теме: spaum, а голова зачем :) ? чтобы шляпу носить ? тем более, что выше уже все поправили, как бы. но замечание может и правильное. 0