ClassTMtxVec
var a: TVec; begin CreateIt(a); try a.SetIt(False,[1,2,3,4]); a.IntPower(3); finally FreeIt(a); end; end;