4D v13PV LIRE SIGNATURES GLISSER |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D View v13
PV LIRE SIGNATURES GLISSER
|
PV LIRE SIGNATURES GLISSER ( zone ; tabSignatures ) | ||||||||
Paramètre | Type | Description | ||||||
zone | Entier long |
![]() |
Zone 4D View | |||||
tabSignatures | Tableau chaîne |
![]() |
Tableau des signatures | |||||
La commande PV LIRE SIGNATURES GLISSER récupère dans le tableau tabSignatures les signatures de "glisser" de la zone.
Les signatures sont des chaînes alphanumériques dont le contenu est libre. La longueur maximale d'une signature est 32 caractères.
Affichons un message d'aide dans le cas où la zone peut faire l'objet d'un glisser-déposer interne.
TABLEAU TEXTE($TabSignaturesGlisser;0)
TABLEAU TEXTE($TabSignaturesDéposer;0)
C_TEXTE(MessageAide)
C_ENTIER($Indice)
PV LIRE SIGNATURES GLISSER(Zone;$TabSignaturesGlisser)
PV LIRE SIGNATURES DEPOSER(Zone;$TabSignaturesDéposer)
MessageAide:=""
Boucle($Indice;1;Taille tableau($TabSignaturesGlisser)) `Cherchons une signature commune
Si(Chercher dans tableau($TabSignaturesDéposer;$TabSignaturesGlisser{$Indice})#-1)
MessageAide:="Vous pouvez glisser-déposer à l'intérieur de cette zone."
$Indice:=Taille tableau($TabSignaturesGlisser)
Fin de si
Fin de boucle
Produit : 4D
Thème : PV Glisser déposer
Numéro :
15836
Nom intl. : PV GET DRAG SIGNATURES
Liste alphabétique des commandes
Créé : 4D View 6.8
PV FIXER SIGNATURES GLISSER
PV LIRE SIGNATURES DEPOSER