In Turbopascal it was possible with offs()

type
 rectype = record
  var1 : longint;
  var2 : longint;
  var3 : boolean;
 end;

var
 o : longint;
 recvar : rectype;

 o := offs( recvar.var1 );  // --> 0
 o := offs( recvar.var2 );  // --> 4
 o := offs( recvar.var3 );  // --> 8
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to