Pointer to a record : it is possible ?

[TroisVerites]

I would like to have a pointer to my TObjectsRecord in the record 'TObjectCurRecord '

 

1) How to do that ?

2) How to use after if the function as parameter like this func( var A :TObjectsRecord ) ?

 

Any help or any solutions ?

 

type
 TObjectRecord = record
   Name: string;       // Object Name (case sensitive).
   Enable: Boolean;    // Object Enabled.
   // 1 Color
   // 2 Bmp
   // 3 DTM
   Src : integer;
   SrcID: integer;
   SrcTol: integer;
 end;

 TObjectsRecord = record
   Arr :array[0..50] of TObjectRecord;
   Cnt : integer;
   Cnt_Max : integer;
 end;

 TObjectCurRecord = record  
   // Pointeur
   //Ptr: ^TObjectsRecord;
   // Use for the function OR_CheckCur.
   Name: string;
   Index: integer;
   Zone : TBox;
 end;

var
 // Use for the function ORP_Cur_Check.
 gObject_Cur: TObjectCurRecord;

[FHannes]

SCAR's scriptengine doesn't support pointers. You should be able to work around that is most cases though...