Código Delphi [-] var AColor:TColor; ... AColor:=StringToColor(dm.qryInasistencias.FieldByName('COLOR').asstring); //el datos es clGreen;
var AColor:TColor; ... AColor:=StringToColor(dm.qryInasistencias.FieldByName('COLOR').asstring); //el datos es clGreen;