Variant和Tstream这间相互转化
所在单元
Variants
function VarArrayLock(const A: Variant): Pointer;
VarArrayLock锁定给定的变量数组,并返回一个指针数组中存储的数据。锁定时,一个Variant数组不能被调整和任何VarArrayRedim的调用将失败。一旦锁定,一个Variant数组必须使用VarArrayUnlock后来被解锁。如果由一个给定的变种,是不是一个数组,一个EVariantError将引发异常。
返回的指针数组元素,其中最左边的尺寸先增加VarArrayLock点。换句话说,返回的数组指针的尺寸逆转从变异阵列的尺寸。
VarArrayLock一旦被证实,一个Variant数组有正确的边界和尺寸,可用于直接访问阵列中的数据,从而提高性能。
function VarArrayCreate(const Bounds: array of Integer; AVarType: TVarType): Variant;