datetimepicker1 wmonth wyear ayırma

[erdogan]

merhaba,

aşağıdaki kod ile sistem tarihi geliyor, datetimepicker1 seçimini, yılı ve ayı nasıl alabilirim ? 

Teşekkürler

const
 Aylar: array[1..12] of string = ('Ocak', 'Şubat', 'Mart', 'Nisan', 'Mayıs', 'Haziran', 'Temmuz', 'Ağustos', 'Eylül', 'Ekim', 'Kasım', 'Aralık');
var
 Ay: TSystemTime;
 Yil: TSystemTime;
begin


 GetLocalTime(Ay);
 GetSystemTime(Yil);
 ComYil.ItemIndex := ComYil.Items.IndexOf(IntToStr(Yil.wYear));
 ComAy.ItemIndex := ComAy.Items.IndexOf(Aylar[Ay.wMonth]);

[mcuyan]

Hocam konuyu biraz daha açarmısınız. soruyu anlamadım?

[enigma]

FormatDateTime(); fonksiyonunu kullanabilirsiniz. Bunu kullanırsanız yukarıdaki gibi dizi üzerinde ay isimlerini tanımlamanıza gerek yok.

ShowMessage(FormatDateTime('dd mmmm yyyy dddd', DateTimePicker1.Date));

ekrana gelecek olan sonuç: "16 Ocak 2021 Cumartesi" olacaktır.

[erdogan]

merhaba,

hocam kod ile combobox a sistem ay ve yili geliyor bunu manuel yapmak istiyorum datetimepicker ile

[mrmarman]

USES'a ekli değilse DateUtils unitini eklerseniz DayOf() MonthOf() YearOf() fonksiyonları işinizi görecektir. Bunlar bir tarihten gün, ay, yıl hanesini döndürür

[erdogan]

(16-01-2021, Saat: 20:03)mrmarman Adlı Kullanıcıdan Alıntı: USES'a ekli değilse DateUtils unitini eklerseniz DayOf() MonthOf() YearOf() fonksiyonları işinizi görecektir. Bunlar bir tarihten gün, ay, yıl hanesini döndürür

Çok Teşekkür ederim.

 ComYil.ItemIndex := ComYil.Items.IndexOf(IntToStr(YearOf(DateTimePicker1.Date)));