list index out of bounds (0) ошибка EStringList

@methanoljj · Регистрация: 24.02.2013

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

Всем привет!
У меня возникла проблема

Раньше программа работала без проблем но сейчас почемуто выдает такую ошибку: class EStringListError with msg 'List index out of bounds (0)' Process stopped. Не понимаю как ее можно решить.. Ктото встречался с подобной проблемой?

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
void __fastcall TForm1::FormCreate(TObject *Sender){
 
char strog [255];
GetEnvironmentVariable("appdata", strog, -1);
Memo1->Text = strog;
 
 
TStringList *sl = new TStringList;
 
if(FileExists(Memo1->Text+"/Quest/log.txt") == true){
sl->LoadFromFile(Memo1->Text+"/Quest/log.txt");
}
 
if(sl->Strings[0].Length() != 0 && sl->Strings[1].Length() != 0 ){
Edit1->Text = sl->Strings[0];
Edit2->Text = sl->Strings[1];
delete sl;
}
 
}

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

@kzru_hunter · 05.08.2013, 03:53

Видимо файл пустой. Сделай проверку на количество записей в файле через stringlist->count

@methanoljj · 05.08.2013, 13:31 **[ТС]**

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

Видимо файл пустой. Сделай проверку на количество записей в файле через stringlist->count

спасибо за ответ, но файл не пуст а вот программа думает иное ... при запуске появляется окошко с проблемой а в компеляторе указывает на project.bcd файл что там какаято проблема но ничего не пишет а просто выделяет строку где Application->Run();

хелпппп

@ivan.-94 · 05.08.2013, 14:05

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

при запуске появляется окошко с проблемой а в компиляторе указывает на project.bcd файл что там какая то проблема но ничего не пишет а просто выделяет строку где Application->Run();

Может быть многое.
Просмотрите весь проект тщательно, все ли используемые файлы подключены...

@Sasha · 05.08.2013, 14:21

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

спасибо за ответ, но файл не пуст а вот программа думает иное ... при запуске появляется окошко с проблемой а в компеляторе указывает на project.bcd файл что там какаято проблема но ничего не пишет а просто выделяет строку где Application->Run();
хелпппп

пройдись дебагером по коду посмотри что заносишь в StringList

Добавлено через 10 минут
А есчё лучше сделай вот так

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
void __fastcall TForm1::FormCreate(TObject *Sender){
 
char strog [255];
GetEnvironmentVariable("appdata", strog, -1);
Memo1->Text = strog;
 
 
TStringList *sl = new TStringList;
 
if(FileExists(Memo1->Text+"/Quest/log.txt") == true){
sl->LoadFromFile(Memo1->Text+"/Quest/log.txt");
ShowMessage(sl->Text);
}
 
if(sl->Strings[0].Length() != 0 && sl->Strings[1].Length() != 0 ){
Edit1->Text = sl->Strings[0];
Edit2->Text = sl->Strings[1];
delete sl;
}
 
}

@methanoljj · 05.08.2013, 14:23 **[ТС]**

ошибка открывается теперь 2 раза так как я во всем коде лишь 2 раза использую StringList

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
char strog [255];
GetEnvironmentVariable("AppData", strog, 0);
Memo2->Text = strog;
 
TStringList *sl;
sl = new TStringList;
 
if(FileExists(Memo2->Text+"//Quest//log.txt") == true){
sl->LoadFromFile(Memo2->Text+"//Quest//log.txt");
}
 
if(sl->Strings[0] != "Log" && sl->Strings[1] != "Log" ){
Edit1->Text = sl->Strings[0];
Edit2->Text = sl->Strings[1];
}
else{
//nothing
}

@methanoljj · 05.08.2013, 14:25 **[ТС]**

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

пройдись дебагером по коду посмотри что заносишь в StringList

Добавлено через 10 минут
А есчё лучше сделай вот так

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
void __fastcall TForm1::FormCreate(TObject *Sender){
 
char strog [255];
GetEnvironmentVariable("appdata", strog, -1);
Memo1->Text = strog;
 
 
TStringList *sl = new TStringList;
 
if(FileExists(Memo1->Text+"/Quest/log.txt") == true){
sl->LoadFromFile(Memo1->Text+"/Quest/log.txt");
ShowMessage(sl->Text);
}
 
if(sl->Strings[0].Length() != 0 && sl->Strings[1].Length() != 0 ){
Edit1->Text = sl->Strings[0];
Edit2->Text = sl->Strings[1];
delete sl;
}
 
}

сообщения выводится!) Спасибо огромное!

@Sasha · 05.08.2013, 14:32

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

Спасибо огромное!

так что ошибка ушла?

@methanoljj · 05.08.2013, 14:38 **[ТС]**

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

так что ошибка ушла?

Да, проблема была в неправельно построенном мною запросе для проверки файла ты сделал это очень разумно по длине!

Новые блоги и статьи Все статьи Все блоги /
Подключение Box2D v3 к SDL3 для Android: физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 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 и т. д. Сборка примера Скачайте. . .

@kzru_hunter 1124 / 795 / 101 Регистрация: 01.02.2011 Сообщений: 1,887 Записей в блоге: 1
	05.08.2013, 03:53
	Видимо файл пустой. Сделай проверку на количество записей в файле через stringlist->count 1