Accueil > > > ROTATION ET MIROIR DE BITMAP
ROTATION ET MIROIR DE BITMAP
Information sur la source
Description
Il doit exister une solution certainement plus rapide, mais pour palier à l'absence de la fonction RotateFlip dans la CF 1.O, voici deux fonctions simple de rotation et de miroir sur une image
Source
- Public Function RotateLeft(ByVal Img As Bitmap) As Bitmap
- Dim NouveauBitmap As New Bitmap(Img.Size.Height, Img.Size.Width)
- Dim X, Y As Integer
- For Y = 0 To Img.Size.Height - 1
- For X = 0 To Img.Size.Width - 1
- NouveauBitmap.SetPixel(Y, NouveauBitmap.Height - X, Img.GetPixel(X, Y))
- Next
- Next
- Return NouveauBitmap
- End Function
-
- Public Function Mirror(ByVal Img As Bitmap) As Bitmap
- Dim NouveauBitmap As New Bitmap(Img.Size.Width, Img.Size.Height)
- Dim X, Y As Integer
- For Y = 0 To Img.Size.Height - 1
- For X = 1 To Img.Size.Width - 1
- NouveauBitmap.SetPixel(NouveauBitmap.Width - X, Y, Img.GetPixel(X, Y))
- Next
- Next
- Return NouveauBitmap
- End Function
Public Function RotateLeft(ByVal Img As Bitmap) As Bitmap
Dim NouveauBitmap As New Bitmap(Img.Size.Height, Img.Size.Width)
Dim X, Y As Integer
For Y = 0 To Img.Size.Height - 1
For X = 0 To Img.Size.Width - 1
NouveauBitmap.SetPixel(Y, NouveauBitmap.Height - X, Img.GetPixel(X, Y))
Next
Next
Return NouveauBitmap
End Function
Public Function Mirror(ByVal Img As Bitmap) As Bitmap
Dim NouveauBitmap As New Bitmap(Img.Size.Width, Img.Size.Height)
Dim X, Y As Integer
For Y = 0 To Img.Size.Height - 1
For X = 1 To Img.Size.Width - 1
NouveauBitmap.SetPixel(NouveauBitmap.Width - X, Y, Img.GetPixel(X, Y))
Next
Next
Return NouveauBitmap
End Function
Conclusion
'Pour appeler ces fonctions, en supposant que l'image soit déjà chargée dans un pictureBox appelé PB1 PB1.Image = Mirror(PB1.Image) PB1.Size = PB1.Image.Size
Si vous avez plus rapide n'hésitez pas à partager vos infos......
Historique
- 07 août 2006 15:18:43 :
- Format ?
Sources du même auteur
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
imprimer fichier bitmap sur imprimante ZEBRA? [ par sisi35 ]
Bonjour,Je souhaiterai imprimer un fichier bitmap sur une zebra.Je code en vb.net.Merci de vos réponses.
Stretchblt d'un bitmap vers un picturebox [ par mcoelho ]
Bonjour,Je développe une appli sur PDA en C# qui doit afficher une carte. L'image de la carte est chargée dans un Bitmap et je veux en affic
Rotation d'un Webbrowser [ par azerty25 ]
HelloJ'aimerai pouvoir faire tourner à 90° un contrôle Webbrowser sous WM5 Smartphone mais je vous avoue que j'ai du mal de voir comment faire si c'e
Cercle avec un bitmap [ par babou6a ]
Bonjour,Pouvez vous m'aider ?Je veux faire une fenetre avec un bitmap en fond. Lorsque l'utilisateur appui sur l'écran, un cercle apparait avec un aut
|
Derniers Blogs
[WP7] AJOUTER DES IMAGES DANS LA MEDIA LIBRARY D'UN WINDOWS PHONE 7[WP7] AJOUTER DES IMAGES DANS LA MEDIA LIBRARY D'UN WINDOWS PHONE 7 par Audrey
L'émulateur Windows Phone 7, fourni avec la version Beta des outils développeurs n'inclut aucune image dans sa bibliothèque. Pas très pratique de tester son application lorsque l'on souhaite que l'utilisateur puisse choisir une image présente dans le télé...
Cliquez pour lire la suite de l'article par Audrey VIVE LES MOCKS ET LES POCOSVIVE LES MOCKS ET LES POCOS par vLabz
J'observe régulièrement autour de moi de la confusion à propos de ces deux termes et j'aimerais juste rappeler ce qu'ils signifient. Je ne suis bien sûr pas le mieux placé pour faire une leçon mais je vais faire de mon mieux pour mettre en valeur ce q...
Cliquez pour lire la suite de l'article par vLabz [WF4] WORKFLOW AND CUSTOM ACTIVITIES - BEST PRACTICES (4/5)[WF4] WORKFLOW AND CUSTOM ACTIVITIES - BEST PRACTICES (4/5) par JeremyJeanson
Vendredi dernier Microsoft a publié le quatrième épisode des bonnes pratiques pour coder ses activités custom dans WF4 : endpoint.tv - Workflow and Custom Activities - Best Practices (Part 4) . Tout comme pour les précédents épisodes, j'ai pris le temps d...
Cliquez pour lire la suite de l'article par JeremyJeanson DéVELOPPEMENT MOBILE : .NET COMPACT FRAMEWORK & LIMITATIONSDéVELOPPEMENT MOBILE : .NET COMPACT FRAMEWORK & LIMITATIONS par Pi-R
Introduction :
Le développement d'applications mobiles est quelque peu différent du développement d'applications sous Windows. En effet, le développement d'applications mobiles se base sur le .NET Compact Fra...
Cliquez pour lire la suite de l'article par Pi-R IPHONE VERSUS WP7 CODINGIPHONE VERSUS WP7 CODING par Nicolas
Je relais une présentation sur slideshare.net, qui compare le développement sur Iphone et Windows Phone 7, qui ma fait sourire. I phone versus windows phone 7 coding View more presentations from www.donburnett.com. J'aurais bien aimé une comparai...
Cliquez pour lire la suite de l'article par Nicolas
Forum
ECRAN ECRAN par calvine
Cliquez pour lire la suite par calvine
Logiciels
Xilisoft HD Vidéo Convertisseur 6 (6.0.3.0421)XILISOFT HD VIDéO CONVERTISSEUR 6 (6.0.3.0421)Xilisoft HD Vidéo Convertisseur est un outil professionnel de conversion HDTV, conçu pour transfo... Cliquez pour télécharger Xilisoft HD Vidéo Convertisseur 6 Xilisoft MP4 Convertisseur 6 (6.0.2.0415)XILISOFT MP4 CONVERTISSEUR 6 (6.0.2.0415)Xilisoft MP4 Convertisseur est un outil puissant pour la conversion de vidéo MP4, qui peut conver... Cliquez pour télécharger Xilisoft MP4 Convertisseur 6 Vade Retro Desktop (3.03)VADE RETRO DESKTOP (3.03)Le logiciel antispam Vade Retro pour Microsoft Outlook®, Outlook Express® et Windows Mail®(Vista)... Cliquez pour télécharger Vade Retro Desktop Malwarebytes Anti Malwares (1.46)MALWAREBYTES ANTI MALWARES (1.46)Malwarebytes' Anti-Malware est un anti-malware qui peut éliminer même les plus avancés des logic... Cliquez pour télécharger Malwarebytes Anti Malwares
|