Quantum Grid Renklendirmek
mooth31.07.2005 - 14:27:20
Merhaba Arkadaşlar Normal Gridlerle

if form2.cari_hareketlerOZELKOD.AsString='Taksit Ödemesi' then begin
DbGridEh1.Canvas.Brush.Color:=$009BE1D1;
DbGridEh1.Canvas.Font.Color:=ClBlack;
end;
DbGridEh1.DefaultDrawColumnCell(Rect, DataCol, Column,State);


DrawColumnCell Olayı İle Bu Şekilde Renklendirilebiliyor...

Peki Bunu Quantum Grid İle Nasıl Yapabilirim. Yardım Edenlere Şimdiden Teşekkürler.
 
rsimsek31.07.2005 - 15:05:36
Yaklaşık olarak aynı şekilde yapıyorsun; View in OnCustomDrawCell ine benzer şekilde;
procedure TFRM_Ihraciye.View1CustomDrawCell(
Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
if Table1Ala1TOPLAM.AsFloat > 150 then
begin
ACanvas.Font.Color := clRed; // yazı rengi
ACanvas.Brush.Color := clYellow; // fon rengi
end
else
begin
ACanvas.Font.Color := clYellow;
ACanvas.Brush.Color := clBlue;
end;
end;
bir kodla ACanvas a istediğin rengi verebilirsin..
 
fahrettin31.07.2005 - 15:09:42
Oncelikle aramıza hoşgeldiniz....
ilk olarak forum kurallarını okumanızı rica ediyorum......

Bu konuda daha once forumda bir kaç kez geçti arama yaparak bu sonuçlara ulaşabilirsiniz....
:1494f4ac1d
diye aratarak ben iki sonuc buldum bile....
 
mooth31.07.2005 - 17:04:59
Arkadaşlar Forum Aramayı Kullanmadığım İçin Özür Dilerim. Dalgın Bir Gün Geçiriyorum. Cevap İçin Teşekkürler...
 
mooth31.07.2005 - 17:19:34
Tekrar Merhaba Verdiğiniz Kod u Denedim Ama Üzerine Tıkladığım Zaman Sarı ya Boyamakta Yani İşime Yaramadı. Diğer Arama Sonuçlarından İse Birşey Çıkaramadım. Tekrar Düzenlerseniz Çok Sevinirim...
 
rsimsek31.07.2005 - 20:19:25
O sadece bir örnekti sen kendi kıstaslarına göre ve oradaki renklerin yerine de kendi seçtiğin renkleri verebilirsin Wink
 
mooth31.07.2005 - 20:32:43
Üstat Kıstasları Zaten Değiştirdim Ama Demek İstediğim Kıstasları Değiştirince Bile Cell Üzerine Tıklama Yaptığım Zaman Sarıya Boyuyor DbGridi Çift Tıklıyorum CxGridDbTableWiev1 i Seçip OnCustomDrawCell Olayına Değiştirdiğim Kodu Yazıyorum. Ama Projeyi Çalıştırdığım Zaman Boyaması Gereken Sütünu Seçtiğim Zaman Fontu Boyuyor. Acaba Version Farkı Falanmı Var Delphi 7 Ve QuantumGrid V5 Lisanslı Kullanıyorum...
 
name01.08.2005 - 13:21:33
Merhaba
Recep bey cevabı zaten vermiş, ancak ben farklı yöntem yazmak istiyorum. Öncelikle form'a "Dev Express" tab'ındaki "TcxStyleRepository" bileşenini ekle. İstediğin renk ve font'ta style oluştur. Sonra TableView'in "OnGetContentStyle" event'ına aşağıdaki kodu yaz. Tabiki "Values[2]" ifadesindeki ikiyi sen kendi cxGrid'indeki renginin değişmesini istediğin Field'ın index'ini yazman gerekli.

Birde tavsiyede bulunmak istiyorum. Karşılaştırma yaptığın field'in sayısal bir değere sahip olmasını sağlar isen daha iyi olur. 'Taksit Ödemesi' değerini 0 yada 1 gibi sayısal bir değer ile saklanmasını sağla database'de.


procedure TForm1.cxGrid1TableView1StylesGetContentStyle(
Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord;
AItem: TcxCustomGridTableItem; out AStyle: TcxStyle);
begin
if ARecord.Values[2] = 'Taksit Ödemesi' then AStyle := cxStyle1;
end;
 
mooth01.08.2005 - 14:59:06
Cevabınız İçin Çok Teşekkür Ederim. Zira Problemim Çözüldü...
 
NOT : Bu sayfa google'un siteyi indekslemesi içindir. www.delphiturkiye.com/forum/ adresini kullanınız!
1998-2006 www.delphiturkiye.com