AddToBlock函数修正了问题了,DELETEFROMBLOCK完全没动过,删不了指定的成员
ADDTOBLOCK原来就是不能动态更新板块成员,后来修正了,可是你们还忘记了修正删除成员的函数deletefromblock
if islastbar then
begin
前:INBLOCK(FORMULANAME),linethick0;
if 前=0 then
begin
AddToBlock(STKLABEL,FORMULANAME),linethick0;
MSGOUT(1,STKname&'('&STKLABEL&')'&'被选入板块《'&FORMULANAME&'》'),linethick0;
end;
后:INBLOCK(FORMULANAME),linethick0;
if 后=1 then
begin
DELETEFROMBLOCK(STKLABEL,FORMULANAME),linethick0;
MSGOUT(1,STKname&'('&STKLABEL&')'&'被剔除出《'&FORMULANAME&'》'),linethick0;
end;
最后:INBLOCK(FORMULANAME),linethick0;
end;
收到您的反馈,本地测试从板块删除品种是未动态刷新,您的这个问题工作人员会及时提交给产品部门,感谢您的支持