StringGridin her hücresine ayrı renk verme

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
zagamedline
Üye
Mesajlar: 14
Kayıt: 01 Nis 2006 12:01
Konum: mersin
İletişim:

StringGridin her hücresine ayrı renk verme

Mesaj gönderen zagamedline »

arkadaşlar merhaba;

bi randevu sayfası hazırladım.... her hücreye farklı renk vermek ve randevu bilgilerini görmek istiyorum... renk verebiliyorum fakat bu sefer de
tüm randevuda yazılı olan bilgiler kayboluyor...

Kod: Tümünü seç

procedure Trezervasyon.rezerDrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var
t:integer;
begin

rezerv.First;
for t:=0 to rezerv.RecordCount-1 do
begin

if (ACol=rezervoda.AsInteger) and (ARow=rezervsatir.AsInteger) then
  begin
    if (rezervoda_adi.AsString='') or (rezervoda_adi.IsNull) then rezer.Canvas.Brush.Color := clWhite // renk yoksa beyaz
    else rezer.Canvas.Brush.Color :=rezervoda_adi.AsVariant ; // data kaydında  renk ' $00004F00 ' şeklide kayıtlı
    rezer.Canvas.FillRect(Rect);
  end;
rezerv.Next;
end;

rezer.Hint:=rezer.Cells[acol,arow] ;
rezer.ShowHint:=true;

end;
yukarıdaki kodu acaba stringGridin başka bir olayına mı? yazmalıyım.. Lütfen Yardım olun...
Herşey, Yeri ve Zamanı Geldiğinde Olacaktır...

Za-Ga-Med-Line

http://www.kimseyokmu.org.tr
Kullanıcı avatarı
Battosai
Üye
Mesajlar: 1316
Kayıt: 01 Eki 2007 12:02
Konum: Ankara

Re: StringGridin her hücresine ayrı renk verme

Mesaj gönderen Battosai »

Evet yöntem yanlış...dataseti burda döngüye sokmak hatalı...yapılması gereken...hücredeki veriye göre reklendirme yapmak...
örneğin başında "-" olan bir text için şu renk şu font gibi.Bunun çeşitlemesi çok olur sen kendi veri yapına göre ayarlarsın...örneğin ben randevu aralıklarını # işareti ile belirlemiştim...böylece grid içinde # işareti olanların renkleri aynı oluyordu...tabiki font renginide aynı yapınca sanki renklendirilmiş bir sütün gibi oluyor...drawcell içinde kesinlikle döngü kullanma programında hatalara neden olacaktır çünkü her değişimde tetiklenir bu olay...
zagamedline
Üye
Mesajlar: 14
Kayıt: 01 Nis 2006 12:01
Konum: mersin
İletişim:

Re: StringGridin her hücresine ayrı renk verme

Mesaj gönderen zagamedline »

tşkler. arkadaş....


yine tüm dataları taramam gerekmeyecek mi?

daha açıklayıcı birşeyler yazsan veya örnek bi kod varsa....

çok makbule geçer...
Herşey, Yeri ve Zamanı Geldiğinde Olacaktır...

Za-Ga-Med-Line

http://www.kimseyokmu.org.tr
Cevapla