|
|
|
|
|
|
|
|
|
|
- "Drag and Drop" programmé : Exemple
"Drag and Drop" programmé : Exemple Le code suivant permet de copier/coller de données de type texte (constante CF_TEXT). Lorsque les données à copier/coller sont de type texte, ces données sont récupérées. //- - Initialisation du champ cible "SAI_Rechercher"
SAI_Rechercher.DndCible = dndProgrammé
// Appel de la procédure SurLâcher lorsque le bouton gauche
// de la souris est relâché sur le champ cible "SAI_Rechercher"
DnDEvénement("SurLâcher", SAI_Rechercher, dndLâcher)
// Appel de la procédure SurSurvol lorsque le curseur de la souris
// se déplace entre le champ source et le champ cible "SAI_Rechercher"
DnDEvénement("SurSurvol", SAI_Rechercher, dndSurvol)
PROCÉDURE SurSurvol()
// Type de donnée disponible ?
SI DnDDonnéeDisponible(CF_TEXT) = Vrai ALORS
// Curseur indiquant le déplacement
DnDCurseur(dndDéplacer)
SINON
// Curseur indiquant l'interdiction de déplacement
DnDCurseur(dndInterdit)
FIN
PROCÉDURE SurLâcher()
ResRécupère est une chaîne
// Type de donnée disponible ?
SI DnDDonnéeDisponible(CF_TEXT) = Vrai ALORS
// Le déplacement est autorisé (pas le copier)
DnDAccepte(dndDéplacer)
ResRécupère = DnDRécupère(CF_TEXT)
SINON
// Aucune action autorisée
DnDAccepte(dndInterdit)
FIN
Documentation également disponible pour…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|