如何获得三个线程的各自运行时间及总时间呢?

Question

BOOL GetThreadTimes(
  HANDLE hThread,             // handle to thread
  LPFILETIME lpCreationTime,  // thread creation time
  LPFILETIME lpExitTime,      // thread exit time
  LPFILETIME lpKernelTime,    // thread kernel-mode time
  LPFILETIME lpUserTime       // thread user-mode time
);

Answer 1

var
  ct,et,kt,ut:_filetime;
  systime:_systemtime;
begin
  GetThreadTimes(new.Handle,ct,et,kt,ut);
  filetimetosystemtime(ct,systime);
  Memo1.Lines.Add('create '+format('%2d-%2d-%2d %2d:%2d:%2d',[systime.wyear,systime.wmonth,systime.wday,systime.whour,systime.wminute,systime.wsecond]));注：systime得到的是格林威治时间