| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Проблемка с TstringList [D7, WinXP]

Mensss ©   (2005-02-09 22:14:00) 

Написал несколько строк кода, но при работе вылетает ошибка отсутствия индекса переменной 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;


---

Юрий Зотов   (2005-02-09 23:12:00) [1]

> Mensss   (09.02.05 22:14)  


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


---

Anatoly Podgoretsky   (2005-02-09 22:59:00) [2]

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

---

Alexander Panov   (2005-02-09 22:52:00) [3]

Mensss   (09.02.05 22:14)

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

---

Leonid Troyanovsky   (2005-02-09 22:47:00) [4]

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


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

--
Regards, LVT.

---

Mensss   (2005-02-09 22:31:00) [5]

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

---

Leonid Troyanovsky   (2005-02-09 22:30:00) [6]

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

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

В ем.

--
Regards, LVT.

---

Наверх