Recent

Author Topic: TDBDateTimePicker date property  (Read 2916 times)

Allam

  • Newbie
  • Posts: 3
TDBDateTimePicker date property
« on: July 06, 2023, 01:35:02 pm »
سلام عليكم

I can't found date proprty in dbdatetimepicker control ..
هل يوجد حل لهذه المشكلة
أنا استخدم dbdateEdit
وكتبت هذا الكود لحساب سن المعاش أو التقاعد في القانون المصري وللعلم القانون المصري رفع سن المعاش بالتدريج الى 65 سنة بداية من مواليد عام 1971
هذا هو الكود

Code: Pascal  [Select][+][-]
  1. procedure TempEdit_frm.dbirthChange(Sender: TObject);
  2. begin
  3.  
  4.   if dbirth.date < EncodeDate(1971, 7, 1) then
  5.   begin
  6.     pension.Date := incyear(dbirth.Date, 60);
  7.     pension.Date := incday(pension.Date, -1);
  8.   end;
  9.  
  10.   if dbirth.date > EncodeDate(1971, 6, 30) then
  11.   begin
  12.     pension.Date := incyear(dbirth.Date, 61);
  13.     pension.Date := incday(pension.Date, -1);
  14.   end;
  15.  
  16.   if dbirth.date > EncodeDate(1972, 6, 30) then
  17.   begin
  18.     pension.Date := incyear(dbirth.Date, 62);
  19.     pension.Date := incday(pension.Date, -1);
  20.   end;
  21.  
  22.   if dbirth.date > EncodeDate(1973, 6, 30) then
  23.   begin
  24.     pension.Date := incyear(dbirth.Date, 63);
  25.     pension.Date := incday(pension.Date, -1);
  26.   end;
  27.  
  28.   if dbirth.date > EncodeDate(1974, 6, 30) then
  29.   begin
  30.     pension.Date := incyear(dbirth.Date, 64);
  31.     pension.Date := incday(pension.Date, -1);
  32.   end;
  33.  
  34.   if dbirth.date > EncodeDate(1975, 6, 30) then
  35.   begin
  36.     pension.Date := incyear(dbirth.Date, 65);
  37.     pension.Date := incday(pension.Date, -1);
  38.   end;
  39.  
  40. end;

هل يمكن الحصول على نفس النتيجة باستخدم  dbdatetimepicker 
بدلا من  dbdateEdit
وشكرا[/size]

kito

  • Jr. Member
  • **
  • Posts: 78
Re: TDBDateTimePicker date property
« Reply #1 on: July 17, 2023, 09:38:21 pm »
وعليكم السلام
حدث معي نفس المشكل و لم أجدها في أي مكان
الحل هو أن تقوم بحذف لازروس جذريا
و تقوم بإعادة تستطيبه كليا من جديد
We can barely feel your presence, because of the depth of your silence

Allam

  • Newbie
  • Posts: 3
Re: TDBDateTimePicker date property
« Reply #2 on: July 18, 2023, 10:58:51 am »
السلام عليكم
المشكلة ليست في لازاروس.. المشكلة
dbdatetimepicker has no date property
مكون اختيار التاريخ الخاص بقواعد البيانات لا يوجد به خاصية التاريخ
وهذه مشكلة مطوري لازاروس
وللأسف النسخة الجديدة من لازاروس تم ازالة هذه الخاصية أيضا من DbdateEdit


kito

  • Jr. Member
  • **
  • Posts: 78
Re: TDBDateTimePicker date property
« Reply #3 on: July 22, 2023, 12:13:37 am »
أعتذر منك  لم أفهم في البداية سؤالك
هل يمكن اضافة بعض التفاصيل كنوعية قاعدة البيانات التي تستخدمها ؟
لماذا لا تتعامل مع الحقل  مباشرة الخاص بتاريخ الميلاد ؟

« Last Edit: July 22, 2023, 11:38:45 am by kito »
We can barely feel your presence, because of the depth of your silence

kito

  • Jr. Member
  • **
  • Posts: 78
Re: TDBDateTimePicker date property
« Reply #4 on: July 22, 2023, 11:39:27 am »
قمت بمحاولة  تجسيد ما فهمت أنك تود تحقيقه ، الرجاء تجربة التطبيق المرفق
We can barely feel your presence, because of the depth of your silence

 

TinyPortal © 2005-2018