IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

Cliquer glisser une imge dans un Listview


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Juillet 2006
    Messages
    63
    Détails du profil
    Informations forums :
    Inscription : Juillet 2006
    Messages : 63
    Par défaut Cliquer glisser une imge dans un Listview
    salut tous le monde
    sous vs 2005, sur un winform, j'ai 2 label (label1 et label 2) dont la propriété lowdrop est true et et la propriété picture est affecté sur deux image differentes. J'ai aussi un Listview1 dont la propriété Allowdrop est true.
    je vourdrais le code qui me permet de cliquer-glisser le picture de chque label vers listview.
    voila ce que j'ai fais:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
     
        Private Sub ListView1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles ListView1.DragEnter
            Dim i As Integer
            i = ImageList1.Tag
                    ListView1.Items.Clear()
                    ListView1.Items.Add("", i)
            ListView1.Update()
        End Sub
        Private Sub lbl1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbl1.MouseDown
            Dim Lab As Label
            Lab = CType(sender, Label)
            Lab.DoDragDrop(Lab, DragDropEffects.Copy)
            ImageList1.Tag = 0
        End Sub
     
     
        Private Sub lbl2_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbl2.MouseDown
            Dim Lab As Label
            Lab = CType(sender, Label)
            Lab.DoDragDrop(Lab, DragDropEffects.Copy)
            ImageList1.Tag = 1
        End Sub
    le problème est que cliquer glisser sur label1 s'exécute bien, mais celui sur label2 ne s'exécute qu'au deuxième cliquer glisser.
    corrigez moi ce code svp

  2. #2
    Expert éminent Avatar de Pol63
    Homme Profil pro
    .NET / SQL SERVER
    Inscrit en
    Avril 2007
    Messages
    14 204
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Puy de Dôme (Auvergne)

    Informations professionnelles :
    Activité : .NET / SQL SERVER

    Informations forums :
    Inscription : Avril 2007
    Messages : 14 204
    Par défaut
    le .update sur le listview ne sert à rien je pense

    sinon il est aussi possible de regrouper les handles de la sorte, vu que tu as un code identique pour les 2 labels.mousedown

    et au passage de simplifier
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
     
    Private Sub lbl1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lbl1.MouseDown,lbl2.MouseDown
            me.DoDragDrop(sender , DragDropEffects.Copy)
    End Sub
     
    Private Sub ListView1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles ListView1.DragEnter
          ' vérifier si ce qu'on veut droper est un bien un label (voir meme label1 ou label2)
          e.Effect = DragDropEffects.Copy
    End Sub
    c'est surtout l'évènement drop qu'il faut gérer m'enfin je pense que tu l'as géré et juste pas mis ici
    et dans le drop tu cast le data sur label pour prendre le .image


    sinon mets des point d'arret et regarde en pas à pas ce qu'il se passe
    Cours complets, tutos et autres FAQ ici : C# - VB.NET

Discussions similaires

  1. Faire glisser une image dans un cadre avec la souris
    Par fab76000 dans le forum Général JavaScript
    Réponses: 1
    Dernier message: 08/11/2008, 12h38
  2. Récuperation d'une ligne dans un listview
    Par guyanais dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 29/02/2008, 20h09
  3. Ajouter une valeur dans un listview
    Par aliwassem dans le forum Composants VCL
    Réponses: 1
    Dernier message: 25/01/2006, 22h15
  4. [MySQL] recuperer une valeur dans un listview
    Par genebaud dans le forum PHP & Base de données
    Réponses: 6
    Dernier message: 29/10/2005, 22h43
  5. Une gauge dans un ListView
    Par Thom@s dans le forum Composants VCL
    Réponses: 3
    Dernier message: 22/10/2002, 10h32

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo