Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

probleme GD and GD::Text::Wrap

7 réponses
Avatar
john.swilting
I do not understand
Why the text displays badly and swindles
my code compil nice
It is letters and figures that display vaguenesses

#!/usr/bin/perl -w
use strict;
use GD;
use GD::Text::Wrap;
use CGI;
use CGI::Carp;
require "Random.pm";

my $q = new CGI;

##my $outfile = shift || "GDWrap.png";

my $gd = GD::Image->new(400,240);
my $white = $gd->colorAllocate(255,255,255);
my $black = $gd->colorAllocate(  0,  0,  0);
my $blue  = $gd->colorAllocate(127,127,255);
my $red   = $gd->colorAllocate(127,  0,  0);


my $text = Random->new();

my $wp = GD::Text::Wrap->new($gd,
    width       => 180,
    line_space  => 4,
    color       => $black,
    text        => $text,
);

$wp->set(align =>'center', para_space => 10, preserve_nl => 0);
$wp->set_font(['arial', 'Dustismo_Sans'], 10);
$gd->rectangle($wp->get_bounds(10,10), $blue);
$wp->draw(10,10);

$text =~ tr/\n//d;
$wp->set(text => $text);
$wp->set(colour => $white, align => 'center', line_space => 2);
$wp->set_font(gdMediumBoldFont, 12);
$wp->draw(20,10);

print $q->header( -type => "image/png", -expires => "-1d");
binmode STDOUT ;
print  $gd->png();

7 réponses

Avatar
Tripa
"john.swilting" a écrit:
I do not understand
Why the text displays badly and swindles
my code compil nice
It is letters and figures that display vaguenesses


Pour quelqu'un qui ne poste que dans l'Usenet anglophone, vous me
semblez bien distrait...

Avatar
john.swilting
Tripa wrote:

"john.swilting" a écrit:
I do not understand
Why the text displays badly and swindles
my code compil nice
It is letters and figures that display vaguenesses


Pour quelqu'un qui ne poste que dans l'Usenet anglophone, vous me
semblez bien distrait...


vous savez ce qui marche pas dans mon cgi
le text est floue
je ne comprends pas


Avatar
john.swilting
john.swilting wrote:

Tripa wrote:

"john.swilting" a écrit:
I do not understand
Why the text displays badly and swindles
my code compil nice
It is letters and figures that display vaguenesses


Pour quelqu'un qui ne poste que dans l'Usenet anglophone, vous me
semblez bien distrait...


vous savez ce qui marche pas dans mon cgi
le text est floue
je ne comprends pas
ça marche

mon code
#!/usr/bin/perl -w
use strict;
use CGI;
use CGI::Carp;
use GD;
use GD::Text::Wrap;
require "Random.pm";
my $q = new CGI;
my $gd = GD::Image->new(800,600);
my $white = $gd->colorAllocate(255,255,255);
my $black = $gd->colorAllocate( 0, 0, 0);
my $blue = $gd->colorAllocate(127,127,255);
my $red = $gd->colorAllocate(127, 0, 0);

my $text = Random->new();

my $wrapbox = GD::Text::Wrap->new( $gd,
line_space => 4,
color => $black,
text => $text,
);

$wrapbox->set_font(gdMediumBoldFont);
$wrapbox->set_font('arial',12);
$wrapbox->set(align => 'center', width => 120);
$wrapbox->draw(10,140);

$gd->rectangle($wrapbox->get_bounds(10,140),$red);
print $q->header( -type => "image/png", -expires => "-1d");
binmode STDOUT ;
print $gd->png();



Avatar
Paul Gaborit
À (at) 23 Jan 2007 08:38:41 +0100,
Tripa écrivait (wrote):
"john.swilting" a écrit:
I do not understand
Why the text displays badly and swindles
my code compil nice
It is letters and figures that display vaguenesses


Pour quelqu'un qui ne poste que dans l'Usenet anglophone, vous me
semblez bien distrait...


;-) !!!

--
Paul Gaborit - <http://perso.enstimac.fr/~gaborit/>
Perl en français - <http://perl.enstimac.fr/>


Avatar
Paul Gaborit
À (at) Tue, 23 Jan 2007 10:41:47 +0100,
"john.swilting" écrivait (wrote):
john.swilting wrote:

Tripa wrote:

"john.swilting" a écrit:
I do not understand
Why the text displays badly and swindles
my code compil nice
It is letters and figures that display vaguenesses


Pour quelqu'un qui ne poste que dans l'Usenet anglophone, vous me
semblez bien distrait...


vous savez ce qui marche pas dans mon cgi
le text est floue
je ne comprends pas
ça marche

mon code
[... du code...]


Et en résumé, quelles sont les différences entre les deux codes ? Et
donc, quelle est la solution au problème ?

--
Paul Gaborit - <http://perso.enstimac.fr/~gaborit/>
Perl en français - <http://perl.enstimac.fr/>




Avatar
john.swilting
Paul Gaborit wrote:


À (at) Tue, 23 Jan 2007 10:41:47 +0100,
"john.swilting" écrivait (wrote):
john.swilting wrote:

Tripa wrote:

"john.swilting" a écrit:
I do not understand
Why the text displays badly and swindles
my code compil nice
It is letters and figures that display vaguenesses


Pour quelqu'un qui ne poste que dans l'Usenet anglophone, vous me
semblez bien distrait...


vous savez ce qui marche pas dans mon cgi
le text est floue
je ne comprends pas
ça marche

mon code
[... du code...]


Et en résumé, quelles sont les différences entre les deux codes ? Et
donc, quelle est la solution au problème ?

le code est dans le premiser post ou je parle anglais






Avatar
Tripa
Paul Gaborit wrote:
Et en résumé, quelles sont les différences entre les deux codes ? Et
donc, quelle est la solution au problème ?



"john.swilting" a écrit:
le code est dans le premiser post ou je parle anglais


Saviez-vous que votre laconisme pouvait être interprété comme un
refus de faciliter la lecture à vos éventuel lecteurs? C'est là
ÀMHA la raison majeure à l'absence de réponses constructives aux
enfilades que vous avez entamées, sur clpm comme ici.

Si d'aventure vous vous échouiez sur un écueil dont vous
n'arriviez cette fois pas à vous extirper par vous-même,
posez-vous la question: qui pourrait avoir envie de me lire? De
faire l'effort visuel de séparer mes phrases de mon code, de les
capitaliser accentuer ponctuer à nouveau? D'essayer des morceaux
de code ostensiblement issus tout droit de mon ouvrage, immaculés
de toute trace de nettoyage que j'aurais pu opérer pour isoler le
problème?

Ajoutant à cela <45b43c43$0$27374$, je
me demande personnellement si vous n'attendez pas de la population
qu'elle tienne un rôle pour lequel vous ne la rétribuez pas.