Sujet Précédent Sujet Suivant

TEXTE VERTICAL : DE BAS EN HAUT, DE HAUT EN BAS, MAIS AUSSI INCLINÉ À 45°, À N°

Vbsupernul Messages postés 287 Date d'inscription vendredi 25 octobre 2002 Statut Membre Dernière intervention 18 janvier 2004 - 4 déc. 2002 à 07:58
cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 - 10 avril 2008 à 08:50

Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/5256-texte-vertical-de-bas-en-haut-de-haut-en-bas-mais-aussi-incline-a-45-a-n

cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
10 avril 2008 à 08:50

Le tout c'est que le contrôle ou l'objet possède la propriété hDC

cs_Tas Messages postés 7 Date d'inscription vendredi 21 mars 2003 Statut Membre Dernière intervention 14 septembre 2007
10 avril 2008 à 08:25

Comment peut on appliquer la méthode à un label ou tout autre objet déjà présent dans la Form ?
Tas.

cs_Tas Messages postés 7 Date d'inscription vendredi 21 mars 2003 Statut Membre Dernière intervention 14 septembre 2007
10 avril 2008 à 08:23

Bonjour,
Fantastique ! ça marche. T'es le meilleur.
Merci. Tas.

cs_PROGRAMMIX Messages postés 1133 Date d'inscription mercredi 2 octobre 2002 Statut Membre Dernière intervention 24 juillet 2011 2
9 avril 2008 à 17:02

Bonjour,

Je viens de faire un test.

Load est, me semble-t-il, le chargement en mémoire

Si tu mets le code dans la Form_Paint(), alors là, ça devrait marcher (en tout cas, ça a marché chez moi).

Bonne chance.

cs_Tas Messages postés 7 Date d'inscription vendredi 21 mars 2003 Statut Membre Dernière intervention 14 septembre 2007
9 avril 2008 à 15:56

Merci de ta réponse rapide.
J'ai essayé mais ça marche pas !
Ou alors il y a queqlque chose qui m'échappe.
Merci. Tas.

cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
9 avril 2008 à 14:54

Bonjour
Il y a bien longtemps que je n'ai plus programmé mais ça doit sans doute marcher si on fait appel à la fonction dans la procédure Form_Load

cs_Tas Messages postés 7 Date d'inscription vendredi 21 mars 2003 Statut Membre Dernière intervention 14 septembre 2007
9 avril 2008 à 14:44

Génial mais je reste sur la question de StanEverest Comment réaliser un affichage direct à l'ouverture du formulaire ?

StanEverest Messages postés 1 Date d'inscription vendredi 10 janvier 2003 Statut Membre Dernière intervention 27 septembre 2006
27 sept. 2006 à 17:55

Comment réaliser un affichage direct à l'ouverture du formulaire, à l'écran d'abord ?

cs_PROGRAMMIX Messages postés 1133 Date d'inscription mercredi 2 octobre 2002 Statut Membre Dernière intervention 24 juillet 2011 2
4 mars 2003 à 21:59

En consultant la Microsoft Knowledge Base, j'ai trouvé un article sur le problème d'impression qui peut être résolu en utilisant non pas l'API CreateFont mais CreateFontIndirect :
http://support.microsoft.com/default.aspex?scid=kb;en-us;175535

J'ai déposé une source utilisant celle-ci : Imprimer un texte qui tourne (source n°7945).

cs_PROGRAMMIX Messages postés 1133 Date d'inscription mercredi 2 octobre 2002 Statut Membre Dernière intervention 24 juillet 2011 2
6 déc. 2002 à 20:37

Effectivement, j'ai essayé et ça ne marche pas...

Quelqu'un pourrait-il nous éclairer ???

cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
5 déc. 2002 à 00:23

Pour utiliser ce code avec une imprimante, il suffit, en principe, de remplacer Me.hdc par Printer.hdc après avoir envoyé un Printer.Print pour initialiser le handle de l'imprimante.
Ça marchait très bien sous VB3 avec une imprimante sur LPT1.
Je n'ai jamais pu le faire fonctionner sous VB6 (ni sur LPT1 ni sur USB)

cs_Yves Messages postés 31 Date d'inscription samedi 2 mars 2002 Statut Membre Dernière intervention 21 décembre 2003
5 déc. 2002 à 00:04

De fait, c'est avec une imprimante que le résultat serait le plus intéressant. Par exemple, les références d'un document devant s'écrire en vertical dans la marge... C'est un exemple que je n'arrive pas à réaliser et qui m'empêche de générer certains rapports en vb :(

cs_PROGRAMMIX Messages postés 1133 Date d'inscription mercredi 2 octobre 2002 Statut Membre Dernière intervention 24 juillet 2011 2
4 déc. 2002 à 20:01

Merci rene38 pour ce code...

Mais peux-tu me dire comment l'utiliser avec une imprimante ?

Vbsupernul Messages postés 287 Date d'inscription vendredi 25 octobre 2002 Statut Membre Dernière intervention 18 janvier 2004
4 déc. 2002 à 15:12

Ben tu aurais au - pu mettre "faire un texte incliné"...
De tt façon on peut pas revenir sur sa note

Vbsupernul Messages postés 287 Date d'inscription vendredi 25 octobre 2002 Statut Membre Dernière intervention 18 janvier 2004
4 déc. 2002 à 15:11

Ben tu aurais au - pu mettre "faire un texte incliné"...
De tt façon on peut pas revenir sur sa note

cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
4 déc. 2002 à 12:37

Vbsupernul : Comme tu dois t'en douter, ce bout de code est destiné à être incorporé dans un projet . La fonction 'TexteIncliné' doit alors être appelée depuis ... quelque part mais sûrement pas par un bouton de commande. D'où le peu d'importance des propriétés de ce bouton. J'ai donc laissé Command1 pour son 'Name' : tout le monde sait que c'est le nom générique d'un bouton de commande. Quant à son 'Caption', il n'est pas indiqué dans le code ...

Vbsupernul Messages postés 287 Date d'inscription vendredi 25 octobre 2002 Statut Membre Dernière intervention 18 janvier 2004
4 déc. 2002 à 07:58

Super le code!
Et très simple en +...
9/10 (pour le bouton qui n'a pas de "caption" très explicite (Command1)

Discussions similaires

TextBox, défilement vertical automatique

coder un Tchat comme roulettechat.fr/chat/texte.php

Texte aléatoire

Text Aleatoire

souligner texte sous illustrator 10

Votre réponse

Discussions similaires