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

Я в глубоком шоке.... TStrings   Найти похожие ветки 

← →
Кокандокало   (2002-11-27 22:54) [0]

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


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

---

← →
777 ©   (2002-11-27 23:05) [1]

s := TStringList.Create;

---

← →
apay ©   (2002-11-27 23:14) [2]

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

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

---

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

Garbage Collector :-)))))

---

← →
Крот ©   (2002-11-28 06:30) [4]

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

---

← →
Ageev   (2002-11-29 11:19) [5]

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




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

---

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

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



Память: 0.45 MB
Время: 0.016 c