Tarih bulma

[tsamim]

merhaba arkadaşlar ;

Herkese çalışmalarında başarılar dilerim.

Benim şöyle bir problemim var

benim elimde yıl bilgisi yılın kaçıncı haftası ve haftanın kaçıncı günü olduğu verileri var

örneğin 2006 yılı 3 . hafta 4 . günü
bu verilerin hangi tarihe denk geldiğini döndüren örneğin
17.01.2006 gibi bulan bir fonksiyon varmıdır.

şimdiden yardımlarınız için teşekkür ederim.


Not:Aramadan arattım bulamadım benzer bir konu daha önce açılmışsa
özür dilerim lütfen linkini verin.

[serkan]

burata bir bak istersen...

http://www.delphiturkiye.com/index.php? ... tetime.htm

kolay gelsin...

[recepuncu]

fonksiyonu sen yazarsan olur

[sabanakman]

Bu işlem takvim hesaplaması için mi gerekli. Mesela 2006'nın ilk günü Pazar gününe rast gelir ve 1. haftanın 2. günü yoktur. Bu durumda fonksiyon nasıl davranmalı? Yoksa bunlara aldırmadan çalışması isteniyorsa aşağıdaki gibi bir fonksiyon iş görebilir.

Kod: Tümünü seç

function TarihBul(const Yil,Hafta,Gun:Integer):TDateTime;
begin
  Result:=EncodeDate(Yil,1,1)+(Hafta-1)*7+Gun-1;
end;

[tsamim]

ilginiz için teşekkür ederim ;

cevabınız bize bir ışık tuttu sorunuzda çok anlamlı düşünmemiştik haftanın başlangıcının hangi güne denk geldiği ama bizim için önemli olan örneğin
2007 5. haftasının 3 . gününün tarihi bu anlamda yazdığınız fonksiyon üzerinde çalışacağız teşekkür ederiz.