تعیین فاصله زمانی [بایگانی]

ssmehizadeh

دوشنبه 17 مرداد 1384, 22:57 عصر

من با استفاده از تابع getsystemtime زمان رو برحسب ( میلی - ثانیه - دقیقه - و ساعت ) می گیرم .... اما مشکل اینجاست که من چطوری میتونم فاصله دو زمان مختلف رو برحسب ( میلی - ثانیه - دقیقه - و ساعت ) بدست بیارم ........

ممنون میشم کمکم کنید ....

vcldeveloper

سه شنبه 18 مرداد 1384, 02:52 صبح

شما می تونید بجای GetSystemTime از GetTime استفاده کنید و زمان رو در قالب TDateTime بدست بیارید. متغیرهای از نوع TDateTime رو هم می تونید به راحتی از هم کم کنید:

var
TimeNow, TimeThen : TDateTime;
DifTime : TDateTime;
begin
TimeThen := GetTime;
//some code here
TimeNow := GetTime;
DefTime := TimeNow -TimeThen;
end;

می تونید برای بدست آوردن زمان حال، از تابع Now هم استفاده کنید. برای تبدیل یک متغیر از نوع TDateTime به ساعت، دقیقه، ثانیه و میلی ثانیه و بالعکس می تونید به ترتیب از DecodeTime و EncodeTime استفاده کنید.

seyedof

سه شنبه 18 مرداد 1384, 10:23 صبح

سلام
راه درست در این مواقع استفاده از تابع GetTickCount است. که بر حسب میلی ثانیه زمان رو برمیگیردونه و برای محاسبه فواصل زمانی است.
ممنون علی