std::this_thread::sleep_for(std::chrono::microseconds(500));

我是Delphi呀

Windows应用层，sleep 50毫秒以下都是不准的。。。应用层好像只有多媒体定时器比较精确

delphi没有微妙延时吧

有个库里面有个函数,不知道是否满足你的要求

##LibX是什么?

本库为`开源库`，欢迎大家各种吐槽。本库为 [代码安全小组(C.S.T)](http://bbs.0xcode.org "打开C.S.T论坛") 整理发布。

本库`不作为商业`及其他`收费服务`，代码多为网友共享代码。如有触犯，请`吐槽`，将会对应删除。
   
开源地址：[https://code.csdn.net/kingsollyu/libx](https://code.csdn.net/kingsollyu/libx)

##更新日志：

每次更新都会写在这里，但这里只显示前三次的更新日志，更多请参考 [update.md](https://code.csdn.net/kingsollyu/libx/tree/master/update.md)

###2013.10.29

  * `[!]` `紧急更新`上次编译居然忘记调试ANSI模式下，导致好多地方编译不下。严重更新。
  * `[!]` 将原来的`static class `转换为`namespace`这样用起来更方便。以前的原代码可以`直接使用`。
  * `[+]` 增加
  * `[~]` 将`LibX.h`中的`DEFAULT_MAX_STRING`宏定义变量改名为`MAX_STRING_BUFFER`。感觉`DEFAULT_MAX_STRING`很不好记，不如`MAX_STRING_BUFFER`好用。

###2013.10.28

  * `[!]` `遗留错误` 在`CLibX::Config::ReadRegBinaryValue`居然有存在的变量，上次居然还编译通过了。- -||
  * `[+]` 增加了`Object`类库，这个类库可以让你很容易的调用COM组件。这个功能类似于`易语言`下的`对象`功能。
  * `[+]` 增加了`ScriptControl`类库，这是一个脚本代码执行的类库，可以执行 `JScript`、`VBScript` 代码，他是在`Object`继承下来的。
  * `[~]` 修复`lstring GetRandXing()`中有问号的问题。

###2013.10.23

  * `[!]`修改`String`中`string_replace`函数，修改为返回替换次数。
  * `[+]`在`String`中增加对`U码`加密解密支持，及`请吐槽` = `\u8bf7\u5410\u69fd`。（个人代码，不全面。）
  * `[+]`增加了写常用的功能函数，不再赘述。(其中在`Update`中有 `GET`、`POST` 功能，特此提醒)
  * `[+]`增加了`FTP`功能函数类，可以实现简单的FTP创建目录，删除目录，上传下载等。(API实现)
  * `[~]`将`CLibX::Update::getWebSource`的参数从 `lstring` 改为了 `LPCTSTR`。
  * `[~]`感谢`CSDN`论坛 [qq1134993111](http://my.csdn.net/qq1134993111) 提醒，`Config`类库中存在`内存泄漏`。去掉使用 CRegKey 直接使用API函数完成。

##关于作者
  * [King.Sollyu](http://blog.csdn.net/kingsollyu "我的CSDN博客地址")

//=========================================================================
                // 函数名称: SuperSleep
                // 函数说明: void  高精度延时,cpu占用低,窗口不卡死,一次最大可延时几年
                //=========================================================================
                // 参    数: __in int nTime                        1000微秒 = 1毫秒 ； 1000毫秒 = 1秒
                // 参    数: __in int nSpeed                        可空:毫秒  1:微秒 2:毫秒 3:秒  4:分  5:小时  6:天
                //=========================================================================
                void SuperSleep(__in int nTime,__in int nSpeed );

支持1234566

Delphi不熟悉，你自己转一下

void MyDelay(ULONG ulMicroSeconds)
{
    LARGE_INTEGER  timeStop; 
    LARGE_INTEGER  timeStart; 
    LARGE_INTEGER  Freq; 
    LONGLONG  ulTimeToWait;
    
    if (!QueryPerformanceFrequency( &Freq ))
        return;

    QueryPerformanceCounter ( &timeStart );

    ulTimeToWait = Freq.QuadPart * ulMicroSeconds / 1000 / 1000; 
    
    timeStop = timeStart; 
    
    while((timeStop.QuadPart - timeStart.QuadPart) < ulTimeToWait ) 
    { 
        QueryPerformanceCounter( &timeStop ); 
    }
}

读取cpu 中的时间戳，可以精确到 纳秒。

C++中获得CPU高精度时间戳( 纳秒级 )