从图像中提取一部分

发布于 2024-10-20 00:21:37 字数 258 浏览 1 评论 0原文

我想从图像中提取小矩形，然后想将小矩形转换/滚动为圆柱体。不需要动画。我只想将圆柱体作为图像。

我使用 Perlmagick 作为 ImagemagicK。

任何帮助/建议将不胜感激。

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

缘字诀 2024-10-27 00:21:37

假设您知道要提取的矩形的 x,y 坐标和几何形状；

use Image::Magick;
...
my $image = Image::Magick->new();
my $x = $image->Read($filename);
    die "$x" if "$x";

# 100x100 is the size of the cropped image, the +40+40 are giving the x and y
# offsets (i.e. the upper-left coordinate of the cropped image)  
$image->Crop(geometry=>"100x100+40+40");

您必须对气缸进行更具体的说明，但如果这是我认为的那样，请检查 Fred 的 Cylinderize 脚本。给出的示例是 ImageMagick 命令行参数，因此需要做一些工作才能将其转换为 Perl 等效项（或者您可以使用 Perl 的 exec() 函数调用它们）。

Assuming you know the x,y coordinates and geometry of the rectangles you're trying to extract;

use Image::Magick;
...
my $image = Image::Magick->new();
my $x = $image->Read($filename);
    die "$x" if "$x";

# 100x100 is the size of the cropped image, the +40+40 are giving the x and y
# offsets (i.e. the upper-left coordinate of the cropped image)  
$image->Crop(geometry=>"100x100+40+40");

You'll have to be more specific about cylinders, but if it's what I think it is then check Fred's Cylinderize script. The examples given are ImageMagick command-line arguments so there's a bit of work to convert it to the perl equivalent (or you could call them using Perl's exec() function).

回复收藏 0 原文

~没有更多了~