TStringGrid OnDrawCell - Bestimmte Felder makieren

[Volker Z.]

Zitat:

Nö, das ist ein harter Typecast.

Stimmt. Besser:

Delphi-Quellcode:

var
  f : TFormat;
begin
  if StringGrid1.Objects [ACol, ARow] is TFormat then
    begin
      f := TFormat (StringGrid1.Objects [ACol, ARow]);

      StringGrid1.Canvas.Font.Color := f.Color;
      StringGrid1.Canvas.Font.Style := f.Style;
      // usw.
    end
end;

Gruß