Ошибка List index out of bounds(2)

@Avalanche322 · Регистрация: 24.05.2019

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

Как исправить ошибку?

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
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Memo1->Clear();
 
if(FileExists("C:\\Users\\Gamer\\Desktop\\Translate(ver1.1)\\tr.txt"))
{
 TStringList *list = new TStringList();
 list->LoadFromFile("C:\\Users\\Gamer\\Desktop\\Translate(ver1.1)\\tr.txt");
 int k=Memo1->Lines->Count;
 for(int i = 0; i < list->Count; i++)
 {
   if(AnsiPos(Edit1->Text.UpperCase(),list->Strings[i].UpperCase()))
   {
    //list->DelimitedText = list->Strings[i];// здесь ошибка(вывод слова до пробила)
     Memo1->Lines->Add(list->Strings[i]);
     break;
   }
 }
 
 if(Memo1->Lines->Count ==k)
 {
   Memo1->Lines->Add("Даного слова немає у словнику :( " );
 }
 
delete list;
list = NULL;
 
}
 
else {
 
  ShowMessage("файл не знайдено :( ");
    }
 
 
}
//---------------------------------------------------------------------------

@nick42 · 05.03.2020, 22:44

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

list->DelimitedText = list->Strings[i];// здесь ошибка(вывод слова до пробила)

Вот как я представляю себе действия этой строки (команды)...- можете со мной поспорить: берётся в цикле очередная строчка списка list и весь этот список заменяется новым, полученным из этой строчки путём разбиения её на слова по разграничителю (delimiter). Далее следует присвоение ->Add(list->Strings[i]). Теперь допустим, что индекс i имеет значение 3, а вновь созданный список list из строки №3, содержащей всего два слова (это для определённости; менее индекса i) - этой строки №3 не имеет. То-есть вы пытаетесь добавить в Memo несуществующую уже строку. Согласитесь - не логично. Модифицировать в цикле элементы этого самого цикла предельно опасно, тем более, что компилятор такие ляпы проконтролировать как правило не может.

@Avalanche322 · 05.03.2020, 22:51 **[ТС]**

Спасибо. Но как тогда правильно сделать?

@nick42 · 05.03.2020, 22:55

Пожалуйста.
Думайте. Технику дела вам здесь подскажут, - я уверен. А логика - это на вашей стороне.

@D1973 · 06.03.2020, 10:26

Avalanche322, покажите пример Вашего файла tr.txt

@Avalanche322 · 06.03.2020, 10:50 **[ТС]**

Пример
Лето summer
Кот cat
Собака dog

И на третьем слове выбивает ета ошибка.

@D1973 · 06.03.2020, 12:00

Если переделать файл, чтобы он принял вид:

Лето=summer
Кот=cat
Собака=dog

то можно так сделать:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   Memo1->Clear();
   String MyFile = "C:\\Users\\Gamer\\Desktop\\Translate(ver1.1)\\tr.txt";
   if(!FileExists(MyFile))
     {
        ShowMessage("файл не знайдено :( ");
        return;
     }
   TStringList *list = new TStringList;
   list->LoadFromFile(MyFile);
   for(int i = 0; i < list->Count; i++)
     if(list->Names[i].UpperCase() == Edit1->Text.UpperCase())
       Memo1->Lines->Add(list->Values[list->Names[i]]);
   delete list;
   if(Memo1->Text.Trim().Length() == 0)
     Memo1->Lines->Add("Даного слова немає у словнику :( " );
}

@Avalanche322 · 06.03.2020, 12:13 **[ТС]**

Спасибо. Но можете объяснить эта строку

C++
1
if(Memo1->Text.Trim().Length() == 0)

@D1973 · 06.03.2020, 14:09

Это значит, что сначала в тексте, который содержится в Мемо1, с конца и с начала текста убираются все непечатные символы (пробелы, табуляции, переводы строк и т.д.) - Trim(), а потом получается его (текста) длина - Length() и т.к. Вы Мемо1 очищаете при каждом клике на кнопку, то изначальная длина текста будет всегда равна 0. И если длина текста в Мемо1 не изменилась - значит никаких совпадений найдено не было и выдается соответствующее сообщение...

Новые блоги и статьи Все статьи Все блоги /
Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .

@Avalanche322 1 / 1 / 0 Регистрация: 24.05.2019 Сообщений: 42
	05.03.2020, 22:51 [ТС]
	Спасибо. Но как тогда правильно сделать? 0

@nick42 Практикантроп 4841 / 2726 / 534 Регистрация: 23.09.2011 Сообщений: 5,798
	05.03.2020, 22:55
	Пожалуйста. Думайте. Технику дела вам здесь подскажут, - я уверен. А логика - это на вашей стороне. 0

@D1973 Модератор 9924 / 6460 / 2457 Регистрация: 21.01.2014 Сообщений: 27,410 Записей в блоге: 3
	06.03.2020, 10:26
	Avalanche322, покажите пример Вашего файла tr.txt 0

@Avalanche322 1 / 1 / 0 Регистрация: 24.05.2019 Сообщений: 42
	06.03.2020, 10:50 [ТС]
	Пример Лето summer Кот cat Собака dog И на третьем слове выбивает ета ошибка. 0

@D1973 Модератор 9924 / 6460 / 2457 Регистрация: 21.01.2014 Сообщений: 27,410 Записей в блоге: 3
	06.03.2020, 14:09
	Это значит, что сначала в тексте, который содержится в Мемо1, с конца и с начала текста убираются все непечатные символы (пробелы, табуляции, переводы строк и т.д.) - Trim(), а потом получается его (текста) длина - Length() и т.к. Вы Мемо1 очищаете при каждом клике на кнопку, то изначальная длина текста будет всегда равна 0. И если длина текста в Мемо1 не изменилась - значит никаких совпадений найдено не было и выдается соответствующее сообщение... 1

Ошибка List index out of bounds(2)

Решение