Imprimer des cadres ou lignes

Tixs66VB Messages postés 19 Date d'inscription dimanche 23 mars 2003 Statut Membre Dernière intervention 19 mai 2003 - 19 mai 2003 à 01:33
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 20 mai 2003 à 07:12
Salut! Je voudrais imprimer un cadre ou des lignes, entre du texte. mais il met le texte, mais jamais les lignes.

J'ai même essayer cette exemple que j'ai trouver dans les sources, et il a imprimé seulement le texte.

Printer.Line (0,0)-(500,500),,B
Printer.CurrentX = 10
Printer.CurrentY = 5
Printer.Print "Texte écrit dans le cadre"

Merci de m'aider!!

3 réponses

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
19 mai 2003 à 02:56
essaie de decaler la chose....

txt = "Texte écrit dans le cadre"
Printer.Line (5,5)-(20 + textwidth(txt) , textheight(txt) + 15 ),0,B
Printer.CurrentX = 10
Printer.CurrentY = 5
Printer.Print txt


-----------------------------------------------------------------------
By Renfield

thomas_reynald@msn.com

Aucune touche n'a été bléssée lors de la saisie de ce texte..........
0
Tixs66VB Messages postés 19 Date d'inscription dimanche 23 mars 2003 Statut Membre Dernière intervention 19 mai 2003
19 mai 2003 à 22:08
J'ai fait exactement ton exemple, et il a imprimé seulement le texte. Aucun cadre.

Si tu as un autre idée j'apprécierais :)
0
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
20 mai 2003 à 07:12
et si tu demandes un rendu ailleurs, pour t'entrainer , et eprouver l'algo ??
dans un pictureBox, par exemple , ca marche , la , au moins ?? non ???

peut etre un rapport avec l'epaisseur des traits, non définie ici.....
-----------------------------------------------------------------------
By Renfield

thomas_reynald@msn.com

Aucune touche n'a été bléssée lors de la saisie de ce texte..........
0
Rejoignez-nous