Bonjour,
Je voudrais savoir comment enregistrer du texte avec des modifications telle la police ou la taille car je veut faire un traitement de texte
Merci
Bonjour,
Je voudrais savoir comment enregistrer du texte avec des modifications telle la police ou la taille car je veut faire un traitement de texte
Merci
En définissant le font par exemple.
Regarde Tk::options et font
Code : Sélectionner tout - Visualiser dans une fenêtre à part -font => "{Century Gothic TrueType} 10 {normal}"
- Les meilleurs cours et tutoriels Perl et Perl 6 pour vous former ;
- FAQ Perl, Perl 6 et Perl/Tk d'entraide ;
- Les news sur la rubrique Perl ;
- S'abonner au compte Twitter de la rubrique Perl ;
- Mes tutoriels developpez.com.
Pas de questions technique par messagerie privée (lisez les règles du forum Perl) et pour les nouveaux !
mais le problème c'est que quand j'enregistre avec GetOpenFile le fichier obtenu n'a pas gardé les modifs de police ou de taille
J'ai pas bien compris.
Tu utilises GetOpenFile pour enregistrer un fichier et tu souhaiterais afficher le contenu de ce fichier dans une fenetre TK en gardant la police du fichier? Si c'est ça, c'est pas possible car Tk sera impossible de trouver la police du fichier.
Par contre, tu peux lui donner une police à l'affichage dans ton widget.
As tu un exemple de script?
- Les meilleurs cours et tutoriels Perl et Perl 6 pour vous former ;
- FAQ Perl, Perl 6 et Perl/Tk d'entraide ;
- Les news sur la rubrique Perl ;
- S'abonner au compte Twitter de la rubrique Perl ;
- Mes tutoriels developpez.com.
Pas de questions technique par messagerie privée (lisez les règles du forum Perl) et pour les nouveaux !
voici la fonction pour enregister :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 $fenetre -> Button ( -text => 'Sauver Fichier' , -command => sub { $text = $texte -> get ( '1.0' , 'end' ) ; $nom_fichier = $fenetre -> getSaveFile ( -initialdir => $0 ) ; # sous Windows print "$nom_fichier\n" ; open RTBF, ">", "$nom_fichier" or die "Impossible de creer $nom_fichier"; print RTBF "$text"; close RTBF; } ) -> pack ( -side => 'right' , -padx => 8 , -pady => 4 ) ;
Utilise les balises codes pour l'affichage sur le forum s'il te plait.
C'est le #
Tu fais l'inverse en faite.
tu as un contenu de texte dans ton widget que tu enregistre dans un fichier.
Bah je ne vois pas comment tu pourras créer un fichier en y mettant du texte avec une police donnée. Si c'est un fichier ASCII que tu crée, c pas possible. Si c'est un excel ou pdf, pourquoi pas et là faut voir dans les modules adéquat
- Les meilleurs cours et tutoriels Perl et Perl 6 pour vous former ;
- FAQ Perl, Perl 6 et Perl/Tk d'entraide ;
- Les news sur la rubrique Perl ;
- S'abonner au compte Twitter de la rubrique Perl ;
- Mes tutoriels developpez.com.
Pas de questions technique par messagerie privée (lisez les règles du forum Perl) et pour les nouveaux !
Partager