Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#2

Re: Einzelne Zellen im Grid markieren ??

  Alt 7. Nov 2003, 19:41
Im OnDrawCell-Ereignis kann man in die Zellen zeichnen.
Das wird für jede Zelle aufgerufen, wenn sie neu gezeichnet wird.
ACol und ARow gibt die zu zeichnente Zelle an.
In Rect steht die Position der Zelle im StringGrid1.Canvas.

Delphi-Quellcode:
Procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);
  Begin
    {es wird jede Zelle in der 5. Spalte und 3. Zeile rot gefüllt}
    If (ACol = 4) or (ARow = 2) Then Begin {Abfrage ob rot ausgefüllt wird}
      StringGrid1.Canvas.Brush.Color := clRed;
      StringGrid1.Canvas.FillRect(Rect);
    End;
  End;
$2B or not $2B
  Mit Zitat antworten Zitat