auf ein Record in einem Record in einer Schleife zugreifen

[soulies]

hoi,

Delphi-Quellcode:

type
  Tyyy = record
     a:string;
     b:integer;
     c:Double;
  end;

type
  Txxx = record
     Value:string;
     y1 : Tyyy ;
     y2 : Tyyy ;
     y3 : Tyyy ;
  end;

var
  xxx : Txxx ;

wie kann ich nun in einer Schleife von 1-3 über die Variable 'xxx' auf das entsprechende 'y' zugreifen ?

so nach dem Motto:

Delphi-Quellcode:

with xxx do
begin
  for i:=1 to 3 do
  begin
    (Find...(Format('y%d',[i])) as Tyyy).a := '...' ;
  end;
end;

cya