Nur mal so als ergänzende Anregung:
Ich habe hier mal eine Lösung über das OnGetContentStyle-Event der Styles-Property der TableView gemacht:
Delphi-Quellcode:
procedure TForm.MycxGridDBTableViewStylesGetContentStyle(Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord; AItem: TcxCustomGridTableItem; var AStyle: TcxStyle);
var
Col: TcxGridColumn;
FieldValue: Variant;
begin
Col := GetColumnByFieldName('Status');
if Assigned(Col) then
begin
FieldValue := ARecord.Values[Col.Index];
if FieldValue <> Null then
begin
// falls FieldValue = "Grün" ==> AStyle := FStyleGruen
// ansonsten falls FieldValue = "Rot" ==> AStyle := FStyleRot
// usw.
end;
end;
end;
Der Code wurde nur mal schnell rauskopiert ohne Anspruch auf Vollständigkeit!
Die Styles (im Beispiel FStyleGruen, usw.) habe ich einfach vorher einmalig erstellt.