چطور میشه با استفاده از تاریخ سیستم ، فیلد سال موجود در پایگاه را پر کرد .. فقط سال ...:46:
Printable View
چطور میشه با استفاده از تاریخ سیستم ، فیلد سال موجود در پایگاه را پر کرد .. فقط سال ...:46:
راه زیاد داره.
من یکی از بدتترین راهها رو بهت میگم که بری دنبالش. بقیه رو پیدا میکنی.
اگه پیدا نکردی هم باز کمکت میکنیم. ولی برای یادگیری خودت باید سرو کله بزنی و بهترین کمکت هلپ فوق العاده دلفی هست.
میتونی تاریخ رو به رشته تبدیل کنی و 4 کاراکتر اول اونو ورداری.
سلام.
با اجازه ی دوست عزیزم مرد مباح. ساده ترین راه:
کد:Edit1.Text:=IntToStr(YearOf(Now))
فرهاد عزیز. به نظرم بهتره یک کمی بچه ها رو درگیر کنیم و راه حل رو صاف جلو پاشون نزاریم.
البته شما هم اینجا قدیمی هستی و هر جوری که صلاح بدونی من لذت میبرم. :20:
هر دو راه را امتحان می کنم ...
دوست عزیز. راه درست و منطقی همون راهی هست که فرهاد جان گفتند.
راه من جواب میده ولی خیلی سختتره. برای کارهای خاصی استفاده میشه. هدف من تشویق شما برای پیدا کردن راهی بهتر بود.
راه زیاد داره.
من یکی از بدتترین راهها رو بهت میگم که بری دنبالش. بقیه رو پیدا میکنی.
اگه پیدا نکردی هم باز کمکت میکنیم. ولی برای یادگیری خودت باید سرو کله بزنی و بهترین کمکت هلپ فوق العاده دلفی هست.
میتونی تاریخ رو به رشته تبدیل کنی و 4 کاراکتر اول اونو ورداری.
__________________
زندگی همانقدر زیباست که به آن مینگری. پس دیده پاک کنبم.
------------------------------------------
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
از این راه جوا ب گرفتم ..... با استفاده از تابع Delete....
فرهاد جان چه دستور قشنگی نوشتی.... تا حالا بهش بر نخورده بودم
; function IsThisLeapYear: Boolean
begin
;(( Result := IsLeapYear(YearOf(Date
;end
شکل کلی دستور به این شکله...:5:
چشمهاتون قشنگ ميبينه دوست من :46:نقل قول:
جانم؟ :18:نقل قول:
دوست عزيز اين دستور مشخص ميكنه كه سال مورد نظر شما كبيسه هست يا خير. و نتيجه اي از نوع boolean داره
موفق باشيد