PDA

View Full Version : اختلاف بین دو زمان به صورت دقیقه



راحله سعادتی
دوشنبه 15 اسفند 1384, 22:38 عصر
12:20

17:35

برای بدست آوردن اختلاف ساعت اولی با دومی باید چه کرد ؟

اختلاف را به صورت دقیقه میخواهم .

Bahmany
دوشنبه 15 اسفند 1384, 23:01 عصر
function MinutesBetween(const ANow, AThen: TDateTime): Int64;

راحله سعادتی
سه شنبه 23 اسفند 1384, 10:53 صبح
function MinutesBetween(const ANow, AThen: TDateTime): Int64;

این تابع یک مشکلی دارد

11:59:00 ب.ظ
00:01:10 ق.ظ

اختلاف به دقیقه باید 1 تا 2 دقیقه جواب بده

اما حدود 1200 دقیقه میزنه

arshia_
سه شنبه 23 اسفند 1384, 11:54 صبح
بهتر انه که خودت جمع و تفریق رو انجام بدی
اول ساعت و دقیقه رو تفکیک کن
بعد محاسبات رو انجام بده

Mahmood_M
سه شنبه 23 اسفند 1384, 19:08 عصر
بهتر انه که خودت جمع و تفریق رو انجام بدی
اول ساعت و دقیقه رو تفکیک کن
بعد محاسبات رو انجام بده
دوست عزیز چه طور می شه اونا رو از هم تفکیک کرد؟

Ali-Far
چهارشنبه 24 اسفند 1384, 11:29 صبح
دو متغییر از نوع TTime تعریف کنید و آن ها را از یکدیگر کم کنید همچنین با استفاده از توابع TimeToStr و Strtotime می توانید با زمان کار کنید.
t,t1 : TTime;
t := t - t1;

(s := TimeToStr(t

اَرژنگ
چهارشنبه 24 اسفند 1384, 11:31 صبح
(۱۲×۶۰+۲۰)-(۱۷×۶۰+۳۵)