Create in Records?

[sarason]

Are there any plans to add the Delphi Create constructor to records and packed records?

regards sarason

[Blaazen]

AFAIK you have to use {$mode delphi} or some directive for enabling advanced records in objfpc mode.
Note that I personally don't use them but I did a quick test in delphi mode now and it works (compiles).

[sarason]

Excellent!  thankyou!!!

sarason

[sarason]

I typed to soon.

The code:
unit MemoryBlock;

{$IFDEF FPC}
 //{$mode delphi}
{$MODE OBJFPC}
{$ENDIF}
interface

uses
  Classes;


type

TMemoryBlock = packed record
    Identifier: LongInt;
    Block: Pointer;
    Size: LongInt;
    Lock: Boolean;
    State: Byte;
    Pad1, Pad2: Byte;

    constructor Create(nbytes: Integer); // lazarus issue

  end;       

got

MemoryBlock.pas(25,5) Fatal: Syntax error, "END" expected but "CONSTRUCTOR" found
in objfppc

MemoryBlock.pas(25,5) Error: Constructors aren't allowed in records or record helpers
in delphi

So do you have a magic setting for the compile environment?

sarason

[Edson]

AFAIK, Constructors on records are not implemented on FPC, until 2.7.1:

http://wiki.freepascal.org/delphi_language_features_which_fpc_does_not_have

I'm still waiting for Destructors on records.

[howardpc]

However, with FPC 2.6.4 (at least, possibly earlier 2.6.x) you can use {$modeswitch advancedrecords} to add an old-style Init function to your record, even if you are not using 2.7.1

[sarason]

Thankyou. I will have to Upgrade!!

Howardpc, Edson and Blaazen

regards sarason