阅读:2201回复:8
请教VB+MAPX[原创]
我用VB开发MAPX,主要提取图元属性,提取点图元属性正常,提取面图元属性时,英文和数字属性可以提取,汉字文字信息属性提取为空内容,请问是何原因?<img src="images/post/smile/dvbbs/em09.gif" />
|
|
1楼#
发布于:2003-11-19 16:40
部分内容如下,请问是否合理?
Dim j As MapXLib.Features
Dim f As MapXLib.Feature Dim rvs As MapXLib.RowValues Dim ll As String Set j = Formmain.Map1.Layers(1).Selection If Formmain.Map1.Layers(1).Selection.Count >= 1 Then Set f = j.Item(1) Set rvs1 = Formmain.Map1.DataSets.Item(1).RowValues(f) <img src="images/post/smile/dvbbs/em09.gif" /> |
|
2楼#
发布于:2003-11-19 16:56
Wait for you
|
|
3楼#
发布于:2003-11-19 18:14
你用的MAPX版本是多少?
|
|
4楼#
发布于:2003-11-19 19:22
MAPX5.0
|
|
5楼#
发布于:2003-11-19 19:38
我用的MapX版本:
Mapinfo MapX Version 5.02.19 copyringht_1996-2002 mapinfo corporation 谢谢! |
|
6楼#
发布于:2003-11-19 19:54
几种方式读取属性,问题还是不能读单纯中文文字
Dim j As MapXLib.Features Dim f As MapXLib.Feature Map1.Layers(1).BeginAccess miAccessRead Map1.Layers(1).KeyField = "简单描述" MsgBox Map1.Layers(1).KeyField Set j = Map1.Layers(1).Selection If Map1.Layers(1).Selection.Count >= 1 Then Set f = j.Item(1) MsgBox f.KeyValue MsgBox "长度" & Len(f.KeyValue) Else MsgBox "没有选中" End If Map1.Layers(1).EndAccess miAccessEnd |
|
7楼#
发布于:2003-11-19 20:33
有很多都是这个问题?
关于汉字不能显示 这个估计是版本(中英文)的差异 |
|
9楼#
发布于:2003-11-21 16:45
我用MAPX4.0可以显示中文,问题解决了,谢谢。
|
|