[dmdx]

Всем привет. Народ подскажите как можно использовать этак называемые ссылки? попробую объяснить на примере.

Есть Класс 1 и Класс 2. дык вот если использовать Класс2 в Класс1 то надо класс 2 объявлять выше чем Класс 1.

Код:

1 2 3 4 5 6 7 8 9 10 11 12

unit ClassTest; uses Classes; ... type  TClass2 = class;  ... end;  TClass1 = class;  ...  SubClass : TClass2;  ... end;

Если объявить наоборот то класс 1 не найдет класс 2 и выдаст ошибку

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13

unit ClassTest; uses Classes; ...  TClass1 = class;  ...  SubClass : TClass2;  ... end;   type  TClass2 = class;  ... end;

Можно ли где нить в самом верху объявлять ссылки или указатели на классы что ты не париться с положением объявления классов. у меня их 13 и будет больше. Грубо что бы второй вариант не выдавал ошибки?

[lmikle]

можно использовать конструкцию TClass2 = class; - просто объявление, что TClass2 есть класс, который описан ниже.

Тогда код:

Код:

1 2 3 4 5 6 7 8 9 10 11

type   TClass2 = class;     TClass1 = class      FClass2 : TClass2;    ...   end;     TClass2 = class    ...   end;

будет работать.

[dmdx]

Большое спасибо