Texte dans une image

Résolu
snoopline Messages postés 29 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 21 septembre 2008 - 17 janv. 2005 à 12:56
snoopline Messages postés 29 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 21 septembre 2008 - 17 janv. 2005 à 13:41
Bonjour,

Je souhaite inserer la date dans un .jpg
La date et le fichier.jpg s'affichent bien sur la Picturebox mais la fonction Save picture n'enregistre pas cet ajout de texte.

Picture1.Picture = LoadPicture(fichier)
Picture1.CurrentX = 50
Picture1.CurrentY = 50
Picture1.Print Now
SavePicture Picture1.Image, fichier

Une idée ?? Merci

4 réponses

Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
17 janv. 2005 à 13:13
Picture1.AutoRedraw = True

Daniel
3
Julien237 Messages postés 883 Date d'inscription vendredi 3 novembre 2000 Statut Membre Dernière intervention 3 mars 2009 7
17 janv. 2005 à 13:23
J'ai pas mon pc ici (encore une fois, je suis à l'école ) mais essaye qque chose du styel
picutre1.image=picture1.picture (sa lie les deux modes d'affichage
du controle picture box, l'affichage d'une image de fond (.picture ) et tout ce qui est commande, sortie graphique du controle (.print .line etc...) Mais je suis pas tt à fait sur de moi.

J'aime bien les frites...
0
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
17 janv. 2005 à 13:34
ce serait plutot ça:
Picture1.Picture = Picture1.Image
SavePicture Picture1.Picture, fichier

mais ça change rien au problème étant donné que si AutoRedraw n'est pas à True, l'image ne se copiera pas.

Daniel
0
snoopline Messages postés 29 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 21 septembre 2008
17 janv. 2005 à 13:41
Avec Picture1.AutoRedraw = True

Cela marche parfaitement, merci Gobillot !
0
Rejoignez-nous