Zelle wird nicht gefärbt

[SaFu]

Upss

Meine Zellen sind geteilt und damit wirds geprüft aber eigentlci heist es auch so

Delphi-Quellcode:

 if LowerCase(Cells[ACol, ARow]) = 'np' then
  begin
   StC.Brush.Color := sNPColor; //Zellenfarbe
   StC.Font.Color := sNPFontColor; //Schriftfarbe
   StC.Font.Style := StC.Font.Style + [fsBold]; //Text fett
  end;