Afficher et imprimer dans tous les sens : application

Soyez le premier à donner votre avis sur cette source.

Vue 5 437 fois - Téléchargée 695 fois

Description

Visualisation et impression de la feulle de fond d'une boîte de CD / DVD
utilisant les fonctions API de GDI32 pour afficher / imprimer "verticalement".

Une ligne de texte sur les bords,
avec choix des caractères : police, taille, couleur, gras, italique

Jusqu'à 20 (paramétrable) lignes de texte sur le fond, à rentrer une par une,
avec choix des caractères : police, taille, couleur, gras, italique, souligné ;
emplacement du texte défini par le clic souris ; tâtonnement possible :
clic droit de la souris = fonction "UnDo"

Impression "tel qu'à l'écran" (wysiwyg)

Source / Exemple :


'BUG CONNU ET CORRIGÉ :

'LES IMPRIMANTES N'INTERPRÈTENT PAS TOUTES DE LA MEME MANIÈRE 
'LES CODES ENVOYÉS PAR LA FONCTION API "TEXTOUT".
'LES ÉCRITURES "VERTICALES" (sur les bords de la feuille de fond) 
'PEUVENT NE PAS S'IMPRIMER CORRECTEMENT, 

'SOLUTION : SI AU PREMIER ESSAI, L'IMPRESSION DES BORDS EST  DÉCALÉE,
'CLIQUER SUR LA FLÈCHE ROUGE EN HAUT À DROITE :
'LA FLÈCHE CHANGE DE SENS ET TOUT RENTRE DANS L'ORDRE. 
'Manipulation à utiliser une seule fois : le paramétrage de l'imprimante est mémorisé.

Reste à ajouter la possibilité de mettre une image (facile) et de l'imprimer ...

Conclusion :


Mise à jour le 30 octobre 2003 après perte du lien précédent.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

cs_rene38
Messages postés
1858
Date d'inscription
samedi 29 juin 2002
Statut
Membre
Dernière intervention
17 octobre 2013
10
Exact Jarod59 : j'avais corrigé mais je n'ai pas posté le bon zip.

Dans la fonction Private Sub Fond_MouseDown(....
il faut ajouter la ligne '****
........
Else ' clic droit : effacement (sur n niveaux)
    n = n - 1
If n < 0 Then n = 0: Exit Sub '****
Couleur = Fond.ForeColor
........

Je n'ose olus faire une mise à jour du zip : ma source précédente s'est perdue à l'occasion d'une mise à jour...
cs_jarod59
Messages postés
14
Date d'inscription
samedi 27 juillet 2002
Statut
Membre
Dernière intervention
5 décembre 2003

Bonne source
Ya un bug quand je fais un clique droit sur le texte du milieu et quand il y a rien
Sinon c'est trés interressant mais ouais avec une image au milieu c'est bien et faudrait aussi qu'on puisse mettre une couleur de fond sur les bord, ca c'est des choses simples.
bon codding
ciao

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.