20898_zh-CN

liliconcom

裁剪图像并将裁剪图像插入数据表<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

我目前正在运行一个脚本，该脚本使用以下简单脚本将 1Mb 图像插入数据表（其中：图像链接是存储 jpg 的网络驱动器）

公式（打开( ：图片链接， “jpg” ) ),

由于图像的大小，数据表越来越大（我有 ~1500 张图像）并且尝试了裁剪功能但无法获得正确的语法

以下是我尝试过的各种方法之一（除了正确的方法之外，可能还有所有这些方法的组合！）。

公式（打开( ：图片链接， “jpg” ) ) <<庄稼(左边( 190 ）， 顶部（ 0 ）， 底部（ 1690 ),正确的( 700 ) ),

我觉得我很接近但还不完全在那里。

理想情况下，它会执行以下操作

1. 打开图像（一次一张以节省计算机内存？）
2. 裁剪图像，然后将裁剪图像保存到中央文件夹中。 如果需要，这将允许进行额外的图像分析。
3. 将裁剪插入数据表
4. 关闭原始图像。

问候

大卫

回复：裁剪图像并将裁剪插入数据表

这是一个示例脚本，可以执行您指定的操作

名字默认到这里( 1个) ;

// 获取图片列表

文件列表=目录中的文件( “$SAMPLE_IMAGES” ) ;

// 遍历所有图片，裁剪并保存

为了(我= 1个,我<= N 项(文件列表) ,我++,

// 使用 Substitute 因为扩展值需要是一个表达式，

// 不是文字

评价(

代替(

表达式(

图片=打开( “$SAMPLE_IMAGES\” ||文件列表[我] , __扩大__ )

) ,

表达式( __扩大__ ) ,解析(单词( - 1个,文件列表[我] , “。” ) )

)

) ;

// 留出时间让图像被读取

等待( 1个) ;

      

//裁剪图像

图片<<庄稼(左边( 50 ) ,正确的( 100 ) ,顶部( 60 ) ,底部( 150 ) ) ;

// 保存图片到新文件夹

图片<<保存图片( “<保存文件夹的路径>” ||文件列表[我] ,单词( - 1个,文件列表[我] , “。” ) ) ;

) ;

// 创建一个新表

新表( “无标题” ,

添加行( N 项(文件列表) ) ,

新建专栏( “图像” ,表达, “没有任何” ,设置值( {} ) )

) ;

// 填充图像列

foreachrow (

:图像=新图片( “<保存文件夹的路径>” ||文件列表[排()])

) ;