Hi. I have a problem with a procedure to append values in the finish of an array. The procedure is:
procedure AgregarRegistroAlFinalDeArray(var iArray: array of integer; iRegistro: integer);
var
iRegistroArray: integer;
begin
iRegistroArray:=length(iArray);
SetLength (iArray, iRegistroArray + 1);
iArray[iRegistroArray]:= iRegistro;
end;
The compiler launch an error in the line "SetLength (iArray, iRegistroArray + 1);".
Somebody can help me?.
Greeting, Gabriel.