Glissement d'objet très saccadé même en mode création

Signaler
Messages postés
176
Date d'inscription
mercredi 7 avril 2004
Statut
Membre
Dernière intervention
1 avril 2013
-
Messages postés
176
Date d'inscription
mercredi 7 avril 2004
Statut
Membre
Dernière intervention
1 avril 2013
-
Bonjour à tous


je reprends ma question je croyais que vraiment j'avais mal programé mais j'ai testé mon logiciel sous un autre micro mais en window XP Pro  et là je n'ai aucun problème de saccade des objets . j'avais même ce problème en mode création chaque fois que je glisse un objet sur une forme il est très saccadé.


je précise bien un glissement des objets comme drag drop car avec un move aucun problème!


je ne pense pas que ce soit le micro trop lent il est tout récent


chose qui a changé c'est que je suis sous window vista

3 réponses

Messages postés
728
Date d'inscription
samedi 4 avril 2009
Statut
Membre
Dernière intervention
30 mars 2014
6
Bonjour, j'ai exactement le même problème, mais personne ne sait a priori...
Messages postés
176
Date d'inscription
mercredi 7 avril 2004
Statut
Membre
Dernière intervention
1 avril 2013
1
bonjour
normalement ce pb est résolu certainement dans un autre mail
c'est du à aerovista de window vista bien sur
normalement tu peux désactiver aérovista au lancement de VB
mais sinon il est possible de désactiver aérovista par logiciel je fais une recherche de ce que j'ai prog et l'envoi la prochaine
Messages postés
176
Date d'inscription
mercredi 7 avril 2004
Statut
Membre
Dernière intervention
1 avril 2013
1
voici normalement le moyen de désactiver aérovista

Private Const DWM_EC_DISABLECOMPOSITION As Long = 0 'valeur pour désactivé Aero Vista
Private Const DWM_EC_ENABLECOMPOSITION As Long = 1 'activé Aero Vista
'Aero Vista n'est pas compatible avec les déplacements (drag&drop) d'objet en VB6
'la solution est de désactiver Aero Vista avec l'API cidessous
Private Declare Function DwmEnableComposition Lib "dwmapi" (uCompositionAction As Long) As Long
'la réactivation n'est pas nécessaire normalement à la fin des processus qui ont demandé la désactivation
'Il m'est arriver une fois de pouvoir réactiver Aero Vista, car il y avait une form chargée mais pas déchargée à _
    la fermeture du programme

Private Sub Menu_AeroVista_Click()
Dim result As Byte


If Menu_AeroVista.Checked Then
    Menu_AeroVista.Checked = False
Else
    Menu_AeroVista.Checked = True
    result = (DwmEnableComposition(DWM_EC_DISABLECOMPOSITION))
    If result <> 0 Then
        MsgBox "Vista Aero n'a pas pu être Désactivé, l'affichage risque d'être saccadé"
    End If


End If


End Sub