Коллеги, подскажите, как правильно добавить string в array of TVarRec?
function Test: string;
var
xPars: array of TVarRec;
xS: string;
begin
xS := 'abc';
SetLength(xPars, 1);
xPars[0].VType := vtUnicodeString;
xPars[0].VUnicodeString := @xS;
// Ожидаю одинакового результата в следующих строках, однако:
Result := Format('Res:%s', ['abc']); // Result= 'Res:abc'
Result := Format('Res:%s', [xS]); // Result= 'Res:abc'
Result := Format('Res:%s', xPars); ...
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83766