请问如何使用另一个unit中的数组

[amartapple]

我在unit2中定义了一个数组(如下),然后在unit2中赋值，想在unit1中使用，我就use unit2，可是Label1.Caption:=aInfo[1].sName编译不通过，请问我如何测能使用Unit2中赋值的这个数组

interface

type
TSInfo=record
sName:string;
sIntro:string;
end;

implementation

var
aInfo:array [1..10] of TInfo;
begin
aInfo[1].sName:='a';
aInfo[1].sIntro:='b';
end.

[sdzeng]

interface

var
aInfo:array [1..10] of TInfo;

implementation

[hanlin2004]

aInfo:array [1..10] of TInfo;

在public区域声明