selam arkadaşlar hayırlı kodlar...
benim önemli ve acil bir sorunum var yardımcı olursanız sevinirim..
şimdi bir formda 31 adet dbgrid im var.bunların herbirinin üzerinde dateedit kontrolü var sanırım jedi nin dateedit componenti.şimdi kullanıcı combobox dan ayı seçtiğinde örneğin EYLÜL'ü seçti dateedit1 01.09.2005 den başlıyor dateedit2 02.09.2005 dateedit3 03.09.2005......dateedit31 e kadar böyle benim derdim mesela 06.09.2005 cumartesine geliyor benim bunu anlayım ona bağlı dbgridin(dbgrid6) colorunu kırmızı yapmam gerekiyor veya enabled=false gibi bişey..delphinin date ünitlerine bakmıştım makaleler kızmından ama pek yardımcı olamadı... şimdiden teşekkürler..
hafta sonuna gelen tarihleri nasıl anlayabilirim...
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Merhaba,
Sanırım istediğiniz DayOfWeek() fonksiyonu.
yazınca 4 rakamını döndürüyor. Buda çarşamba demek. Now yerine istediğiniz tarihi yazarsınız. Now bugünkü tarihtir.
Pazar 1,pazartesi 2,.... Cumartesi 7 oluyor.
İyi çalışmalar.
___________________
ofenX
Sanırım istediğiniz DayOfWeek() fonksiyonu.
Kod: Tümünü seç
showmessage(inttostr(dayofweek(now)));
Pazar 1,pazartesi 2,.... Cumartesi 7 oluyor.
İyi çalışmalar.
___________________
ofenX
Öğrenmek ve öğretmek, akıntıya karşı yüzmek gibidir ilerleyemediğiniz taktirde gerilersiniz.
Umarım bu örnek sana bir fikir verir
a:Integer;
a := DayOfWeek(DATe);
if (a = 1) or (a=7) then Showmessage('Hafta Sonu') else Showmessage('Malesef Hafta İçi');
1=pazar
7=cumartesi
kolay gelsin
a := DayOfWeek(DATe);
if (a = 1) or (a=7) then Showmessage('Hafta Sonu') else Showmessage('Malesef Hafta İçi');
1=pazar
7=cumartesi
kolay gelsin