16.10.2010 22:11, Benito van der Zander wrote:
Or more flexible:CstomData: packed record case integer of 0 : (i64: int64); 1 : (lo32, hi32 : Cardinal); 2 : (Words : Array[0..3] of Word); 3 : (Bytes : Array[0..7] of Byte); 4 : (p : pointer); 5 : (obj : TObject); end;
You just invented a Variant type. Best regards, Paul Ishenin. -- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
