version 6.0
dr_PLACER IMAGE (zone; image; emplacement)
| Paramètre | Type | Description | |
| zone | Entier long | Zone 4D Draw | |
| image | Image | Image 4D à positionner | |
| emplacement | Entier | 0 = Normal, 1 = Centré, 2 = Origine |
Description
La commande dr_PLACER IMAGE place l'image 4e Dimension à l'endroit indiqué par emplacement.
image doit être une expression valide pour 4e Dimension.
Si emplacement vaut 0, l'image est collée comme si elle provenait du Presse-papiers, c'est-à-dire aux coordonnées du dernier clic souris dans zone.
Si emplacement vaut 1, l'image est collée au centre de la partie visible de zone.
Si emplacement vaut 2, le coin supérieur gauche de l'image est placée à l'Origine.
Exemple
L'exemple suivant recherche un enregistrement de la table [Maquette] répondant à une requête et place le contenu du champ Logo dans une zone 4D Draw.
vDemande:=Demander("Quelle société vous intéresse ?")
Si (OK=1)
CHERCHER([Maquette];[Maquette]Société=vDemande)
Si (Enregistrements trouves([Maquette])>0)
dr_PLACER IMAGE (LaZone;[Maquette]Logo;2)
Sinon
ALERTE("Aucun objet ne correspond à votre demande.")
Fin de si
Fin de si
Référence
dr_FIXER ORIGINE, dr_Presse papiers vers image, dr_Zone vers image.