Tstinggrids über array einfärben

[Vbxler]

Hallo an Alle!

Ich versuche gerade die Zeilen eines Tstinggrids zu färben, das funktioniert auch mit:

Code: Alles auswählen

sgAbfrage.Canvas.Brush.Color := RGBToColor(216, 145, 147) ; 

Jetzt möchte ich aber, da ich mehrere Farben verwende, diese in einem Array ablegen und über einen Index zuweisen:

Code: Alles auswählen

 
var
    aStundStatFarb : array[0..2] of TColor;
begin
    aStundStatFarb[0] := RGBToColor(216, 145, 147) ;   //<== das geht
    aStundStatFarb[1] := RGBToColor(216, 245, 147) ;   //<== das geht
    aStundStatFarb[2] := RGBToColor(216, 345, 147) ;   //<== das geht
    sgAbfrage.Canvas.Brush.Color :=  aStundStatFarb(1);//<== das geht nicht   
 

ich erhalte die Fehlermeldung: ueingabe.pas(1373,69) Error: Incompatible type for arg no. 1: Got "Array[0..2] Of TGraphicsColor", expected "TGraphicsColor"

Wie müsste ich das machen, dass ich die Farben ueber ein Array zuweisen kann?
(FPC 2.7.1)
Danke für Eure Hilfe!


Vbxler

[Michl]

Code: Alles auswählen

aStundStatFarb[1];  //       [ ] statt ( )

[Vbxler]

... das ist aber peinlich ....

Vielen Dank für den Hinweis!