Ne, er prüft das doch in der 7. Spalte oder nicht?
Schließlich ist die if Abfrage und das Uppercase
an der stelle
Delphi-Quellcode:
case SubItem of
...
7:
begin
if Uppercase(Item.Caption) = 'JA'
then Font.Color := clGreen
else Font.Color := clRed;
end;
...
Oder ich versteh den Code nicht. Kann ja auch sein.