TIAAddEx

From SCAR Divi Manual
Revision as of 16:34, 12 December 2012 by Freddy (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

Definition

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

Availability

SCAR Divi 3.38 > Current

Description

Adds the values from the TIntArray Values to the values in TIA. The functions alternates between the values in Values. When Values is empty, TIA remains unchanged.

Examples

Example 1

var
  TIA: TIntArray;
  
begin
  TIA := [0, 1, 2, 3, 4, 5, 6, 7, 8, 9];
  TIAAddEx(TIA, [9, 8, 7, 6, 5, 4, 3, 2, 1, 0]);
  WriteLn(TIAToStr(TIA));
end.

Output:

9,9,9,9,9,9,9,9,9,9

Example 2

var
  TIA: TIntArray;
  
begin
  TIA := [0, 1, 2, 3, 4, 5, 6, 7, 8, 9];
  TIAAddEx(TIA, [2, 1]);
  WriteLn(TIAToStr(TIA));
end.

Output:

2,2,4,4,6,6,8,8,10,10

See Also