Свойства и приватные методы у записей: а что,так можно было?

[Cheb]

Поглядел в исходники RTL - и ощутил себя дятлом не одупляющим

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

TVmt = record
         vInstanceSize: SizeInt;
         vInstanceSize2: SizeInt;
         vParentRef: {$ifdef VER3_0}PVmt{$else}PPVmt{$endif};
          ...
       private
         function GetvParent: PVmt; inline;
       public
         property vParent: PVmt read GetvParent;
       end;

А... А так можно, получается?..
А я столько городушек городил...

С каких пор так можно? Когда эту фичу припилить успели?
Когда я в 2002-м изучал Фри Паскаль 1.0.6 - помнится, так нельзя было.

Добавлено спустя 5 минут 15 секунд:
Так... В фпц 2.6.4 было:

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

       TVmt = record
         vInstanceSize: SizeInt;
         vInstanceSize2: SizeInt;
         vParent: PVmt;
         ...
       end;

- т.е. проперти эту добавили для обратной совместимости после изменения унутренних форматов.

[iskander]

С каких пор так можно? Когда эту фичу припилить успели?

Емнип начиная с 2.6.0.

[MiniQ]

включается так
{$modeSwitch advancedRecords}

[Cheb]

включается так

Аааа... Я всё это время...
Даже не подозревал.
Какой позор.

[Mikhail]

включается так

Аааа... Я всё это время...
Даже не подозревал.
Какой позор.

Еще можно операторы перегружать

А с версии 3.2.2 еще и так можно
https://wiki.freepascal.org/management_operators

[Sharfik]

Это чтобы программа точно не заработала стабильно никогда.
Нахрена оно надо? Есть классы, есть рекорды(просто пакет данных). Нахрена городить огород?

[Mikhail]

Это чтобы программа точно не заработала стабильно никогда.
Нахрена оно надо? Есть классы, есть рекорды(просто пакет данных). Нахрена городить огород?

На стабильность это влияет строго положительно. Рекорды,в отличие от классов, могут находится на стеке, например.

[Cheb]

А с версии 3.2.2 еще и так можно

Вааай
Спасибо, не знал