Discussion :

[regis6262]

Bonjour je suis un débutant de Windev.

Je voudrai faire un Drag and Drop sur des images.

La première image s’appelle IMG_Source, la deuxiéme IMG_Cible , j’ai trouvai le code sur internet (pc soft), j’ai essayé de placer ce code mais cela ne fonctionne pas et je ne comprends pas pourquoi, pourriez-vous me dire ce qui ne fonctionne pas.

Initialisation de IMG_source

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
source..DndSource = dndProgrammé
DnDEvénement("Glisser",source,dndDébutGlisser)

Déplacement (WM_Move) de IMG_source

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
PROCEDURE Glisser()
DnDAccepte(dndDéplacer)

Initialisation de IMG_cible

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
cible..DndCible =dndProgrammé
DnDEvénement("Survol",cible,dndSurvol)
DnDEvénement("InsereDansIMG_cible",cible,dndLâcher)

Merci d'avance

[miripesage]

Bonjour je suis un débutant de Windev.

Je voudrai faire un Drag and Drop sur des images.

La première image s’appelle IMG_Source, la deuxiéme IMG_Cible , j’ai trouvai le code sur internet (pc soft), j’ai essayé de placer ce code mais cela ne fonctionne pas et je ne comprends pas pourquoi, pourriez-vous me dire ce qui ne fonctionne pas.

Initialisation de IMG_source
source..DndSource = dndProgrammé
DnDEvénement("Glisser",source,dndDébutGlisser)


Déplacement (WM_Move) de IMG_source
PROCEDURE Glisser()
DnDAccepte(dndDéplacer)

Initialisation de IMG_cible
cible..DndCible =dndProgrammé
DnDEvénement("Survol",cible,dndSurvol)
DnDEvénement("InsereDansIMG_cible",cible,dndLâcher)

Merci d'avance

Bonjour, j'ai l'impression que vous ne maitrisez pas bien les procedures(fonctions). Lorsque vous voyez, par ex :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DnDEvénement("Survol",cible,dndSurvol)

Survol est une procedure qu'il faut déclarer pour pouvoir l'utiliser!
Regardez ICI vous en saurez plus. Bon dev.

[regis6262]

J'ai essayé un autre système d’après le système de l'arroseur, mais cela ne fonctionne toujours pas, y aurait il quelqu'un de super sympa pour aider un très grand débutant.

Initialisation de la page (serveur)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
source1..DndSource=dndProgrammé
source2..DndSource=dndProgrammé
Cible..DndCible=dndProgrammé

WL chargement (onload) de page (navigateur)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
DnDEvénement(DébutDragAndDrop,source1,dndDébutGlisser)
DnDEvénement(DébutDragAndDrop,source2,dndDébutGlisser)
DnDEvénement(LâcherDragAndDrop,Cible,dndLâcher)

Initialisation de IMG_cible (serveur)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MoiMême..DndSource=dndProgrammé

Initialisation de IMG_source1 (serveur)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MoiMême..DndCible=dndProgrammé

Initialisation de IMG_source2 (serveur)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MoiMême..DndSource=dndProgrammé

Procédure locale DébutDragAndDrop (navigateur)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
PROCEDURE DébutDragAndDrop()
DnDDonne(CF_TEXT,_dnd.MG_Source,Cible)

Procédure locale LâcherDragAndDrop (navigateur)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
PROCEDURE LâcherDragAndDrop()
nXImage est un entier = (_DND.SourisPosX) - (source1..Largeur)
nYImage est un entier = (_DND.SourisPosY) - (source2..Largeur)
 
sIDIMG_source1 est une chaîne = DnDRécupère(CF_TEXT)
 
dessineIMG_source1(sIDIMG_source1,nXImage, nXImage)
dessineIMG_source2(sIDIMG_source2,nYImage,nYImage)

merci d'avance

[djejackk]

Bonjour,

Vous travaillez en WinDev ou en WebDev ?
Au vu du code (qui n'est pas entre balises code...c'est mal !), c'est du code WebDev ("serveur", "navigateur"). Votre sujet indique WinDev. Même si les fonctions sont les mêmes, la mise en place est différente et vous risquez de vous embrouillez encore plus.

Avez-vous regarder du côté des exemples unitaires et/ou didactiques présents dans le produit ? (il me semble qu'il en existe sur le drag and drop...)

En attente de vos éclaircissement.

Cordialement.

[regis6262]

Bonsoir,
J'essaye de faire un drag and drop sous windev mais je n'ai pas réussi, j'ai donc essayé sous webdev.
J'ai utilisé les codes que j'ai trouvé mais aucun ne fonctionne.
Je voudrai "si possible" que quelqu'un me donne le code pour que je puisse l'étudier et le comprendre, "comprendre pourquoi celui que j'ai trouvé ne fonctionne pas".
Le seul code que je connaisse un peu est le PHP.
Merci d'avance.

[miripesage]

bonsoir, vous avez wd17, il y a un exemple dans "WinDev 17\Exemples\Exemples unitaires\Drag and drop". Vous pouvez vous en inspirer.

[bernardbeville]

J'ai comme beaucoup un problème avec Drag & Drop
Je suis en Windev20, mais je crois que ça n'a pas changé.
L'essai que je fais est très simple, glisser une image pour la déposer plus loin dans un champ Image

Voilà la source complète et son résultat

Champs Une Image_Cible, une Image_Source
Objectif : Déplacer l'image Source sur l'Image Cible

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
 
Initialisation de IMG_Cible
	IMG_Cible..DndCible=dndProgrammé
 
Initialisation de IMG_Source
	IMG_SOurce..dndSource=dndProgrammé
 
Bouton Gauche enfoncé de IMG_Source
	DnDEvénement(Glisser,IMG_Source,dndDébutGlisser)
 
SurvolSouris sur IMG_Cible
	DnDEvénement(Survol,IMG_Cible,dndSurvol)
 
Bouton Gauche relâché de IMG_Cible
	DnDEvénement(Déposer,IMG_Cible,dndLâcher)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
PROCEDURE Glisser()
DnDAccepte(dndDéplacer)
 
PROCEDURE Survol()
DnDCurseur(dndDéplacer)
 
PROCEDURE Déposer()
DnDAccepte(dndDéplacer)

Le bouton gauche relâché sans le Drag Drop dans l'image Cible est actionné. Je vérifie avec un simple Bip
Il ne l'est plus quand la procédure Déposer est appelée
DnDAccepte(DndDéplacer)
La procédure Déposer ne fait donc rien.

Où est mon erreur ?
J'ai suivi à la lettre le mode d'emploi PC SOft, qui semble faire des choses bien plus compliquées, docn y a pas de raison ....

[midou23175]

Drag and drop depuis l'explorateur

Lien : https://doc.pcsoft.fr/fr-FR/?3030014...ur&verdisp=170