本帖最后由 资深技术07 于 2026-10-29 15:17 编辑
INI类函数使用说明,供您参考:https://www.weistock.com/docs/PE ... 6%E6%95%B0%E5%80%BC
[PEL] 复制代码 stklabel_code:GETINIFILESTRING('d:\test.ini',stklabel,'stklabel_code'); //获取品种代码
stklabel_date:getinifile('d:\test.ini',stklabel,'stklabel_date'); //获取品种指定的日期
if STRICMP(STKLABEL,stklabel_code)=0 and ref(date,2)+19000000<=stklabel_date and ref(date,1)+19000000>=stklabel_date then BEGIN
writeinifileSTRING('d:\test1.ini',stklabel,'stklabel_date',numtostr(date+19000000,0));
writeinifile('d:\test1.ini',stklabel,'stklabel_open',open);
writeinifile('d:\test1.ini',stklabel,'stklabel_high',high);
writeinifile('d:\test1.ini',stklabel,'stklabel_low',low);
writeinifile('d:\test1.ini',stklabel,'stklabel_close',close);
END
|