Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Классы. Удаление "самого себя"

LordOfRock © (2006-02-22 17:09:00)
Привет, уважаемый DelphiMaster.Ru!

Есть у меня такие два класса:

TMyElement = class private public //Тут, допустим, много всяких полей, методов, свойств, конструктор, деструктор. Всё как надо end; TListOfMyElements = class //Здесь реализуется хранение списка экземпляров класса TMyElement private ListOfElements : TList; public //Здесь тоже реализация добавления/удаления элемента end;

Как мне в класс TMyElementдобавить метод Deleteтак, чтобы он удалял сам экземпляр класса и заодно удалял его из списка ListOfElementкласса TListOfMyElements. Так, как это реализованно в ListView, например.

LordOfRock (2006-02-22 19:45:00) [1]
clickmaker © (22.02.06 17:30) [3]

Пасиба.

clickmaker (2006-02-22 17:30:00) [2]
TTListOfMyElements = class;

TMyElement = class
private
FList: TTListOfMyElements;

...

TTListOfMyElements = class // дальше реальная декларация
private

end;

вот и весь форвард

LordOfRock (2006-02-22 17:27:00) [3]
clickmaker © (22.02.06 17:11) [1]

Посмотрел. Там в private-секцию класса TMyElementпишется тот класс TListOfMyElements, который является списком для класса TMyElement. Попытался зделать также, но он ругается, что TListOfMyElements undeclared. Как бы мне объявить TListOfMyElementsтакжекак и с процедурами/функциями поступаю. forwardниззя похоже ....

clickmaker (2006-02-22 17:11:00) [4]

> Так, как это реализованно в ListView, например

ну и посмотри, как это реализовано. в Delphi\Source\Vcl

Наверх

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