Проблемы с добавлением объекта в StringList

← →
orion_st © (2002-12-10 16:30) [0]

Есть
type
TEvent = object
Date: TDate;
Time: TTime;
TextEvnt: TMemo;
AttrDone: byte;
end;
var
events: TstringList;
event:Tevent;

затем заполняю event и пытаюсь записать в StringList
events.AddObject("1",event);
на что дельфи ругается, что Incompatible types "TObject" and "TEvent". Что я неправильно делаю?

← →
Skier © (2002-12-10 16:32) [1]

>orion_st
type
TEvent = class
Date: TDate;
Time: TTime;
TextEvnt: TMemo;
AttrDone: byte;
end;

//.................

И из твоего кода не понятно
создаёшь ты объект event или нет...

← →
han_malign © (2002-12-10 16:33) [2]

events.AddObject("1",TObject(event));
TEvent(events[i]). ...;
- прямое приведение типа - дань универсальности.

>Skier © (10.12.02 16:32)
да, точно - я и не заметил что тип не референсный
{System.pas}
type

TObject = class;

TClass = class of TObject;

Проблемы с добавлением объекта в StringList Найти похожие ветки