admin 管理员组

文章数量: 1184232

 
pro dat_to_tif
  envi = ENVI()
  dat_dir = 'F:\2020\raduation\1月\'
  tif_dir = 'F:\2020\raduation\1月\test\'
  file=file_search(dat_dir,'*dat',count = num)    ;dat文件个数存储到变量num中
  for i=0, num-1 do begin                     ;遍历所有dat文件
    raster = envi.OpenRaster(file[i])
    dat_filename = strsplit(file[i], '\' ,/EXTRACT)
    dat_filename = dat_filename[-1]
    dat_filename = strsplit(dat_filename, '.' ,/EXTRACT)
    dat_filename = dat_filename[0]
    tif_filename = dat_filename + '.tif'
    tif_path = tif_dir + tif_filename
    raster.Export, tif_path, 'TIFF'
  endfor                                      ;结束for循环
  print,'Process Over'
end

参考博文：

本文标签： 升级为 简易教程 数据无缝

版权声明：本文标题：简易教程：将Dat数据无缝升级为TIF格式 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/p/1770917221a3539040.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。