修改上述IDL脚本，提取影像实际范围边界并保存成同一个SHP文件中

下面是修改后的IDL脚本，可以提取影像实际范围边界并保存成同一个SHP文件中：

; 定义待处理影像文件夹路径和文件名数组
dir = 'C:\image_folder\'
files = ['image1.tif', 'image2.tif', 'image3.tif']

; 创建一个新的矢量数据
vector = ENVIVector(/POLYGON, /DOUBLE)

; 循环遍历待处理影像
FOR i=0, N_ELEMENTS(files)-1 DO BEGIN
    ; 打开待处理影像
    file = dir + files[i]
    raster = ENVIRaster(file)
    ; 获取影像的实际范围边界
    bnd = ENVIRasterMetadata(raster, /GEO_RECT)
    ; 将实际范围边界转为矢量数据
    poly = ENVIGeoRectToPoly(bnd)
    ; 将矢量数据添加到新的矢量数据中
    ENVIVectorAddData, vector, poly
ENDFOR

; 保存矢量数据为SHP文件
SAVE_DIR = dir + 'image_boundary.shp'
ENVISaveVector, vector, SAVE_DIR, /QUIET

; 关闭矢量数据
ENVIClose, vector

脚本的具体流程如下：

1. 定义待处理影像文件夹路径和文件名数组，同之前的脚本。

2. 创建一个新的矢量数据，用于存储所有影像的实际范围边界。

3. 循环遍历待处理影像，同之前的脚本。

4. 获取影像的实际范围边界，使用`ENVIRasterMetadata`函数获取影像的地理范围信息，返回的结果是一个`ENVIRasterGeoRect`结构体，包含左上角、右上角、右下角、左下角四个点的经纬度坐标。

5. 将实际范围边界转为矢量数据，使用`ENVIGeoRectToPoly`函数将`ENVIRasterGeoRect`结构体转换为矢量多边形数据。

6. 将矢量数据添加到新的矢量数据中，使用`ENVIVectorAddData`函数将矢量多边形数据添加到新的矢量数据中。

7. 循环结束后，保存矢量数据为SHP文件，使用`ENVISaveVector`函数将矢量数据保存为SHP文件。

8. 关闭矢量数据，使用`ENVIClose`函数关闭矢量数据。

需要注意的是，保存的SHP文件中包含所有影像的实际范围边界，如需分开保存，可以在循环中加入文件名的判断语句，将每个影像的实际范围边界保存为单独的SHP文件。