Zeilen eines Stringgrids färben |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 28.09.2010 |
Folgender Code färbt jede zweite Zeile rot. Dazu wird das OnDrawCell Event verwendet.
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
if not Odd(ARow) and not (gdFixed in State) then
with StringGrid1 do
begin
Canvas.Brush.Color := clRed;
Canvas.FillRect(Rect);
Canvas.TextOut(Rect.Left+2, Rect.Top+2, Cells[ACol, ARow]);
end;
end;
Bei Delphi 3 muss aus dem ACol, bzw. aus dem ARow ein Col bzw. ein Row gemacht werden.
Ähnliche Seiten:
- Text im StringGrid ausrichten
- StringGrid Text vertikal ausgeben
- Stringgrid-Zelle per Programmcode selektieren
- Einträge in einer Listbox markieren
- Schreibschutz bei bestimmten Zellen eines TStringgrid
- Trennlinie im Stringgrid hervorheben
- Äquivalent zu ColSpan in HTML in TStringGrid
- Zeile eines StringGrids löschen
- Zeilen in einem StringGrid tauschen
- Bitmap in ein StringGrid zeichnen