在delphi中使用的延时函数。就像c语言、单片机中编写的延时函数那样使用。