|
阅读：2304回复：8
求助如何在VB+MO里用相对路径导入CAD图
<P>VB编写 我把我写的放上来 希望高手指点 </P>
<P>我真的不会~~~</P> <P>Dim dc As New mapobjects2.DataConnection Dim mlyr As New mapobjects2.MapLayer </P> <P>dc.Database = App.Path ; "\mapdata" dc.Connect</P> <P> Set mlyr.GeoDataset = dc.FindGeoDataset("名字") mlyr.Symbol.Color = moGray mlyr.Symbol.Size = 3 mlyr.Tag = "[CADFILE]" ; dc.Database ; "|" ; mlyr.Name frmIdentify.Map2.Layers.Add mlyr</P> <P>希望高手指点 我真的不会</P> [此贴子已经被作者于2005-5-22 1:14:52编辑过]
|
|
|
|
1楼#
发布于：2005-05-22 01:19
这是我由加SHP格式的语句改的 但是真的不知道怎么加CAD图|
|
|
|
|
2楼#
发布于：2005-05-22 19:30
<P>没人指点啊~~急啊</P>
|
|
|
|
3楼#
发布于：2005-05-22 20:53
<P>CAD要分开文本、点、线和多边形分别加载的</P><P>在数据库的前面分别加上[CADLine],[CADPoint],[ACDText]以及［ACDArea］就可以了</P>
|
|
|
|
4楼#
发布于：2005-05-22 23:54
么子意思？ 我只加线的。。 不需要判断~ 可以详细指点一下吗？
|
|
|
|
5楼#
发布于：2005-05-22 23:57
有高人可以指点的话 加我QQ 85129676 我最近 24小时在线
|
|
|
|
6楼#
发布于：2005-05-23 15:41
<P>高人 出现啊 </P>
|
|
|
|
7楼#
发布于：2005-05-24 13:03
<P>顶 等高人指点</P>
|
|
|
|
8楼#
发布于：2005-05-24 19:54
<P>自己搞定了 咳~</P>
|
|
|
