Luiz Americo Pereira Camara wrote:
TVirtualNodePacked = packed record
Index, //Offset 0 ChildCount: Cardinal; //Offset 4
NodeHeight: Word; //Offset 8
States: TVirtualNodeStates; //Offset 10 *
Align: Byte; //Offset 14 ** CheckState: TCheckState;
//Offset 15 **
CheckType: TCheckType; //Offset 16
Dummy: Byte; //Offset 17 TotalCount: Cardinal; //Offset
18 *
[...]
TVirtualNodePacked = packed record
Index, //Offset 0
ChildCount: Cardinal; //Offset 4
NodeHeight: Word; //Offset 8
States: TVirtualNodeStates; //Offset 10 *
Align: Byte; //Offset 14 **
CheckState: TCheckState; //Offset 15 **
CheckType: TCheckType; //Offset 16
Dummy: Byte; //Offset 17
TotalCount: Cardinal; //Offset 18 *
[...]
The mail editor scrambled the record structure. I hope this time is more
clear.
Luiz
_______________________________________________
fpc-devel maillist - fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel