共4 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：数据存在，但是插入公式后，提示没有数据，
1楼
qq代人发帖 发表于：2016/5/19 14:23:35
此主题相关图片如下：{)ency6h~ypxpi3{0q0gmco.jpg
此主题相关图片如下：b0`b5$35~u`pi0h`iagh~dk.png
2楼
jinzhe 发表于：2016/5/19 14:25:05请贴一下代码
3楼
qq代人发帖 发表于：2016/5/19 14:32:05//IF (BARPOS=1) THEN XSWS:=0;
IF (BARPOS=1) THEN XSWS:=IFELSE(MINDIFF/1>=1,0,IFELSE((MINDIFF*10)/1>=1,1,2));//小数位数
DTJ:=DATE<>REF(DATE,1) OR BARPOS=1;
IF (DTJ) THEN
BEGIN
datestr:=NUMTOSTR(DATE+19000000,0);
datestr:=STRINSERT(datestr,6,'-');
datestr:=STRINSERT(datestr,4,'-');
END;
pktime:=NUMTOSTR(TIME,0);
pktime1:=IFELSE(STRLEN(pktime)=5,1,2);
pktime:=STRINSERT(pktime,pktime1,':');
pktime:=STRINSERT(pktime,3+pktime1,':');
pktime:=datestr&' '&pktime;
outputstr1:=pktime&' '&NUMTOSTR(O,XSWS)&' '&NUMTOSTR(H,XSWS);
outputstr2:=pktime&' '&NUMTOSTR(L,XSWS)&' '&NUMTOSTR(C,XSWS);
DEBUGFILE2('D:\日盈亏\'&STKLABEL&'11t.TXT',outputstr1,0,0);
DEBUGFILE2('D:\日盈亏\'&STKLABEL&'22t.TXT',outputstr2,0,0);
IF (BARPOS=1) THEN XSWS:=IFELSE(MINDIFF/1>=1,0,IFELSE((MINDIFF*10)/1>=1,1,2));//小数位数
DTJ:=DATE<>REF(DATE,1) OR BARPOS=1;
IF (DTJ) THEN
BEGIN
datestr:=NUMTOSTR(DATE+19000000,0);
datestr:=STRINSERT(datestr,6,'-');
datestr:=STRINSERT(datestr,4,'-');
END;
pktime:=NUMTOSTR(TIME,0);
pktime1:=IFELSE(STRLEN(pktime)=5,1,2);
pktime:=STRINSERT(pktime,pktime1,':');
pktime:=STRINSERT(pktime,3+pktime1,':');
pktime:=datestr&' '&pktime;
outputstr1:=pktime&' '&NUMTOSTR(O,XSWS)&' '&NUMTOSTR(H,XSWS);
outputstr2:=pktime&' '&NUMTOSTR(L,XSWS)&' '&NUMTOSTR(C,XSWS);
DEBUGFILE2('D:\日盈亏\'&STKLABEL&'11t.TXT',outputstr1,0,0);
DEBUGFILE2('D:\日盈亏\'&STKLABEL&'22t.TXT',outputstr2,0,0);
4楼
jinzhe 发表于：2016/5/19 14:46:19如果关掉这个公式，是不是k线又回来了？
共4 条记录, 每页显示 10 条, 页签:
[1]