array of TStringgrid

[Photoner]

Da war einer schneller

Mein Vorschlag bläst in dasselbe Horn.

Mach einfach eine Variable daraus:

Delphi-Quellcode:

var
  Form2: TForm2;
  gridliste : Array[0..2] of TStringGrid;

und dann im FormCreate mit Leben füllen:

Delphi-Quellcode:

procedure TForm2.FormCreate(Sender: TObject);
var
  i : Integer;
begin
  for I := 0 to 2 do
    gridliste[i]  :=  TStringGrid.Create(Self);
  //oder deine [U]vorher erzeugten[/U] Listen werte_orte,werte_fehlercodes,werte_Materialnummer zuweisen
  //gridliste[0] := werte_orte;
  //...
end;