|
| Iniciado por Jean-Michel, 09,may. 2020 11:57 - 3 respuestas |
| |
| | | |
|
| |
Miembro registrado
856 mensajes |
|
| Publicado el 09,mayo 2020 - 11:57 |
Bonjour,
Je désire prendre un libelle de la liste pour le copier dans ma table hierarchique.
Je coince !
Mode programmation.
Comme vous le voyez sur l'image, je glisse un libellé sur la 4ème ligne.
Cette 4eme ligne ne se met pas en surlignement, elle ne se présélectionne pas.
Il me manque donc quelque chose.
Car je veux mettre mon libellé dans la colonne "Aire" de la ligne sur laquelle je relache le bouton de la souris.
Qu'ais je fait ?
Initialisation du champs Liste :
LISTE_Aires..DndSource = dndProgrammé
Initialisation du champ Table hiérarchique
TABLEH_Region..DndCible = dndProgrammé
DnDEvénement(pSurvol, TABLEH_Region, dndSurvol)
DnDEvénement(pLacher, TABLEH_Region, dndLâcher)
Procédure pSurvol
DnDCurseur(dndDéplacer)
Procédure pLacher
DnDAccepte(dndDéplacer)
sElement est une chaîne = LISTE_Aires..ValeurAffichée
TableAjoute(TABLEH_Region,sElement)
Pour l'instant je fais un Hajoute car je ne sais pas comment récupérer la ligne cible.
Question :
Comment récupérer la ligne cible ?
Merci à vous.............
J.Michel
--
Synchronize Systems International LTD
Développement d'outils de gestion
Environnements AS400 – Windows
Langages GAP III – CL – Visual Basic - Visual Adélia - Adélia - Windev
Bangkok / Pattaya |
| |
| |
| | | |
|
| | |
| |
Miembro registrado
111 mensajes |
|
| Publicado el 09,mayo 2020 - 17:57 |
Bonjour,
Dans la procédure pSurvol, je sélectionnerais la ligne survolée.
nNumLigne est un entier=TableH_Region.InfoXY(tiNumLigne,_DND.SourisPosX,_DND.SourisPosy)
SI nNumLigne<>TableH_Region.Select() ALORS TableH_Region.SelectPlus(nNUmLigne)
--
Erick |
| |
| |
| | | |
|
| | |
| |
Miembro registrado
856 mensajes |
|
| Publicado el 10,mayo 2020 - 06:11 |
Joli !!!!
J'aurai pas trouvé !
Un grand merci Erik, t'es génial, beau boulot !
--
Synchronize Systems International LTD
Développement d'outils de gestion
Environnements AS400 – Windows
Langages GAP III – CL – Visual Basic - Visual Adélia - Adélia - Windev
Bangkok / Pattaya |
| |
| |
| | | |
|
| | |
| |
Miembro registrado
111 mensajes |
|
| Publicado el 11,mayo 2020 - 10:20 |
C'est trop, je vais rougir ! 😊
--
Erick |
| |
| |
| | | |
|
| | | | |
| | |
|