Andre Nunes

Só é possível fazer isso dentro desse evento? Estou criando um código onde ele marca em vermelho os dias que forem feriado. O que eu queria é que na inclusão do dia na lista ele colorisse assim como faz esse código. Segue uma parte do código var primeiroDia, ultimoDia: TDateTime; dia:string; ano,j:Integer; begin ano:= strtoint(FormatDateTime('yyyy',now)); edtDia.text:= inttostr(cbb1.Itemindex + 1); primeiroDia:= EncodeDate(ano ,cbb1.Itemindex + 1,1); ultimodia:= EndOfTheMonth(primeirodia); lst.Clear; for j:=1 To DayOfTheMonth(ultimoDia) do begin dia:= diaDaSemana(primeiroDia); if eFeriado(primeiroDia) then begin feriado:= 'SIM'; //Aqui eu quero Colorir o item inserido end; lst.Items.Add(FormatDateTime('dd/mm/yyy',primeirodia)+ ' '+ dia+ ' ' + Feriado); primeiroDia:= primeiroDia +1; end;