var a,b: Vector; bvec: TVec; begin a := Vector.Create(true); //create from object cache via CreateIt //this constructor can be omitted, because it is implictely called //the first time that the variable is used. //However: b := Vector.Create(10); //Similar to bvec := TVec.Create; try bvec.Size(10); finally bvec.Free; //b is freed on the exit from the procedure end; end;