//删除SDE栅格表 function DeleteSDEimg(ImgTableName: string): Boolean; var pWorkspaceName : IWorkspaceName; pDatasetName : IDatasetName; pInFDName : RasterDatasetName; pFeatureWorkspaceManage : IFeatureWorkspaceManage; begin try pWorkspaceName := CoWorkspaceName.Create as IWorkspaceName; pWorkspaceName.Set_ConnectionProperties(FpPropset); pWorkspaceName.Set_WorkspaceFactoryProgID('esriCore.SdeWorkspaceFactory.1'); pInFDName := CoRasterDatasetName.Create as IRasterDatasetName; pDatasetName := pInFDName as IDatasetName; pDatasetName._Set_WorkspaceName(pWorkspaceName); pDatasetName.set_Name(ImgTableName); pFeatureWorkspaceManage := FWorkspace as IFeatureWorkspaceManage; pFeatureWorkspaceManage.DeleteByName(pDatasetName); Result := True; except Result := False; end; end; //其中FpPropset的设置 by gisoracle FpPropset := CoPropertySet.Create as IPropertySet; with FpPropset do begin SetProperty('Server', computer); SetProperty('Instance', SdeInstance); SetProperty('Database', Database); SetProperty('user', UserName); SetProperty('password', password); SetProperty('version', version); end;