aAuthority[sys_cnt]:=g_aSysNo[i];
这句话负值出错,后面有值的但是就是报错,是不是和我LIST没初始化有关啊,
还有这个for i:=0 to Length(g_aSysNo)-1 do语句,
I从0开始还是[Length(g_aSysNo)-1]这个开始诱惑试,从Length(g_aSysNo)这个开始阿
这句话负值出错,后面有值的但是就是报错,是不是和我LIST没初始化有关啊,
还有这个for i:=0 to Length(g_aSysNo)-1 do语句,
I从0开始还是[Length(g_aSysNo)-1]这个开始诱惑试,从Length(g_aSysNo)这个开始阿
解决方案 »
- 新手问题~~用idftp能将本机文件“上传”到本机另外的地方吗??
- 如何制作一个电子公告?
- 请高手帮小弟解决??谢谢!!!
- 如何把格式文本(有上下标的),比如化学符号,导入到WORD文件中,格式不能变,200分,up有分,在线等
- 关于FAST REPORT做分组报表的问题,在线等待
- 急,50分求Delphi7的QuickRep控件,ok 就给分
- 谁有fastreport的电子图书可供下载?
- Ehlib或其他Grid控件, 如何实现点击表头排序 ?要求不能重新重新执行SQL语句
- 如何更改dbgrid的每个字段的标题呢?
- C/s模式怎么开发啊?
- 关于timer的使用,不解。。
- 求《Delphi 5.x 分布式多层应用系统篇》的源码。
2、LIST数组是什么LIST? 首先你要确保 aAuthority 已经 Create,如果没有Create就更不用说其他了。看你的代码似乎应该是StringList,如果真是StringList的话,不要用aAuthority[i]的方式赋值,建议你使用:
aAuthority.Add(g_aSysNo[i])
var
aAuthority:TStrings
i:Integer;
begin
aAuthority:=TStringList.Create;
try
for i:=0 to Length(g_aSysNo)-1 do
aAuthority[i]:=g_aSysNo[i];
finally
FreeAndNil(aAuthority);
end;
end;