4D View v16PV LIRE SIGNATURES GLISSER |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D View v16
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 LONG($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 View
Thème : PV Glisser déposer
Numéro :
15836
Nom intl. : PV GET DRAG SIGNATURES
Créé : 4D View 6.8
4D View - Langage ( 4D View v16)