جمع وقتين

بدأه Delphawi في 4 يناير 2009 · 4 رد · 996 مشاهدة · في لغة Delphi

مشاركة: واتساب X فيسبوك تيليجرام

#14 يناير 2009 في 22:19 صاحب الموضوع

بســم الله الـرحمــن الرحيــم

السلام عليكــم ورحمـة الله وبركاتــه ,,,

لدي وقت ما (Now مثلاً) وأريد إضافة 30 دقيقة إليه , فما هو الكود الذي يقوم بهذا ؟

وجزاكم الله خيراً ...

اقتباس
If A is success in life, then A equals x plus y plus z. Work is x; y is play; and z is keeping your mouth shut

Albert Einstein

#24 يناير 2009 في 23:47

السلام عليكم ورحمة الله وبركاته

اليك هذا الكود

 

DateTimePicker1.Time:=DateTimePicker1.Time +StrToTime('00:30:00')

اخ دلفاوي لكي تجعل TDateTimePicker يظهر التوقيت فقط اعطي الخاصية Kind القيمة dtkTime

وفقنا الله واياكم لما يحبه ويرضاه

اللهم علمنا ما ينفعنا وانفعنا بما علمتنا وانفع الناس بنا واغفر لنا وارحمنا

#35 يناير 2009 في 18:57

كلام اخي علي صحيح مع إظافة ملاحظة هامة و هي :

اخذ LOCALIZATION بعين الإعتبار وإلا إستعمال ال Decode Time/Date

والله المستعان

عزيزي :

لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .

فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم

*****

#45 يناير 2009 في 20:03

جزاك الله خيراً أخي علي , وانا استنتجت الكود المطلوب من الكود الذي وضعته , وهذا هو للفائدة :

label1.Caption := TimeToStr(Time + StrToTime('00:30:00'));