TIAInsert
From SCAR Divi Manual
Definition
function TIAInsert(var TIA: TIntArray; const Index, Int: Integer): Integer;
Availability
SCAR Divi 3.34 > Current
Description
Inserts the given integer Int at an index Index in the given TIntArray TIA. If Index is smaller than 0 the function will append the element at the front of the array. If Index is larger than or equal to the length of the array, the item will be appended to the back of the array. The index of the inserted element is returned.
Example
var TIA: TIntArray; begin TIA := [0, 1, 3]; WriteLn(TIAInsert(TIA, 1, 8)); WriteLn(TIAInsert(TIA, -500, 8)); WriteLn(TIAInsert(TIA, 500, 8)); WriteLn(TIAToStr(TIA)); end.
Output:
1 0 5 8,0,8,1,3,8