Вопрос по переводу исходника из delphi в fpc диалект

[Сквозняк]

Столкнулся со сложностью компиляции в {$mode fpc} демки "demos/FreePascal/15 - Video/demo15.pas" из движка http://zengl.org/zengl/zengl-src-0.3.12.7z Движок написан на дельфийском диалекте и это меня как-то не волнует, а вот демку надо переписать на fpc диалект. С фрагмента

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

      // EN: Rendering the current video frame in the center of screen using parameters of it from video.Info.
      // RU: Рендеринг текущего кадра видео в центре экрана используя параметры из video.Info.
      ssprite2d_Draw( video.Texture, ( 800 - video.Info.Width ) / 2, ( 600 - video.Info.Height ) / 2, video.Info.Width, video.Info.Height, 0 );

и начинается веселуха: никак не набрутфорсить, как на fpc диалекте записать video.Texture и video.Info.Width В соседнем каталоге есть та же демка и для лазаруса, то есть классы посмотреть можно.

[скалогрыз]

{$mode delphi} можно назначить на уровне модуля.
а как вывод - переписывать не нужно.

Вообще почему это режим "fpc" а не "objfpc"?

но если лень разбираться, то брутфорсить нужно так:

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

ssprite2d_Draw( video^.Texture, ( 800 - video^.Info^.Width ) / 2, ( 600 - video^.Info^.Height ) / 2, video^.Info^.Width, video^.Info^.Height, 0 )


[Сквозняк]

{$mode delphi} можно назначить на уровне модуля.а как вывод - переписывать не нужно.

Этот метод хорош для движка, а если его использовать в его использующей демке - коготок увяз, вся птичка увязнет.

Вообще почему это режим "fpc" а не "objfpc"?

Во избежание непредвиденных сложностей. Код в основном процедурный, наворотов объектпаскаля не требующий, всё что требует объектпаскаля - собрано в отдельные модули.

но если лень разбираться, то брутфорсить нужно так:

А я video.^Texture пытался компилятору скормить А надо было video^.Texture и video^.Info.Width

[скалогрыз]

вот тут почитать можно

Во избежание непредвиденных сложностей. Код в основном процедурный, наворотов объектпаскаля не требующий, всё что требует объектпаскаля - собрано в отдельные модули.

понятно... ну тебя ждёт ещё много непредвиденных сложностей.