我在一个button中写以下程序：
procedure TMainForm.Button4MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
n:=i;
l:=Random(n);
label5.Caption:=inttostr(l);
if a[l].Tag=0 then begin
label4.Caption:='合法车';
a[l].Color:=clGreen;
end else showmessage('非法车') ;
end;

一打击button就会出现这个错误，然后说 if a[l].Tag=0 then begin 有错，为什么啊？
大家帮忙看看先，谢谢啦

l是全局变量的，我在前面总的时候定义了。
好像delphi在出现,if a[l].color=clgreen then...这种时候也会报错的，
是不可以这样和颜色比的吗？
谢谢楼上回贴啦，
继续waiting。。

谢谢大家帮忙看先……

a我定义了，定义成一个数组的。
a:array[1..1000] of Tpanel;
就是不明白为什么会出现if那个错误的，
大家继续帮帮忙的。

cypctt说的是什么意思呢？
是在uses中添加吗？
会出现[Fatal Error] Unit1.pas(8): File not found: 'Randomize.dcu'的错误哦。