From the because-I-can department... Friday evening operator abuse.

From the because-I-can department... Friday evening operator abuse.

var
  values: Tuple;
  i: integer;
  s: string;
begin
  values := Tuple.From(42, 'foo');

  Tuple.Tie(i, s) <= values;

  WriteLn(i, ', ', s); // 42, foo
end;

or if you don't need 'em all..

procedure Test;
var
  tup: Tuple;
  s: string;
begin
  tup := Tuple.From(42, 'foo');

  Tuple.Tie(Ignore, s) <= tup;

  WriteLn(s); // foo
end;