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

Проблемка с TstringList   Найти похожие ветки 

← →
Mensss   (2005-02-09 22:14) [0]

Написал несколько строк кода, но при работе вылетает ошибка отсутствия индекса переменной s. Помогите пожалуйста определить в чем причина?

procedure TForm1.Button1Click(Sender: TObject);
var
s:TstringList;
begin
s:=TStringList.Create;
s.Clear;
s[0]:="Privet,";
s.Add("Samson !!!");
Showmessage(s[0]);
s.Free;
end;


---

← →
Leonid Troyanovsky ©   (2005-02-09 22:30) [1]

> Mensss   (09.02.05 22:14)  
> Написал несколько строк кода, но при работе вылетает ошибка
> отсутствия индекса переменной s. Помогите пожалуйста определить
> в чем причина?

..
> s.Clear;
> s[0]:="Privet,";

В ем.

--
Regards, LVT.

---

← →
Mensss   (2005-02-09 22:31) [2]

А можеш объяснить почему эти строчки неправильные?

---

← →
Leonid Troyanovsky ©   (2005-02-09 22:47) [3]

> Mensss   (09.02.05 22:31) [2]
> А можеш объяснить почему эти строчки неправильные?


Строки нормальные. Ошибочно такое их сочетание.
RTFM: Delphi help: TStringList.Clear, TStringList.Strings.

--
Regards, LVT.

---

← →
Alexander Panov ©   (2005-02-09 22:52) [4]

Mensss   (09.02.05 22:14)

Изначально TStringList не содержит строк.

---

← →
Anatoly Podgoretsky ©   (2005-02-09 22:59) [5]

У тебя нет строки с индексом 0

---

← →
Юрий Зотов ©   (2005-02-09 23:12) [6]

> Mensss   (09.02.05 22:14)  


s.Clear; // Зачем очишать только что созданный список?
        // Он и так создается пустым.
s[0]:="Privet,"; // Список пуст. Откуда же в нем взялась
                // строка s[0]? Ее нет. А как можно что-то
                // присваивать тому, чего нет? Используйте Add.


---

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

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



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