|
阅读：2081回复：6
[原创]请教一个郁闷已久的问题
pFeatureLayer.Search(nil,false,pFeatureCursor);<BR> if pFeatureCursor =nil then exit;<BR> pWorkspaceEdit:=pWkSpc as IWorkspaceEdit;<BR> pWorkspaceEdit.StartEditing(true);<BR> pWorkspaceEdit.StartEditOperation;<BR> pFeatureCursor.NextFeature(pFeature);<BR> while pFeature<>nil do<BR> begin<BR> pFeature.Delete;<BR> pFeatureCursor.NextFeature(pFeature);<BR> end;<BR> pWorkspaceEdit.StopEditOperation;<BR> pWorkspaceEdit.StopEditing(true);
|
|
|
1楼#
发布于：2006-09-18 11:41
代码执行没有错误，但是图元删除不掉，请教是怎么回事？
|
|
|
2楼#
发布于：2006-09-18 11:42
在线等，急！
|
|
|
3楼#
发布于：2006-09-18 12:40
<P>就你写的这些代码看,没有错</P>
[此贴子已经被作者于2006-9-18 12:41:34编辑过]
|
|
|
|
4楼#
发布于：2006-09-18 12:42
<P>程序是否检测license,是否有GDBEDIT许可?</P>
|
|
|
|
5楼#
发布于：2006-09-18 13:26
代码没错，另外检查版本是否已经注册
|
|
|
|
6楼#
发布于：2006-09-19 11:20
已经解决！谢谢各位！解决的方法也很奇怪！要在pFeature.Delete;前加上返回值，如：HR:=pFeature.Delete;,就行了，或者在pWorkspaceEdit.StopEditing(true);前加上返回值！delphi,太烂了，个人认为开发AO，还是用VB比较好！<BR><BR>
|
|
