[求助]MO+Delphi 类型转换出错

<P>在利用MO读取Shape文件时出错，如下</P>
<P>var</P>
<P>lyr:MapLayer;<BR>rset:Recordset;<BR>dc:DataConnection;<BR>pt:Point;</P>
<P>s:string;</P>
<P>begin<BR>s:='D:\GS_SHP';<BR>lyr:=MapLayer(CreateOleObject('MapObjects2.MapLayer'));<BR>dc:=DataConnection(CreateOleObject('MapObjects2.DataConnection'));<BR>dc.Database:=s;<BR>lyr.GeoDataset:=dc.FindGeoDataset('GS');<BR>rset:=lyr.Records;<BR>rset.MoveFirst;<BR>while (rset.EOF<>True) do<BR>begin<BR>fid:=rset.Fields.Item('FeatureID').ValueAsString;<BR>pt:=Point(CreateOleObject('MapObjects2.Point'));<BR>pt:=rset.Fields.Item('Shape').Value;--------------------------此处出错，类型无法转换<BR>pt:=Point(rset.Fields.Item('Shape').Value);------------------如此转换也出错，无法强制转换</P>
<P>rset.MoveNext;<BR>end;</P>
<P>end；</P>
<P>请大家帮忙看看，怎么转换，谢谢！</P>