<html><head></head><body><div style="font-family: Verdana;font-size: 12.0px;"><div>Merci.</div>
<div> </div>
<div>Oui, cela est la solution<br/>
</div>
<div class="signature">===========================================================================<br/>
Patrick DUPRÉ | | email: pdupre@gmx.com<br/>
Laboratoire interdisciplinaire Carnot de Bourgogne<br/>
9 Avenue Alain Savary, BP 47870, 21078 DIJON Cedex FRANCE<br/>
Tel: +33 (0)380395988<br/>
===========================================================================</div>
<div>
<div>
<div name="quote" style="margin:10px 5px 5px 10px; padding: 10px 0 10px 10px; border-left:2px solid #C3D9E5; word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;">
<div style="margin:0 0 10px 0;"><b>Sent:</b> Wednesday, February 26, 2020 at 10:28 AM<br/>
<b>From:</b> "Nicolas GEORGES" <xlat@cpan.org><br/>
<b>To:</b> "Liste francophone pour les questions générales sur Perl" <perl@mongueurs.net><br/>
<b>Subject:</b> Re: [Perl] Interaction avec Tk</div>
<div name="quoted-content">
<div>Bonjour,
<div> </div>
<div>Ca ressemble à un soucis avec l'eventloop, as-tu ajouté : $val_cutoff -> update(); pour forcer la prise en compte de tout les messages ?</div>
<div> </div>
<div>
<div>
<div class="gmail_signature">
<div>
<blockquote style="margin: 0.0px 0.0px 0.0px 0.8ex;border-left-width: 1.0px;border-left-color: rgb(204,204,204);border-left-style: solid;padding-left: 1.0ex;"><font size="1"><a href="http://codepad.org/Lb2tGEjj" target="_blank">print pack'b*',join'',map{$_.($_+0?'010':'100')}unpack('b*',pack'w*',7376,16,193516616,0,1508,0,11289860)=~/...../g</a></font></blockquote>
</div>
</div>
</div>
</div>
</div>
<div class="gmail_quote">
<div class="gmail_attr">Le mer. 26 févr. 2020 à 10:15, Patrick Dupre <<a href="mailto:pdupre@gmx.com" onclick="parent.window.location.href='mailto:pdupre@gmx.com'; return false;" target="_blank">pdupre@gmx.com</a>> a écrit :</div>
<blockquote class="gmail_quote" style="margin: 0.0px 0.0px 0.0px 0.8ex;border-left: 1.0px solid rgb(204,204,204);padding-left: 1.0ex;">Bonjour,<br/>
<br/>
J'utilise perl:Tk pour mon interface graphique.<br/>
Dans une routine je fais une mise a jour de l'interface:<br/>
$val_cutoff -> configure (-foreground => 'red') ;<br/>
$val_cutoff -> insert (0, $cutoff) ;<br/>
Puis, je lance un calcul.<br/>
Cette routine a ete lancee par l'interface.<br/>
<br/>
La mise a jour ne se fait qu'a la fin du calul.<br/>
Serait-ce possible de faire une mise a jour immediate?<br/>
<br/>
Merci.<br/>
<br/>
===========================================================================<br/>
Patrick DUPRÉ | | email: <a href="mailto:pdupre@gmx.com" onclick="parent.window.location.href='mailto:pdupre@gmx.com'; return false;" target="_blank">pdupre@gmx.com</a><br/>
Laboratoire interdisciplinaire Carnot de Bourgogne<br/>
9 Avenue Alain Savary, BP 47870, 21078 DIJON Cedex FRANCE<br/>
Tel: +33 (0)380395988<br/>
===========================================================================<br/>
<br/>
_______________________________________________<br/>
Perl mailing list<br/>
<a href="mailto:Perl@mongueurs.net" onclick="parent.window.location.href='mailto:Perl@mongueurs.net'; return false;" target="_blank">Perl@mongueurs.net</a><br/>
<a href="http://listes.mongueurs.net/mailman/listinfo/perl" target="_blank">http://listes.mongueurs.net/mailman/listinfo/perl</a><br/>
Attention, les archives sont publiques</blockquote>
</div>
_______________________________________________ Perl mailing list Perl@mongueurs.net <a href="http://listes.mongueurs.net/mailman/listinfo/perl" target="_blank">http://listes.mongueurs.net/mailman/listinfo/perl</a> Attention, les archives sont publiques</div>
</div>
</div>
</div></div></body></html>