TIAAddEx

Definition

procedure TIAAddEx(var TIA: TIntArray; const Additions: TIntArray);

Availability

SCAR Divi 3.38 > Current

Description

Adds the values from the TIntArray Additions to the values in TIA.

If Length(TIA) > Length(Additions): TIA[Idx] is assigned Additions[Idx mod Length(TIA)].

Example

var
  TIA: TIntArray;  
 
begin
  TIA := [5, -7, 1, 6, 88];
  TIAAdd(TIA, 5);  
  WriteLn(TIAToStr(TIA));
end.

Output:

10,-2,6,11,93

See Also

• TIAAdd