Форум: "Основная";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];
Внизперекрестное объявление классов в Object Pascal Найти похожие ветки
← →
ton2 (2002-11-15 11:08) [0]создаю 2 своих класса.
type
TClass1=class(TObject)
private
FCl2:TClass2;
...
end;
TClass2=class(TObject)
private
FCl1:TClass1;
...
при попытке откомпилировать - ошибки. 1) в строке FCl2:TClass2; - неопределенный идентификатор TClass2;
2) в строке TClass2=class(TObject) - переорпеделенный идентификатор TClass2.
← →
Skier (2002-11-15 11:11) [1]>ton2
type
TClass2 = class;
TClass1=class(TObject)
private
FCl2:TClass2;
...
end;
TClass2=class(TObject)
private
FCl1:TClass1;
...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c