کامپوننت یا کد تبدیل تاریخ به قمری

واضح آرشیو وب فارسی:سایت ریسک: View Full Version : کامپوننت یا کد تبدیل تاریخ به قمری Masood_Heidarnia25-03-2008, 10:13 PMبا سلام من جستجو کردم ولی هیچکدوم به نتیجه نرسیده بود. اگه سراغ دارید لطفا لینک بدید. به یه کامپوننت تبدیل تاریخ (شمسی یا میلادی) به قمری نیاز دارم. برای دلفی 7 یه کامپوننتی (ترجیحا با سورس) که یه تاریخ بهش بدیم و تاریخ قمری را بهمون برگردونه. تا 14 فروردین بهش نیاز خیلی ضروری دارم. لطفا راهنمایی بفرمایید. با تشکر mabnarayaneh29-03-2008, 12:32 PMدوست عزيز: با سلام و عرض تبريك سال نو يونيت Dates.pas را برايتان گذاشتم. اين يونيت را از زبان وي بي به دلفي برگردان كرده‌ام. اميدوارم بتوانيد با تفسير اين يونيت، پارامترهاي توابع را درست به كار ببريد. اگر مشكلي در استفاده داشتيد، پيغام بگذاريد. !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! فهرست توابع و رويه‌ها به اين صورت است: shamsidif(): براي محاسبه‌ي روزهاي بين دو تاريخ شمسي Qamaridif(): براي محاسبه‌ي روزهاي بين دو تاريخ قمري miladidif(): براي محاسبه‌ي روزهاي بين دو تاريخ ميلادي isqamarileapyear(): براي مشخص كردن اين كه آيا يك سال قمري، كبيسه هست يا خير isshamsileapyear(): براي محاسبه‌ي اين كه آيا يك سال شمسي، كبيسه هست يا خير ismiladileapyear(): براي مشخص كردن اين كه آيا يك سال ميلادي، كبيسه هست يا خير addtoshamsi(): به يك تاريخ شمسي به تعداد دلخواه، روز اضافه كرده و تاريخ جديد را بر مي گرداند addtoqamari(): به يك تاريخ قمري به تعداد دلخواه، روز اضافه كرده و تاريخ جديد را بر مي گرداند shamsitoqamari(): يك تاريخ شمسي را به تاريخ قمري معادلش تبديل مي كند shamsitomiladi(): يك تاريخ شمسي را به تاريخ ميلادي معادلش تبديل مي‌كند qamaritomiladi(): يك تاريخ قمري را به تاريخ ميلادي معادلش تبديل مي ‌كند qamaritoshamsi(): يك تاريخ قمري را به تاريخ شمسي معادلش تبديل مي‌كند miladitoshamsi(): يك تاريخ ميلادي را به تاريخ شمسي معادلش تبديل مي‌كند miladitoqamari(): يك تاريخ ميلادي را به تاريخ قمري معادلش تبديل مي‌كند shamsinextday(): يك تاريخ شمسي را يك روز به جلو مي‌برد qamarinextday(): يك تاريخ قمري را يك روز به جلو مي‌برد shamsiprevday(): يك تاريخ شمسي را يك روز به عقب مي‌برد qamariprevday(): يك تاريخ قمري را يك روز به عقب مي‌برد shamsievent(): رويدادهاي ملي يك تاريخ شمسي را برمي‌گرداند. مثلا براي تاريخ 86/11/5 برمي‌گرداند: "انتخابات اولين دوره‌ي رياست جمهوري اسلامي ايران" qamarievent(): رويدادهاي اسلامي يك تاريخ قمري را برمي‌گرداند مثلا براي تاريخ 1429/1/10 برمي‌گرداند: "عاشوراي حسيني" universalevent(): رويدادهاي جهاني يك تاريخ ميلادي را برمي‌گرداند shamsiyearname(): نام يك سال شمسي را برمي‌گرداند، سال مار، سال سگ... shamsidayname(): مشخص مي‌كند كه يك تاريخ شمسي، چند شنبه است shamsidayofweek(): مشخص مي‌كند كه يك تاريخ شمسي، چندمين روز هفته است qamaridayname(): مشخص مي‌كند كه يك تاريخ قمري، چند شنبه است qamaridayofweek(): مشخص مي‌كند كه يك تاريخ قمري، چندمين روز هفته است miladidayname(): مشخص مي‌كند كه يك تاريخ ميلادي، چند شنبه است miladidayofweek(): مشخص مي‌كند كه يك تاريخ ميلادي، چندمين روز هفته است shamsimonthname(): عدد يك ماه شمسي را گرفته و نام آن ماه را برمي‌گرداند qamarimonthname(): عدد يك ماه قمري را گرفته و نام آن ماه را برمي‌گرداند miladimonthname(): عدد يك ماه ميلادي را گرفته و نام آن ماه را برمي‌گرداند البته در خصوص تاريخ‌هاي قمري توجه داشته باشيد كه مقادير حاصل، هميشه درست نيستند. تاريخ قمري از روي وضعيت هلال ماه محاسبه مي‌شود. بنا بر گواه همه‌ي منجمين، وضعيت هلال ماه به هيچ عنوان قابل محاسبه و پيش‌بيني نيست و لذا ممكن است براي برخي از تاريخ‌ها، يك روز اختلاف پيش بيايد. مثلا براي تعيين روز اول ماه شوال (عيد فطر) ممكن است يك روز زودتر يا ديرتر اعلام شود. اين يكي ديگر از معجزات آخرين دين الهي است كه از هزار و چهارصد سال قبل، دستور داده است كه هر انساني خودش بايد به بررسي وضعيت ماه بپردازد و با وجود پيشرفت‌هاي بسيار شگرف در نجوم و رياضيات و رايانه و ... هنوز بشر امروزي نتوانسته اين قانون را نقض كند. موفق باشيد. skmkh605630-03-2008, 08:46 AMتست کردم. درست کار نمیکنه mabnarayaneh30-03-2008, 03:19 PMدرست كار مي‌كنه. من خودم باهاش يه تقويم نوشتم كه كاملا درسته. كدت رو بفرست تا بگم كجا مشكل داري. NoneForce30-03-2008, 03:25 PMاين يكي ديگر از معجزات آخرين دين الهي است كه از هزار و چهارصد سال قبل، دستور داده است كه هر انساني خودش بايد به بررسي وضعيت ماه بپردازد و با وجود پيشرفت‌هاي بسيار شگرف در نجوم و رياضيات و رايانه و ... هنوز بشر امروزي نتوانسته اين قانون را نقض كند. سلام اين جمله لازمه استفاده از كد است يا دليل ديگري داشت كه در بخش دلفي به آن اشاره كرديد؟!! mabnarayaneh30-03-2008, 11:53 PMاين جمله لازمه استفاده از كد است يا دليل ديگري داشت كه در بخش دلفي به آن اشاره كرديد؟!! ربطي به دلفي نداشت. اما توجه داشته باشيد كه علم محض، راه گشا نيست. مثل اين كه بگوييم فرمول‌هاي رياضي ربطي به دلفي ندارند و نبايد در دلفي مطرح شوند. علوم، سرچشمه‌ي واحدي دارند و اگر به طور محض به يك علم خاص بپردازيد، حداقل اين است كه ديرتر به هدف مي‌رسيد. به هر حال، شايد مطلبي كه نوشتم، يك زنگ تفريح كوچولو باشد... :23: flashdes28-08-2008, 11:44 AMسلام قربان اخطار دانلود ميده من ميخوام چي كار كنم zahra 63t19-12-2008, 06:32 PMسلام من این فایل رو به شدت نیاز دارم لطفا دوباره آپلودش کنید چون خطای دانلود می ده ممنون می شم massude22-12-2008, 12:08 PM"اين يكي ديگر از معجزات آخرين دين الهي است كه از هزار و چهارصد سال قبل، دستور داده است كه هر انساني خودش بايد به بررسي وضعيت ماه بپردازد و با وجود پيشرفت‌هاي بسيار شگرف در نجوم و رياضيات و رايانه و ... هنوز بشر امروزي نتوانسته اين قانون را نقض كند." عزیزم این حرف ها مال 1400 سال پیشه شما اگر کارل فردریش گوس را می شناختید هیچ وقت این حرف را نمی زدید. NetDesigner29-05-2009, 11:21 AMدوستان ممنون میشم این یونیت را مجددا آپلود نمایید NetDesigner29-05-2009, 11:23 AMدوستان ممنون میشم اگر کسی این یونیت را دارد مجدد آپلود نماید golbafan17-07-2009, 11:25 AMعزیزم این حرف ها مال 1400 سال پیشه شما اگر کارل فردریش گوس را می شناختید هیچ وقت این حرف را نمی زدید. برات متاسفم که قدر خودتو نمیدونی شما اگر: خوارزمی ابوعلی سینا شیخ طوسی خیام شیخ بهایی ملاصدرا فردوسی و سعدی و حافظ و مولانا و هزارتای دیگر رو میشناختی این حرفا رو نمیزدی همه دانشمندای ما بواسطه اسلام و تعلیمات اسلامی به این درجات بالا رسیدند و دانشمندان غربی هم بواسطه کمک گرفتن از نبوغ دانسمندان ایرانی پیشرفت کردند... shahrokhkian17-07-2009, 05:17 PMهمه دانشمندای ما بواسطه اسلام و تعلیمات اسلامی به این درجات بالا رسیدند و دانشمندان غربی هم بواسطه کمک گرفتن از نبوغ دانسمندان ایرانی پیشرفت کردند... دوست عزیز بهت پیشنهاد می کنم حتماً تاریخ ایران و جهان را بخونی تا پیشرفتهای ایرانیان را حداقل از 2500 سال پیش که مکتوب وجود داره به چیزی غیر از خود ایرانی ها وصل نکنی. ایرانیها از 2500 سال پیش برده داری را منع کردند و ارزشهای انسانی را ارج نهادند. ایرانیان از ابتدا یکتا پرست بودند و کسی را مجبور به پذیرش اعتقاد خود نمی کردند و به همه عقاید احترام می گذاشتند و در برابر ظلم می ایستادند. به ترویج علم و انسانیت و عدالت در دنیا شهره بودند. ابتکارات و اختراعات فراوان ایرانیان قبل از هجوم وحشیانه اعراب به این سرزمین و ویران کردن آن را مطالعه کنید و ابتدا به ایرانی بودن خود و سپس مسلمانی خود افتخار کن. مثل فردوسی که به هیچ وجه حس میهن پرستی خود را به بزرگترین چیزها هم نفروخت. پس یادم می مونه من ایرانی مسلمانم F A R H A D17-07-2009, 09:01 PMشما در این بخش قرار دارید: !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! برای بحث های شخصی انجمن های متفرقه و لینک زیر موجود هست: !!!! برای مشاهده محتوا ، لطفا ثبت نام کنید / وارد شوید !!!! Payman_6218-07-2009, 08:03 AMسلام. لطفا بحث رو منحرف نکنید. سایت ما را در گوگل محبوب کنید با کلیک روی دکمه ای که در سمت چپ این منو با عنوان +1 قرار داده شده شما به این سایت مهر تأیید میزنید و به دوستانتان در صفحه جستجوی گوگل دیدن این سایت را پیشنهاد میکنید که این امر خود باعث افزایش رتبه سایت در گوگل میشود

این صفحه را در گوگل محبوب کنید

[ارسال شده از: سایت ریسک]

[مشاهده در: www.ri3k.eu]

[تعداد بازديد از اين مطلب: 1460]