cxGriddeki sadece şarta uyan satırların rengini clicklemede

[delphist]

S.a. Arkadaşlar. cxrid5 kullanıyorum. Tıklama vs. olmadan sadece griddeki şarta uyan satırların rengini değiştirmek istiyorum.

Kod: Tümünü seç

 if dmsatis.TBLTEKLIFEKONAYSIZ.AsString =  'E' then
  begin
   
    ACanvas.Font.Color := clRed; // yazı rengi
    ACanvas.Brush.Color := clYellow; // fon rengi
 end
 else
 begin
   ACanvas.Font.Color := clYellow;
   ACanvas.Brush.Color := clWhite;
end;

[rsimsek]

Öncelikle aramayı tavsiye ederken bir örnek de iliştireyim

Kod: Tümünü seç

procedure TFRM_Chart.VIW_Dokum1TOPLAM_MIKTARCustomDrawCell(
  Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
  AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
  if AViewInfo.GridRecord.Values[VIW_Dokum1TOPLAM_MIKTAR.Index] >
    AViewInfo.GridRecord.Values[VIW_Dokum1KALAN.Index] then
    ACanvas.Font.Color := clRed
  else
    ACanvas.Font.Color := clBlue;
end;

[delphist]

Abi inan ki aradım Allah razı olsun....aramadan sormuyorum sizin mesajınızıda buldum ki yazdığım kod o mesajdan alıntıdır. Yine siz cevap veriyorsunuz deneyecem...

[rsimsek]

demek ki aramadan aramaya fark var

[freeman35]

Ben genede kualağınızı çekeyim Kullanığınız component class vs herşeyi ezbere kullanmayın. Yazılmış çalışan kodları iyice inceleyin, hem kendinizi geliştirirsiniz, hemde birşeyi ararken zorlanmazsınız.

xxGrid için sitelerinde ilk kullanılan cümle şöyle, cxGrid sadece bir grid değildir. Yani cxgrid ile db lerde işlem yapılacaksa, cxgrid üzerinde yapılmalı, çünkü öncecxgrid sonra db senkron edilir. Hatta hız kazansın diye bu senkronu iptalde edebilirsiniz.

Aşağıdaki kullandığım kod iyi bir örnek ve arşivinize saklayın bence bir kolonun rengi başka bir kolondaki değere göre renklendiriliyor. koşulu sağlayan değeri taşıyan kolonda visible ı False

Kod: Tümünü seç

var V : Variant;
begin
   V := AViewInfo.GridRecord.Values[VIW_SatisALL_CONSTS_ID.Index];
   if(V<>Null)and(VIW_SatisLOO_Tipi.VisibleIndex=AViewInfo.Item.VisibleIndex)and
     (VarAsType(V, varInteger)=27)then ACanvas.Brush.Color := $003C68EC;
end;

Kolay gele