Пытаюсь установить GLScene на Lazarus 1.014.
Вылезают косяки.
- Код: Выделить всё
type
PGLPoint2D = ^TGLPoint2D;
TGLPoint2D = record
X: Single;
Y: Single;
public
constructor Create(X, Y : Single);
procedure SetPosition(const X, Y : Single);
function Add(const APoint2D: TGLPoint2D): TGLPoint2D;
function Length: Single; //distance to origin
function Distance(const APoint2D : TGLPoint2D) : Single;
procedure Offset(const ADeltaX, ADeltaY : Single);
end;
- идёт ругань на constructor: C:\lazarus\components\GLScene\Source\GLTypes.pas(35,7) Error: Constructors aren't allowed in records or record helpers
Как я понял, конструкторы нельзя использовать в записях в FPC, а в Delphi - можно. {$MODE DELPHI} не помогает.
Как можно обойти эту проблему?