代码如下:
if kk then
BEGIN
if mark>0 then
tsell(1,lots,lmt,c-hd*mindiff),ORDERQUEUE; //如果有持多单则卖出
tbuyshort(1,lots,lmt,c-hd*mindiff),ORDERQUEUE;
if mark>0 then
dbexecute('insert into tradedetail(StockDate,StrId,StrName,StockCode,MyHoldings,OrderPrice,Operation) values (now(),"zzsd","pursuev2-if","IF",0,'+ numtostr(dynainfo(7),2) + ',"平多") ');
DBEXECUTE('update pursueextrem set remark=-1 where stockcode = "IF"');
dbexecute('insert into tradedetail(StockDate,StrId,StrName,StockCode,MyHoldings,OrderPrice,Direction,Operation) values (now(),"zzsd","pursuev2-if","IF",' + numtostr((-1)*lots,0) + ',' +numtostr(dynainfo(7),2) + ',' + numtostr(-1,0) + ',"开空")');
end;
数据库的数据插入是有他自己的规则算法,不能保证一定是顺序存放
如果你希望数据在调用时能够按照顺序,那么你应该在数据库中加入一个索引字段,比如ACCESS有自增的类型或者你自己通过数值相加的等等.在读取数据库数据时,用SQL 的ORDER BY 排序语法读取数据