Форум: "Основная";
Текущий архив: 2003.07.10;
Скачать: [xml.tar.bz2];

Вниз

У меня глюки или у программы?   Найти похожие ветки 

← →
gfhjs   (2003-06-29 14:11) [0]

Пишу:
procedure fil;
var i, j: integer;
er: TStringList;
begin
er := nil;
j := 0;
er.LoadFromFile("ques.txt");
for i:= 0 to er.Count do begin
if er[i] = "qu" then inc(j);
end;
Form1.label1.caption:= inttostr(j);
end;

А оно на строке er.LoadFromFile("ques.txt"); вызывает AV. Что делать?

---

← →
DVM   (2003-06-29 14:14) [1]

А создавать (TStringList) Пушкин будет?

---

← →
Palladin   (2003-06-29 14:14) [2]

У тебя конечно...
объект создать надо сначала...
er:=TStringList.Create;

---

← →
Palladin   (2003-06-29 14:15) [3]

> for i:= 0 to er.Count do begin

for i:=0 to er.count-1 do begin

---

← →
gfhjs   (2003-06-29 14:16) [4]

АА.. Да, действительно жавно я Дельфи не занимался... Такие вещи забываю :)

---

← →
Anatoly Podgoretsky   (2003-06-29 15:00) [5]

А если разница между у тебя и в программе?

---

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

Форум: "Основная";
Текущий архив: 2003.07.10;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.009 c