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

Интерпретация строк текстового файла в числа и их модификация

31.01.2015, 12:46. Показов 1512. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
в файле в ASCll лежат числа от 0-1030, по 1 числу в строке
в каждой строке 4 символа, и он имеет такой вид
Кликните здесь для просмотра всего текста
0001
0005
0009
0013
0017
0097
0101
0105
0109
0113
0117
0121
0125
0129

необходимо брать от туда числа подряд, и по очереди их умножать то на 0,325 то на 1,5 и выводить их в Label1 и Label2 соответственно
т.е.
Кликните здесь для просмотра всего текста

0001*1.5>Label2
0005*0,325>Label1
0009*1.5>Label2
0013*0,325>Label1
0017*1.5>Label2
0097*0,325>Label1
0101*1.5>Label2
0105*0,325>Label1
0109*1.5>Label2
0113*0,325>Label1
0117*1.5>Label2
0121*0,325>Label1
0125*1.5>Label2
0129**0,325>Label1


я написал код, но он даже файл считать не может
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
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
TStringList *list = new TStringList;
//list->LoadFromFile("file.txt");
//List->LoadFromFile('C:\FILE.TXT');
//st.LoadFromFile('c:\file.txt');
int j = list->Count; //êîëè÷åñòâî ñòðîê
for (int i = 0; i<j; i++)
   {
 
     j=j*0.325
    Label->Caption = IntToStr(j);
   }
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
31.01.2015, 12:46
Ответы с готовыми решениями:

Разбиение текстового файла, содержащего четное количество строк, на два текстовых файла
1 разбиения текстового файла, содержащего четное количество строк, на два текстовых файла, в каждый из которых записать одинаковое...

Считывание строк из текстового файла
Доброго времени суток! Дана задача: Подготовить файл со списком из 20 сотрудников (в каждой строке файла записаны фамилия, имя и...

Проверка строк текстового файла
У меня имеется текстовый файл, в котором 9 строк заполнены информацией! Требуется выводить информацию, когда в файле будут заполнены 10...

6
 Аватар для demon_7
260 / 192 / 60
Регистрация: 12.05.2013
Сообщений: 857
31.01.2015, 13:11
GROMOZEKA82, как бе
C++
1
List->LoadFromFile("C:\FILE.TXT");
0
0 / 0 / 1
Регистрация: 23.05.2013
Сообщений: 98
31.01.2015, 13:15  [ТС]
[C++ Error] Unit1.cpp(18): E2141 Declaration syntax error
0
place status here
 Аватар для gunslinger
3186 / 2220 / 640
Регистрация: 20.07.2013
Сообщений: 6,013
31.01.2015, 13:28
Двойной (обратный) слеш.
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
TForm1 *Form1;
TStringList *list = new TStringList;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  list->LoadFromFile("E:\\file.txt");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  static int i = 0;
  if (i < list->Count)
    Label1->Caption = Trim(list->Strings[i]).ToIntDef(0) * 1.5;
  else
    Tag = 1;
  if (i+1 < list->Count)
    Label2->Caption = Trim(list->Strings[i+1]).ToIntDef(0) * 0.325;
  else
    Tag = 1;
  if (Tag == 1)
    ShowMessage("Достигнут конец файла.");
  i += 2;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
  delete list;
}
Миниатюры
Интерпретация строк текстового файла в числа и их модификация  
0
0 / 0 / 1
Регистрация: 23.05.2013
Сообщений: 98
31.01.2015, 13:49  [ТС]
gunslinger, а можете проект скинуть, у меня почему то ваш код ругается

Добавлено через 10 минут
Кликните здесь для просмотра всего текста
[C++ Error] Unit1.cpp(24): E2316 '_fastcall TForm1::Button1Click(TObject *)' is not a member of 'TForm1'
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'Д' (0xc4)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'о' (0xee)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'с' (0xf1)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'т' (0xf2)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'и' (0xe8)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'г' (0xe3)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'н' (0xed)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'у' (0xf3)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'т' (0xf2)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'к' (0xea)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'о' (0xee)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'н' (0xed)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'е' (0xe5)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'ц' (0xf6)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'ф' (0xf4)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'а' (0xe0)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'й' (0xe9)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'л' (0xeb)
[C++ Error] Unit1.cpp(35): E2206 Illegal character 'а' (0xe0)
[C++ Error] Unit1.cpp(40): E2316 '_fastcall TForm1::FormClose(TObject *,TCloseAction &)' is not a member of 'TForm1'
0
place status here
 Аватар для gunslinger
3186 / 2220 / 640
Регистрация: 20.07.2013
Сообщений: 6,013
31.01.2015, 13:56
Лучший ответ Сообщение было отмечено BRcr как решение

Решение

Ты хоть кнопку на форму поместил?
Кликни потом по ней 2 раза и в void __fastcall TForm1::Button1Click(TObject *Sender)
помести код
C++
1
2
3
4
5
6
7
8
9
10
11
12
  static int i = 0;
  if (i < list->Count)
    Label1->Caption = Trim(list->Strings[i]).ToIntDef(0) * 1.5;
  else
    Tag = 1;
  if (i+1 < list->Count)
    Label2->Caption = Trim(list->Strings[i+1]).ToIntDef(0) * 0.325;
  else
    Tag = 1;
  if (Tag == 1)
    ShowMessage("Достигнут конец файла.");
  i += 2;
чтобы стало как 4-ом посте.
Кликни на событии формы OnClose и в обработчик помести код
C++
1
delete list;
Аналогично для OnCreate.
Насчет символов - хз какой у тебя билдер, попробуй
C++
1
ShowMessage(L"Достигнут конец файла.");
вместо
C++
1
ShowMessage("Достигнут конец файла.");
Подобные вопросы заставляют меня впадать в ступор.
Давно пора создать раздел "Билдер для самых маленьких начинающих".
1
0 / 0 / 1
Регистрация: 23.05.2013
Сообщений: 98
31.01.2015, 14:16  [ТС]
спасибо, разобрался
мой билдер кириллицу не знал)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
31.01.2015, 14:16
Помогаю со студенческими работами здесь

Формирование текстового файла из n строк
Всем здрасте помоги решить ! Разработать программу формирования текстового файла из n строк, в первой из которых 1 символ 1 во второй...

Обработка строк с текстового файла
Программа должна считать и сравнивать количество букв &quot;А&quot; и &quot;О&quot; с учетом регистра и раскладки клавиатуры. Ну с регистром еще все...

Сортировка строк текстового файла
Подсказали обратиться к специалистам этого раздела! Прошу помощи для хобби. Имеется текстовый файл. Представляет собой список....

Парсинг строк из текстового файла
Доброго времени суток, господа! Уже n-ое количество времени мучаюсь со следующей задачей: Имеется программа, в которой по нажатию...

Удаление строк из текстового файла
Доброго времени суток! Хотел использовать код, предложенный в данном топике https://www.cyberforum.ru/visual-basic/thread363194.html под...


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
ПЛИС
zxcha1ka_ 27.01.2026
AHDL Разработать программы для синтеза следующих устройств: 1. Параллельного регистра 4-х разрядного с синхронной загрузкой и асинхронным сбросом (обнулением); Пoмoгитe пoжaлyйстa
Загрузка PNG-файла с альфа-каналом с помощью библиотеки SDL3_image на Android
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru