主题：怎样用程序表述:股票dm符合XG条件。

老师：您测试中看到：只是最终结果的那个数组不仅仅有保存的品种代码，是在那里看到啊？

 这不是我输出看到了，是代码逻辑决定的。比如版块有20个品种，实际10个满足条件。但是我定义数组的时候我不知道有多少满足的，因此稳妥起见只能定义数组长度是20。  后面代码执行过程中数组前10个元素都被赋值了，也就是满足条件品种的代码，后10个就只能是默认值：空字符串了。 所以我才那样说的。

老师：

 那个是引用函数需要注意的地方，但是我代码已经处理过。

如果输出

当前运行指标中的XG:=STKINDI(dm,'A.XG',0,6,0);    XG进行选股，会选出板块的全部股票，照理只能选出符合XG条件的股票啊

 XG现在是针对指定品种进行的计算了，dm是品种代码。对每个品种单独计算，那么就可以做到筛选版块中符合XG的股票了。 而上面的那段代码已经符合了。  如果满足xg,那么加入到数组中去。这就是我给你的测试样例的逻辑思路。

VARIABLE:result[ss]:='';//定义一个数组，并设置默认值是空字符串，数组长度按照版块品种数算
i:=0;
if ISLASTBAR //出于效率考虑，最后一个K进行计算。否则计算量有点大
then
begin
for  k=1  to  ss  do
begin
dm:=STKFROMBLK('测试',k);
XG:=STKINDI(dm,'A.XG',0,6,0);//指定周期，品种。这里取日线，其他周期可参照函数说明去修改
if xg then begin i:=i+1; result[i]:=dm;MSGOUT(1,dm); end //这里加了个输出，方便看到那个品种满足了
end
end

老师：

 贴下你的代码。我看下。