published-свойства

[vunder]

Проект, который прекрасно собирается в Delphi? никак не хочет компилица в FreePascal (Lazarus)
Ошибка следующая

Error: Only class which are compiled in $M+ mode can be published

Кусок исходника такой:

Код: Выделить всё

  tRtpTable = class(tTransporter)
    QDetails: tQDetails;//здесь ошибка
  private
    fCapacity: Integer;
    fClientName: string;
    fFields: tFieldIndexes;
    fQFields: tFieldIndexes;
    fSortField: tFieldIndex;
    fUpdateField: tFieldIndex;


Во всех модулях ставил {$MODE Delphi}. Пытался ставить {$M+} именно для этого класса - не помогает. В чем проблема?
Использую Lazarus 0.9.24 beta, FPC 2.2.0

[B4rr4cuda]

А не пробовал

Код: Выделить всё

{$mode delphi} {$M+}

в начале модуля?
ЗЫ фраза

Пытался ставить {$M+} именно для этого класса

мне не понятна...

[vunder]

Поставил в начале всех подключаемых модулей {$MODE DELPHI}, все равно таже ошибка

[alexs]

класс tQDetails собран без не так как надо. Либо перенеси его в приватную или публик секцию или в начале модуля где объявлен класс tQDetails вставь дерективу {$M+}

[vunder]

класс tQDetails собран без не так как надо. Либо перенеси его в приватную или публик секцию или в начале модуля где объявлен класс tQDetails вставь дерективу {$M+}

Спасибо, помогло.
Кстати, интересная штука получается: класс tQDetails является наследников от TPersistent, но описывался так:

Код: Выделить всё

...
tQDetails = class;
...
tRtpTable = class(tTransporter)
    QDetails: tQDetails;
  private
    fCapacity: Integer;
    fClientName: string;
...
tQDetails = class(tTransporter)
...