type
mybox=class
nLTX,nLTY,nRBX,nRBY,nType:integer;
aColor:array[1..50,1..40] of double;
procedure FindColor();end;cBox:array[0..16] of array[0..9]of mybox;然后用循环给nLTX,nLTY赋值的时候,只有cBox[1,1]能成功赋,我step跟踪循环,[2,1]就出access of violation了,是不是语法上有错误?
mybox=class
nLTX,nLTY,nRBX,nRBY,nType:integer;
aColor:array[1..50,1..40] of double;
procedure FindColor();end;cBox:array[0..16] of array[0..9]of mybox;然后用循环给nLTX,nLTY赋值的时候,只有cBox[1,1]能成功赋,我step跟踪循环,[2,1]就出access of violation了,是不是语法上有错误?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货