rainfeeling
路人甲
路人甲
  • 注册日期2005-05-27
  • 发帖数11
  • QQ
  • 铜币149枚
  • 威望0点
  • 贡献值0点
  • 银元0个
阅读:1465回复:0

[求助]数据邦定中遇到的 'OleVariant' and 'Array'矛盾

楼主#
更多 发布于:2006-02-16 23:00
<P>procedure TForm1.Button1Click(Sender: TObject);<BR>var<BR>  MyData : Array[5..10,2..4] of OleVariant;<BR>begin<BR>  //填充数据<BR>  MyData[5,2]:='ny';<BR>  MyData[6,2]:='ny';<BR>  MyData[7,2]:='ca';<BR>  MyData[8,2]:='tx';<BR>  MyData[9,2]:='nc';<BR>  MyData[10,2]:='sc';<BR>  MyData[5,3]:=100;<BR>  MyData[6,3]:=300;<BR>  MyData[7,3]:=345;<BR>  MyData[8,3]:=455;<BR>  MyData[9,3]:=123;<BR>  MyData[10,3]:=1231;<BR>  MyData[5,4]:=10000;<BR>  MyData[6,4]:=2000000;<BR>  MyData[7,4]:=30000;<BR>  MyData[8,4]:=12300;<BR>  MyData[9,4]:=34500;<BR>  MyData[10,4]:=45500;<BR>  //加入一数据集<BR>  map1.DataSets.Add(miDatasetSafeArray,<FONT color=#ee1169>MyData,</FONT>emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam);<BR>  //创建默认的专题地图,红色为错误点<BR>  map1.DataSets[1].Themes.Add(emptyparam,emptyparam,emptyparam,emptyparam);<BR>end;</P>
<P>错误为[Error] Unit1.pas(53): Incompatible types: 'OleVariant' and 'Array'</P>
喜欢0 评分0
游客

返回顶部