是将两个时间的差转换成分钟吗?
edit1.text:=time;
edit2.text:=time;
label1.captiom:=inttostr(strtodate(edit1.text)-strtodate(edit2.text));

解决方案 »

  1.   

    采用API函数GetSystemTime,此函数的申明为
    VOID GetSystemTime( LPSYSTEMTIME lpSystemTime );SYSTEMTIME 格式为:
    typedef struct _SYSTEMTIME {  // st  
        WORD wYear; 
        WORD wMonth; 
        WORD wDayOfWeek; 
        WORD wDay; 
        WORD wHour; 
        WORD wMinute; 
        WORD wSecond; 
        WORD wMilliseconds; 
    } SYSTEMTIME; 使用:
    var
    MyTime:_YSTEMTIM; 
    begin
      GetSystemTime(MyTime);
      ..... //提取MyTime中的数据,如:x:=MyTime.wYear可以取出年度等;
    end;
    或者采用API函数GetLocalTime,申明为:
    VOID GetLocalTime(LPSYSTEMTIME lpSystemTime);
    使用方式与上同;