延时5秒再执行

103562

可否使用currenttime的差值来表达？
使用for循环的话，内容 应当如何设置？

103562

在不

技术009

[PEL] 复制代码

GLOBALVARIABLE:mark:=0;
buycd:1;//开仓条件
if buycd and mark=0 then //buycd必须是完整的开仓条件，包含开仓的所有判断因素在内。
begin
extgbdataset ('ti',currenttime);  //满足条件记录下现在的时间
mark:=1;
end 


延迟:=currenttime - extgbdata('ti');

if 延迟>30 and mark=1 then 
begin
tbuy(1,1,mkt);
mark:=0;
end  

参考上面这个范例的思路。

最好是  将要延迟的部分放到一个if 控制语句里，而不是整个代码运行都给停掉。意思就是不到时间 我跳过这段代码的运行。

之前和你说过一次用for循环，那个是使用场景是某些下单有关的函数需要等待下单回报过来才能获取值，所以用for循环 写个空循环 执行个100次用来等成交回报有足够时间（毫秒）过来。不适用用在你这个需求这里。

103562

主要是currenttime是60进制的， 相减不会有误差？主要是这个问题了，要不然也不会提问题了

技术009

如果是5秒延迟， 是可以的。如果是延迟时间比较长，那的确格式上会影响这个计算的。

不过也不是不能处理，我们把时间处理成秒（当日0点以来的秒数）：
延迟:TIMETOT0(currenttime)  - TIMETOT0(extgbdata('ti'));

这样就随便减了。



这样计算的还是准确的。

103562

为什么一定要把起始的值存到外部数据库里，不能存到globalvariable声明的一个变量里面吗

103562

那样执行效率不是高多了

技术009

都行的。范例里用那个超全局变量只是方便我本地测试，我能直接在全局变量管理器里看下我记录的值。不用开后台程序化 就能校验我的逻辑。你自己实际用的情况下，确认逻辑无误后 自然可以换成globalvariable的。