2013-07-31 60 views
0

我在我的Perl脚本中使用GD库,允许我绘制一个真正的字体文本。因为我不知道在一开始确切大小,我设置使用GD库裁剪图像

my $i = new GD::Image(3000, 3000); 

,然后我画我的文字

my $black = $i->colorAllocate(0, 0, 0); 
my @b = $i->stringFT($black, './ttf/cour.ttf', 12, 0, 0, 0, "\n$text"); 

其中@b包含我的作物数据。

我想是这样的(不正确的语法)执行的东西:

$i->crop(0, 0, $b[2], $b[3]); 

...但它有没有这样的crop功能。

如何裁剪我的图像?有没有一些已知的解决方法?

回答

1

通常,您会使用the "copy" methods of GD将选定的数据从一个图像移动到新图像。

或者,如果您真正需要的只是计算使用GD绘制的字符串的宽度和高度,请查看GD::Text

+0

是的,那也是我能看到的简单解决方案。我正在寻找一些不会浪费资源的“智能”解决方案...... –