Скачать: CL | DM;

Чтение из тестового файла в ListBox   Найти похожие ветки 

← →
Anar   (2002-09-18 16:33) [0]

Короче хочу чтоб моя прога при запуске читала из текстового файла список. Например: у

меня текстовый файл, в котором написано:

file1.txt
file2.doc
file3.exe

и т.д.

Пишу такой код:

public
UserDefinedFile:TextFile;
...
procedure TMainForm.FormCreate(Sender: TObject);
Var FileList:String;
Begin
AssignFile(UserDefinedFile,"myfile.txt");
Reset(MainForm.UserDefinedFile);
ReadLn(UserDefinedFile,FileList);
ListBox1.Items.LoadFromFile(FileList);
CloseFile(UserDefinedFile);
End;
...

Что здесь неправильно???

При запуске программы (Ctrl-F9) выдает ошибку: "Access Violation at..." Дальше не помню.

---

← →
Song ©   (2002-09-18 16:37) [1]

ListBox1.Items.LoadFromFile("myfile.txt");
Всё, больше ничего не надо.

---

← →
Lord Warlock ©   (2002-09-18 16:37) [2]

AssignFile(UserDefinedFile,"myfile.txt");
Reset(MainForm.UserDefinedFile);
ReadLn(UserDefinedFile,FileList);
ListBox1.Items.LoadFromFile(FileList);
CloseFile(UserDefinedFile);

Все что нужно из этого :
ListBox1.Items.LoadFromFile(Путь разумеется+"myfile.txt");

---

← →
Андрей Прокофьев   (2002-09-18 16:38) [3]

Достаточно просто
ListBox1.Items.LoadFromFile("myfile.txt");

---

← →
lenin ©   (2002-09-18 16:38) [4]

А может так:
ListBox1.Items.LoadFromFile("myfile.txt");

---

← →
Anatoly Podgoretsky ©   (2002-09-18 16:48) [5]

У тебя все праильно, но есть ряд вопросов
1. создан ли ListBox1, в достаточно ли мере инициализирован
Попробуй перенести весь этот код в обработчик OnShow

---

← →
Anar ©   (2002-09-18 21:03) [6]

Вы правы! Просто я здесь код немного изменил. Точнее упростил. Я в начале сделал код чтобы из текстового файла загружал файла загружал в ListBox другой, модальной, формы. Потом сделал по вашему методу, вижу тоже что-то не то. Потом то же самое добавил в обработчик OnCreate этой самой модальной формы. И всё получилось OK. Спасибо вам!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c