begin  
  dosomting .........
  ....
sleep(10000);
  dosomting .........
  ....
end;

解决方案 »

  1.   

    sleep的参数是毫秒
    Delay program execution for a specified number of microseconds.UnitSysUtilsCategoryprogram controlprocedure Sleep(milliseconds: Cardinal);{$IFDEF MSWINDOWS} stdcall; {$ENDIF}DescriptionSleep pauses program executions as specified by the millseconds parameter. Under Windows, Sleep is just a link to the Sleep function in the system API. Under Linux, Sleep calls the usleep library routine.
      

  2.   

    谢谢lizhenjia(暴雪),我马上给分你
      

  3.   

    用 Sleep 会影响程序的其他部分,因为用了它后主线程处在 Sleep 状态,相当于其他部分都停住了。