Topgrid Zeile markieren

[haalmu]

Erstmal vielen dank für die schnelle Antwort.Ich habe unten mal ein Codeschnipzel eingestellt.
Es wird im Grid Tabellenpapier dargestellt.Was auch soweit funktioniert. Nun möchte ich aber gerne
die ganze Aktuelle Zeile, nicht nur die Zelle in einer anderen Farbe darstellen. ZBsp: Text rot, Zeile weiß oder was auch immer. Vielleicht kann jemand helfen.Vielen Dank im vorraus




procedure TfrmMain.grdArtikelVerwaltungGetDrawInfo(Sender: TObject;
DataCol: Integer; DataRow: Variant; var DrawInfo: TtsDrawInfo);


begin

if Odd(grdArtikelVerwaltung.DataSource.DataSet.RecNo) and (grdArtikelVerwaltung.GridStatus = grNormal) then begin
DrawInfo.Color := clAqua;
grdArtikelVerwaltung.FocusColor := clAqua;
end else begin
DrawInfo.Color := clInfoBK;
grdArtikelVerwaltung.FocusColor := clInfoBK;
end;
end;