QueryPerformanceFrequency

var

　c1: int64;
t1, t2: int64;

      QueryPerformanceFrequency(c1);

      QueryPerformanceCounter(t1);
//       GetSellerNickFromSoldPage;
      QueryPerformanceCounter(t2);
      Memo2.Lines.Add(format('时间%n', [(t2-t1)/c1*1000]));


      QueryPerformanceCounter(t1);
      (GetCurrentPage(1).Document as IHTMLDocument2).cookie;
      QueryPerformanceCounter(t2);
      Memo2.Lines.Add(format('时间%n', [(t2-t1)/c1*1000]));