El siguiente código Delphi Win32, es un puntero a un registro con un campo de enlaze del tipo puntero:
PDefineRec = ^TDefineRec;
TDefineRec = record
Defined: Boolean;
StartCount: Integer;
Next: PDefineRec;
end;
Esta lista enlazada es fácilmente convertible en una clase Delphi Prism:
{$IFDEF PRISM}PDefineRec = TDefineRec;{$ELSE}PDefineRec = ^TDefineRec;{$ENDIF}
TDefineRec = {$IFNDEF PRISM}record{$ELSE}class public{$ENDIF}
Defined: Boolean;
StartCount: Integer;
Next: PDefineRec;
end;
José Castillo