array of TStringgrid

[matashen]

Hallo zusammen,

ich such grad nach einer Lösung um auf verschieden Stringgrids zuzugreifen ohne ewig IF Abfragen zu bauen.

Ich habe mehrere Stringgrids die ich gerne über einen Index ansprechen würde

Momentan mach ich das zum Beispiel so

Delphi-Quellcode:

Add_Werte2Chart(werte_orte,Chart1.Series[0]);
Add_Werte2Chart(werte_fehlercodes,Chart1.Series[1]);
Add_Werte2Chart(werte_Materialnummer,Chart1.Series[2]);
...
...
Add_Werte2Chart(Quelle: TStringGrid; ZielSerie: TChartSeries);

ich würde das gern aber so lösen

Delphi-Quellcode:

const gridliste: Array[0..2] of TStringgrid=(werte_orte,werte_fehlercodes,werte_Materialnummer); //Geht aber nicht
...
...
Add_Werte2Chart(gridliste[i],Chart1.Series[h]);

Die const Definition akzeptiert mir aber der Compiler nicht, was ich bräuchte wär also wie ich in das Array die Pointer zu den Grids bekomme, ging das über das Handle


Wäre über eine Lösung dankbar

Gruß Matthias