z.B. so für Zeile 3
Delphi-Quellcode:
Procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
[...]
Begin
[...]
With (Sender As TStringGrid) Do Begin
If ARow = 3 Then Begin
Canvas.Font.Style := [fsBold];
Canvas.TextOut(Rect.Left, Rect.Top, StringGrid1.Cells[ACol, ARow]);
End;
End;
[...]
End; // OnDrawCell
Edit: ah, schon selber rausgefunden
