----- Original Message -----
From: "Eric Broens" <[EMAIL PROTECTED]>
> $im->stringTTF($black,$font_header,12,0,35,16,"TEST");
> $im->stringTTF($black,$font_header,12,0,450,16,$count);
>
Try instead:
@r = $im->stringTTF($black,$font_header,12,0,35,16,"TEST");
if(!scalar(@r)) {print "1:$@\n"}
@r = $im->stringTTF($black,$font_header,12,0,450,16,$count);
if(!scalar(@r)) {print "2:$@\n"}
The docs say that @r should contain 8 elements, and that if there is an
error then @r will contain zero elements and the error message will be
written to $@.
So we might learn something from the above changes .... but only if an error
is occurring :-)
Hth.
Cheers,
Rob
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
