Source position: msestrings.pas line 466
procedure resizearray(
var value;
newlength: Integer;
elementsize: Integer
);