[poli-smen]

Сообщение от vladdv89

Попытался построить систему классов. Классы TFieldSpec и TTableSpec перекрестно ссылаются друг на друга через объектные свойства.

Нужно сделать опережающее объявление класса:

Код:

   TTableSpec=class;

  // Теперь можно описывать класс который использует этот идентификатор:
   TFieldSpec=class(Tobject)
   private
     FPosition : integer;
...
     FTableSpec : TTableSpec;
...
   end;

  // А теперь описываем уже предварительно объявленный класс:
   TTableSpec=class(Tobject)
   private
     FName : string;
...
     FFields : array[1..100] of TFieldSpec;
...
   end;

Сообщение от vladdv89

Как описать систему классов желательно в одном модуле?

Такое можно сделать именно в одном модуле и даже более того - в одном блоке type.