May the solution to your problem should be just :

 TDataExample
 =
  record
    case integer
    of
      0: (mData: Int64);
      1: (mByte: packed array[0..7] of Byte);
      2: (UnionField: Int64);
  end;

?

You aren't going to define a getter or setter method on your property, just an "alias" to mData ?

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Reply via email to