تاریخ شمسی [بایگانی]

_abiriamir

پنج شنبه 21 خرداد 1388, 13:34 عصر

با سلام خدمت اساتید دلفی
میدانم که در مورد تاریخ شمسی در این سایت و سایت های دیگر زیاد بحث شده
من در برنامه ام باید از تاریخ شمسی استفاده کنم و یونیت زیر را برای این کار از یک سایت دریافت کرده ام.
ضمن تشکر از سازنده یونیت باید بگم که مشکلاتی دارد اما حل آن ها میتواند کار جالبی باشد

اولین مشکلی که من در این یونیت پیدا کرده ام تبدیل تاریخ شمسی به میلادی آن است که اگر تصحیح شود خوب است
همچنین این یونیت تاریخ امروز را درست حساب میکند ولی تاریخ فردا را خیر!!!
این مساله واقعا مرا متعجب کرده یعنی اگر امروز 2009/11/6 باشد تاریخ امروز را درست حساب میکند
روزهای دیگر هم تاریخ را درست حساب میکند اما تاریخ فردا را امروز حساب نمیکند!!!!!!!!!

همچنین اگر یونیت دیگری نیز برای این کار دارید اگر ارائه کنید ممنون میشوم

merced

پنج شنبه 21 خرداد 1388, 22:59 عصر

اين درست كار مي كنه و تقريبا كامله
http://barnamenevis.org/forum/attachment.php?attachmentid=25573&d=1226947816

mehdimdp

جمعه 22 خرداد 1388, 02:14 صبح

اين درست كار مي كنه و تقريبا كامله
http://barnamenevis.org/forum/attachment.php?attachmentid=25573&d=1226947816

منم از اين يونيت استفاده ميكنم .
روش استفاده هم به اين صورته كه
مثلا براي تبديل ميلادي به شمسي ابتدا بايد تاريخ ميلادي رو توي سه تا متغير ازنوع word ديكود كني بعدش بفرستيش به تابع GregorianToSolar
كه اين تابع خودش مياد روز و ماه و سال رو به شمسي برميگردونه
اگه يونيت رو باز كني توضيحات كاملي اولش اومده

_abiriamir

جمعه 22 خرداد 1388, 21:23 عصر

ضمن تشکر از شما از شما درخواست میکنم که برای تبدیل تاریخ میلادی به شمسی برایم بزنید.

mehdimdp

شنبه 23 خرداد 1388, 11:48 صبح

var
a,b,c:word;
begin
DecodeDate(now,a,b,c);
GregorianToSolar(a,b,c);
ShowMessage(Format('%d/%d/%d',[a,b,c]));
end;