ttVarByRef, ttArgByRef