ziliujiang
路人甲
路人甲
  • 注册日期2004-08-11
  • 发帖数15
  • QQ
  • 铜币158枚
  • 威望0点
  • 贡献值0点
  • 银元0个
阅读:1923回复:5

用ARCengine做编辑可以吗?

楼主#
更多 发布于:2005-02-24 15:03
在Arcengine的组件对象模型图表中 没有关于editor相关的接口和组件啊 如果要做编辑 比如:动态生成一条路径 并且将这条路径(polyline)保存在geodatabase当中 同时 赋以相应的属性值。这样的问题是不是要用AE之外的AO来解决啊?请教了
喜欢0 评分0
suppergg
路人甲
路人甲
  • 注册日期2004-10-25
  • 发帖数60
  • QQ
  • 铜币256枚
  • 威望0点
  • 贡献值0点
  • 银元0个
1楼#
发布于:2005-02-25 17:00
Engine当然可以做编辑了,只不过不是用editor。  可以看一下sample中就有
举报 回复(0) 喜欢(0)     评分
yly
yly
路人甲
路人甲
  • 注册日期2004-11-26
  • 发帖数4
  • QQ
  • 铜币141枚
  • 威望0点
  • 贡献值0点
  • 银元0个
2楼#
发布于:2005-02-26 14:53
<P>我这做了些东西,如想交流的话,可通过QQ和我联系。QQ:343887993</P>
举报 回复(0) 喜欢(0)     评分
万里云
路人甲
路人甲
  • 注册日期2005-01-14
  • 发帖数114
  • QQ
  • 铜币414枚
  • 威望0点
  • 贡献值0点
  • 银元0个
3楼#
发布于:2005-03-01 20:22
<P>我也在用vb+engine做项目,可以多多交流</P><P>qq:32101925</P>
女口果人尔能看日月白这段言舌,那言兑日月人尔白勺目艮目青有严重白勺散光 
举报 回复(0) 喜欢(0)     评分
gis
gis
管理员
管理员
  • 注册日期2003-07-16
  • 发帖数15947
  • QQ554730525
  • 铜币25339枚
  • 威望15364点
  • 贡献值0点
  • 银元0个
  • GIS帝国居民
  • 帝国沙发管家
  • GIS帝国明星
  • GIS帝国铁杆
4楼#
发布于:2005-03-02 14:30
<P>贴个函数上来,只做参考,单独用不上,hoho:)</P><P>'功能:开始编辑
'返回:无
Public Sub StartEditing()
    Dim ff_m_WorkspaceEdit As IWorkspaceEdit
    Dim ff_m_FeatureLayer As IFeatureLayer
    Dim ff_m_Dataset As IDataset
    Dim intOldMousPointer As Integer
    
On Error GoTo Edit_err
    intOldMousPointer = Screen.MousePointer
    Screen.MousePointer = vbHourglass
    '获取当前图层
    Set ff_m_CurLayer = GetCurLayer()
    
    
    '如果没有选择当前图层则退出
    If ff_m_CurLayer Is Nothing Then Exit Sub
    '检查当前图层是否可以编辑
    If Not TypeOf ff_m_CurLayer Is IGeoFeatureLayer Then Exit Sub
    
    Set ff_m_FeatureLayer = ff_m_CurLayer
    Set ff_m_Dataset = ff_m_FeatureLayer.FeatureClass
    If ff_m_Dataset Is Nothing Then Exit Sub
    
    ' 设置编辑工作空间
    Set ff_m_WorkspaceEdit = ff_m_Dataset.Workspace
    '当前工作空间是否正在编辑
    If Not ff_m_WorkspaceEdit.IsBeingEdited Then
      ff_m_WorkspaceEdit.StartEditing True
      ff_m_WorkspaceEdit.EnableUndoRedo
    End If
    
    '开始编辑后,默认为选择状态
    ff_m_EditMode = FF_EDIT_SELECT
    
    '初始化地图事件
    Set m_pActiveViewEvents = ff_m_Map
    
    m_EditStatus = True
    
    Screen.MousePointer = intOldMousPointer
    
    Exit Sub
Edit_err:
    MsgBox Err.Description, vbOKOnly, "错误"
End Sub</P>
举报 回复(0) 喜欢(0)     评分
zhang____chu
路人甲
路人甲
  • 注册日期2004-08-31
  • 发帖数34
  • QQ
  • 铜币38枚
  • 威望0点
  • 贡献值0点
  • 银元0个
5楼#
发布于:2005-03-05 09:51
<P>哪能否在engine中实现捕捉功能呢???</P>
谢谢大家了!
举报 回复(0) 喜欢(0)     评分
游客

返回顶部