Forum Webscript.Ru
Программирование => Perl => Тема начата: wertuo от 22 Февраля 2003, 17:43:29
-
Прочитал всё, что вернул поиск и не понял как заставить GD писать моим TTF шрифтом. Пускай даже английским.
use GD;
$im = newFromPng GD::Image(\'myimage.png\');
$black = $im->colorAllocate(0,0,0);
$font = "luxisri.ttf";
$im->stringTTF($black, $font, 12, 0, 10, 10, "Test");
В результате получаю четрые аккуратненьких прямоугольничка.
-
http://www.providerz.ru/articles/perl/perl-using-gd-padala.html
-
Спасибо за совет! К сожалению, я читал этот документ. Помимо того, что туда вкрались нсколько опечаток в примере по работе с TTF, так ещё у меня этот код не работает. У меня Windows XP. Под Linux, насколько я понял, таких проблем нет.
-
Можно попробовать посмотреть оригинал этой статьи:
http://linuxgazette.com/issue81/padala.html
-
У меня Windows XP.
Насколько я понял, у тебя GD не понимает формат твоих шрифтов.
Делаем так - скачиваем никсовыу TTF и натравливаем GD на них.
Если не подходит такой вариан - заставь GD (в цикле) вывести надписи на всех имеющихся у тебя шрифтах. Возможно, некоторые и заведутся.
-
Да зачем так сильно париться?
У меня через stringFT все пашет, без заморочек с кодировками даже.
$image = GD::Image->newFromJpeg($photo,1);
$kewl = $image->colorAllocate(54,69,63);
$font = \'/home/cgi-bin/discount/arial.ttf\';
$image->stringFT($kewl, $font, 15, 0, $x1, $y1, "ФИО: $text");
-
Всего на почти три года опоздал...