Delphi+MapX数据绑定问题

<P>procedure TForm1.Button1Click(Sender: TObject);<BR>type<BR>  Dou=array[1..4,1..4] of Variant;<BR>var<BR>  TDou:Dou;<BR>  i:Integer;<BR>begin<BR>  for i:=1 to 4 do<BR>    TDou[i,i]:='0.0';<BR>  Map1.DataSets.Add(miDataSetSafeArray,TDou,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);<BR>end;</P>
<P>运行时有错误：Incompatible types: 'OleVariant' and 'Dou'，请问怎么修改？谢谢。 <BR></P>