| 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
    Liste alphabétique des commandes
	Créé :  4D View 6.8
PV FIXER SIGNATURES GLISSER
PV LIRE SIGNATURES DEPOSER