进的时候,给一个全局变量给
QSTime := DataTime(Now);//全局变量;进的时候就给值
运行时间
DataTime(Now) - QSTime//运行时间;
不知道您说话算数吗?

解决方案 »

  1.   

    OSTime:=DataTime//进的时候就给值,
    怎么哪里给,怎么给啊
      

  2.   

    从载execute和在onTerminate的时候使用gettickCount比较准确!
      

  3.   

    楼上的那位说的GetTickCount只有在NT内核的操作系统中有效,9x中总是返回False,记住啊,
      

  4.   

    从载execute和在onTerminate的时候使用gettickCount比较准确!
    //这儿是过程或是函数用时,不是他所要的;
      

  5.   

    在project里面application.run前面给ostime赋值
    然后在线程中application.terminate的地方,记录下时间
    curtime-ostime;
      

  6.   

    在你的线程开始时取一个时间:
      Start:=gettickcount();
      线程结束时取一个时间
      End:=gettickcount();
      线程所用的时间为
      Floattostr( (end-start)/1000 )+'秒'其中start,end为integer
      

  7.   

    不要意思忘记了,记得看到过,在《Delphi程序员指南》上面有或者是李维的书上。好像用Gittickcount不准确,翻翻书看,找到了给你。