wxPerl Afficher un fichier
Bonjour a tous,
Je lance une commande en boucle et affiche le resultat dans un WX::TextCtrl et un HSCROLL pour pouvoir pouvoir voir ce qui c'est passé, j'ai 2 probleme le premier c'est que l'affichage consomme beaucoup en memoire, le deuxieme c'est que ca fini par ce planter.
l'idée est donc d'utiliser un fichier en intermediaire mais je ne sais pas comment faire ?
wxPerl Afficher un fichier
je lance mes reflexion cela permetra peut etre d'avancer,
tous d'abord il faut ouvrir un fichier en lecture ecriture
if (open (FILEDIALOG, "+>dialog.tmp")) {
select( ( select(FILEDIALOG), $| = 1 )[0] );
$filediag = \*FILEDIALOG;
}
on ecrit dedans par
print {$filediag} "On ecrit ce que l'on veut\n";
maintenant que l'on a le fichier comment faire pour n'afficher que la ligne 10 a 20 ?
pour cela il faudrait il faudrait pouvoir faire -> seek 10 $filediag
puis faire afficher ligne a ligne jusqu'a la ligne 20