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

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

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

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

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

Опции темы