tarih seçimii
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
-
- Üye
- Mesajlar: 839
- Kayıt: 03 Eki 2007 02:00
tarih seçimii
Merhaba Arkadaşar,
Bir alanımda proje PROJE_BASLANGIC var referans tarihim, 19.07.2015 olsun
puantaj eklerken ekranda iki adet DateTimePicker var birine 19.07.2017 birine de 19.08.2017 nasıl eklerim ?
teşekkürler
Bir alanımda proje PROJE_BASLANGIC var referans tarihim, 19.07.2015 olsun
puantaj eklerken ekranda iki adet DateTimePicker var birine 19.07.2017 birine de 19.08.2017 nasıl eklerim ?
teşekkürler
Re: tarih seçimii
Kod: Tümünü seç
DateTimePicker1.Date := StrToDate('19.07.2017');
DateTimePicker2.Date := StrToDate('19.08.2017');
//tarih formatınıza göre . / veya - koyabilirsiniz
"…De ki: "Hiç bilenlerle bilmeyenler bir olur mu? Şüphesiz, temiz akıl sahipleri öğüt alıp-düşünürler" (Zümer Suresi, 9)
-
- Üye
- Mesajlar: 839
- Kayıt: 03 Eki 2007 02:00
Re: tarih seçimii
Cevabınız için teşekkürler fakat bu olmaz tarih değişken 1...2..4..25... olabilir
Re: tarih seçimii
Soruyu tam anlayamadım herhalde
tarih bir değişkende tutuluyorsa
veya soruyu daha ayrıntılı yazın
tarih bir değişkende tutuluyorsa
Kod: Tümünü seç
DateTimePicker1.Date := StrToDate(tarih_degiskeni1);
DateTimePicker2.Date := StrToDate(tarih_degiskeni1);
veya soruyu daha ayrıntılı yazın
"…De ki: "Hiç bilenlerle bilmeyenler bir olur mu? Şüphesiz, temiz akıl sahipleri öğüt alıp-düşünürler" (Zümer Suresi, 9)
-
- Üye
- Mesajlar: 839
- Kayıt: 03 Eki 2007 02:00
Re: tarih seçimii
proje kayıt ederken kayıt edildiği tarih giriliyor.
sonraki aylarda puantaj yapılırken (örnek proje 19.07.2015 de kayıt olsun) her ayın 19 ile sonraki ayın 19 arası puantaj yapılıyor şuan manuel seçiyorum tarihi ama ben istiyorum ki otomatik gelsin.
umarım anlatabilmişimdir.
teşekkürler
ayın başını ve sonunu aşağıdaki kodla getirebiliyorum.
[/code]
sonraki aylarda puantaj yapılırken (örnek proje 19.07.2015 de kayıt olsun) her ayın 19 ile sonraki ayın 19 arası puantaj yapılıyor şuan manuel seçiyorum tarihi ama ben istiyorum ki otomatik gelsin.
umarım anlatabilmişimdir.
teşekkürler
ayın başını ve sonunu aşağıdaki kodla getirebiliyorum.
Kod: Tümünü seç
//////////////ayın son günü
function LastDayOfCurrentMonth: TDate;
var
y, m, d: word;
begin
decodedate(now, y, m, d);
m := m + 1;
if m > 12 then
begin
y := y + 1;
m := 1;
end;
result := encodedate(y, m, 1) - 1;
end;
//////////////ayın son günü son
Kod: Tümünü seç
[code]var
DTTarih : tDateTime;
begin
dtTarih := StartOfTheMonth( IncDay( StartOfTheMonth( Now() ), 0 ) );
dtpBASLANGIC.Date:= DTTarih;
dtpBITIS.Date:=LastDayOfCurrentMonth;
Re: tarih seçimii
post işlemi esnasında (beforepost esnasında) puantaj tarih alanların gün bilgisini kayıt tarihinden alsın ay ve yıl bilgilerini +1 ile arttırsın ve kaydetsin olabilirmi acaba yanlış anlamadım ise
kolay gelsin
kolay gelsin
-
- Üye
- Mesajlar: 839
- Kayıt: 03 Eki 2007 02:00
Re: tarih seçimii
sanırım ben anlatamadım
proje kayıt tarihi x yılın x ayın 19. günü olsun
basitçe ikitane DateTimePicker1 (19.07.2017) mevcut ayın günü DateTimePicker2 (19.08.2017) sonraki ayın günü gelsin bukadar
burda proje kayıt tarihi x gün olabilir yani otomatik tarihde değişir 15.01.2016.... 10.07.2016 vs
teşekkür ederim ilgi ve alakanız için
proje kayıt tarihi x yılın x ayın 19. günü olsun
basitçe ikitane DateTimePicker1 (19.07.2017) mevcut ayın günü DateTimePicker2 (19.08.2017) sonraki ayın günü gelsin bukadar
burda proje kayıt tarihi x gün olabilir yani otomatik tarihde değişir 15.01.2016.... 10.07.2016 vs
teşekkür ederim ilgi ve alakanız için
Re: tarih seçimii
Merhaba,
Sorunuzdan anladığım şu: Kullanıcı bir tarih girsin. Ben otomatik bir ay sonraki tarihi hesaplayıp diğer alana yazayım. Bunu aşağıdaki gibi yapmak mümkün olabilir.
Tarih değişir değişmez diğer DateTimePicker'da değişsin istiyorsanız yukarıdaki kodu TDateTimePicker.OnChange() olayına yazmanız gerekir.
Sorunuzdan anladığım şu: Kullanıcı bir tarih girsin. Ben otomatik bir ay sonraki tarihi hesaplayıp diğer alana yazayım. Bunu aşağıdaki gibi yapmak mümkün olabilir.
Kod: Tümünü seç
uses
DateUtils;
procedure TForm1.Button1Click(Sender: TObject);
begin
DateTimePicker2.Date := IncMonth(DateTimePicker1.Date);
end;
-
- Üye
- Mesajlar: 839
- Kayıt: 03 Eki 2007 02:00
Re: tarih seçimii
yok hocam bu değil.
projem 05.05.2015 başladı.
puantaj ekranını açtığımda mevcut ay yıl gelsin ama gün 05 gelsin ikinci tarihte sonraki ayın 05 gelsin.
teşekkürler
projem 05.05.2015 başladı.
puantaj ekranını açtığımda mevcut ay yıl gelsin ama gün 05 gelsin ikinci tarihte sonraki ayın 05 gelsin.
teşekkürler
Re: tarih seçimii
Bazen "Soru sormak cevap, vermekten daha zor galiba" diye düşünüyorum
There's no place like 127.0.0.1
-
- Üye
- Mesajlar: 839
- Kayıt: 03 Eki 2007 02:00
-
- Üye
- Mesajlar: 839
- Kayıt: 03 Eki 2007 02:00
Re: tarih seçimii
erdogan_ozkaya yazdı:yok hocam bu değil.
projem 05.05.2015 başladı.
puantaj ekranını açtığımda mevcut ay yıl gelsin ama gün 05 gelsin ikinci tarihte sonraki ayın 05 gelsin.
teşekkürler
Kod: Tümünü seç
uses
DateUtils;
procedure TForm2.FormCreate(Sender: TObject);
begin
DateTimePicker1.Date := EncodeDate(YearOf(Now()), MonthOf(Now()), 5);
DateTimePicker2.Date := IncMonth(DateTimePicker1.Date);
end;