Thema: Delphi Topgrid Zeile markieren

Einzelnen Beitrag anzeigen

haalmu

Registriert seit: 15. Feb 2005
Ort: Oberhausen
13 Beiträge
 
Delphi 5 Enterprise
 
#3

Re: Topgrid Zeile markieren

  Alt 23. Sep 2006, 12:12
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;
  Mit Zitat antworten Zitat