On Sat, 16 Oct 2010, Paul Ishenin wrote:
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.
Indeed, and the whole point is to have a type-safe solution. (if a "solution" is needed at all, which still remains to be proved). Michael. -- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
