type
  TTest = tuple
    a: int
    b: int
    c: int
    d: int

var
  bla: TTest

for i in 0 .. 3:
  bla[i] = i + 1

echo(bla) # -> (a: 4, b: 0, c: 0, d: 0)