procedure _VarToPStr(var S; const V: TVarData);
_VarToPStr( S, const TVarData V);
Variants
This is function Variants._VarToPStr.