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

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

Я в глубоком шоке.... TStrings


Кокандокало ©   (2002-11-27 22:54:00) 

procedure TForm1.Button1Click(Sender: TObject);
var
s: TStrings;
begin
s := TStrings.Create;
s.Add("test1");
s.Add("test2");
Memo1.Lines.AddStrings(s);
end;


Что тут не так? почему вылетает абстракт эррор??????


Ageev   (2002-11-29 11:19:00) [1]

S: TStringList; а на хрена




Memo1.Lines.Clear;
Memo1.Lines.AddStrings("test1");
Memo1.Lines.AddStrings("test1");


Крот   (2002-11-28 06:30:00) [2]

Дело в том, что TStrings - абстрактный класс, его нельзя использовать непосредственно, надо либо самому создать дочерний класс, либо воспользоваться уже существующими, лучше всего как 777 предложил - TStringList


Poirot   (2002-11-28 00:23:00) [3]

Garbage Collector :-)))))


apay   (2002-11-27 23:14:00) [4]

S: TStringList;
...
S := TStringList.Create;

и кто за тебя мусор будет подчищать?
S.Free;


777   (2002-11-27 23:05:00) [5]

s := TStringList.Create;


Наверх

Титульная страница Поиск, карта сайта Написать письмо