Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Rotation image picturebox...galère allemande [ Divers / Débutants ] (noelaurent)

mardi 29 avril 2008 à 20:09:35 | Rotation image picturebox...galère allemande

noelaurent

Bonjour a tous !

Je suis confronté à un problème de rigolo (pour vous les avertis), mais que je n?arrive pas à résoudre...je dois afficher une image dans une picturebox (ca c?est ok) puis la faire tourner de 90 degrés sur commande...et c?est la que ca coince ! J?ai passé pas mal de temps sur des forums...en vain.. merci pour votre aide !

Mon code est :

Public Class Form1

 

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

 

        Dim img As Image

        If OpenFileDialog1.ShowDialog() = DialogResult.OK Then

            img = Image.FromFile(OpenFileDialog1.FileName)

 

            PictureBox1.Image = img

            PictureBox1.Height = img.Height + 90

            PictureBox1.Width = img.Width + 90

 

 

        End If

 

    End Sub


Jusqu?ici c?est ok , mais le second bouton qui doit permettre la rotation de l?image(ci dessous) ne fonctionne pas ...pourriez vous m expliquer pourquoi ?  


 

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

 

 

        PictureBox1.Image.RotateFlip(RotateFlipType.Rotate90FlipXY)

 

 

    End Sub

End Class


Merci infiniment pour votre aide !

Noé


mardi 29 avril 2008 à 20:34:43 | Re : Rotation image picturebox...galère allemande

jrivet

Membre Club
Salut,
Essaies ceci (code tiré de cette page)

Private Sub btnRotate_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles btnRotate.Click
    Dim wid As Integer
    Dim hgt As Integer
    Dim X As Integer
    Dim Y As Integer

    ' Make a Bitmap representing the input image.
    Dim bm_in As New Bitmap(picIn.Image)
    wid = bm_in.Width
    hgt = bm_in.Height

    ' Make the output bitmap.
    Dim bm_out As New Bitmap(hgt, wid)

    ' Copy the pixel values.
    For X = 0 To wid - 1
        For Y = 0 To hgt - 1
            bm_out.SetPixel(hgt - Y - 1, X, _
                bm_in.GetPixel(X, Y))
        Next Y
    Next X

    ' Display the result.
    picOut.Image = bm_out
End Sub
(Coloration syntaxique automatique par Kenji)


@+: Ju£i€n
Pensez: Réponse acceptée

mardi 29 avril 2008 à 21:18:26 | Re : Rotation image picturebox...galère allemande

Charles Racaud

Membre Club
Réponse acceptée !
Salut,

Il suffit simplement d'actualiser la picturbox
Ajoute PictureBox1.Invalidate() après la rotation.

__________
  Kenji


mercredi 30 avril 2008 à 07:47:47 | Re : Rotation image picturebox...galère allemande

noelaurent

Merci infiniment à tous les deux pour votre aide. Bonne continuation et joyeux 1er mai !

Merci !

Noé



Cette discussion est classé dans : system, image, img, click, byval


Répondre à ce message

Sujets en rapport avec ce message

Jeu De Mémoire [ par kiboumz ] Bonjour, j'essaie comme premier vrai projet de réaliser un jeu de mémoire en vb.net, mais j'ai plusieurs problèmes. Le jeu est que lorsque tu clique s Une erreur générique s'est produite dans GDI+. [ par Lucyberad ] Bonjour,Je poste ce message car j'ai un petit problèmeje souhaite inclure des images dans un fichier XMLj'ai donc découvert ce code:    Public Functio VB2005 : plantage sur enregistrement image picturebox [ par Sympa74 ] Bonjour à tous, toujours pas de solution au problème que j'ai posé sur ce forum le 18 mars. a savoir : J'ai une erreur "Une erreur générique s'est pro Problème tout bête avec soket [ par bolandfranck ] Bonjour, apres un echec avec le code d'autre developpeur, je tente ma chance en essayant de faire mon propre code pour passer une  image d'un poste à vb.net 2008 [ par HermesCB ] Bonjour Voila j’ai fais en amateur du visual basic 6 et maintenant je tâte du vb.net Et il y a des choses que je ne sais plus faire Voila le code san Transparence d'image ColorMatrix [ par renocmoa ] bonjour,j'utilise les fonction suivantes pour tenter d'optenir une imege semi-transparente,... sans résultat quelqu'un a une idée...?merciPublic</f Impossible d'afficher le rectangle à partir du button.click [ par fpatrice2005 ] Je suis toujours à la recherche d'une solution à mon problème.J'ai réalisé ce petit programme en VB2005 mais il n'affiche rien POURQUOI ????????Merci modifier texte [ par DIJONCTER ] bonjour a tous !(débutant)voila j 'ai un fichier texte que j'ouvre avec un textbox  et j'aimerais le modifier (ajouter ou suprimer du texte)je ne peux le texte ne s'affiche pas dans un formulaire 2 [ par sikove ] salut ,j'ai un ptit probleme avec les formulaires : on nous demande de faire 2 formulaire, le premier on fait entrer un texte et le 2eme l'affiche aut Form (Load / Unload) [ par Marko007 ] Bonjour,avez-vous un conseil (ou du code) pour afficher une Form1 en dé-saffichant une autre Form2et vice-versa. MAIS ;o) Sinon c'est trop facile : L'


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,359 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.