Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

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

Re: Einzelne Zellen im Grid markieren ??

  Alt 7. Nov 2003, 18: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;
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat