Joao Morais wrote:
writeln('now testing dynamic array');
setlength(v1, 5);
v2 := copy(v1, 2, 10);
writeln('length is: ', length(v2));
v2 := copy(v1, 6, 10); // <<-- here
writeln('length is: ', length(v2));
end.
will raise an exception, range check error iirc, trying to copy
Hello,
The following code:
var
s1, s2: string;
v1, v2: array of byte;
begin
writeln('testing strings');
s1 := 'test';
s2 := copy(s1, 2, 10);
writeln('s2: "', s2, '" which length is ', length(s2));
s2 := copy(s1, 10, 10);
writeln('s2: "', s2, '" which length is ', length(s2));