version 2004 (Modifiée)
WR FIXER INFO IMAGE DANS PAGE (zone; numImage; page; derrière; pageUne; posHoriz; posVert; largeur; hauteur)
Paramètre | Type | Description | |
zone | Entier long | Zone 4D Write | |
numImage | Entier long | Numéro de l'image | |
page | Entier long | Endroit où l'image sera placée | |
derrière | Entier | 0=Image sur le texte | |
1=Image sous le texte | |||
pageUne | Entier | ***Obsolète, à ne plus utiliser*** | |
posHoriz | Numérique | Position horizontale dans la page | |
posVert | Numérique | Position verticale dans la page | |
largeur | Numérique | Largeur actuelle de l'image | |
hauteur | Numérique | Hauteur actuelle de l'image |
Description
La commande WR FIXER INFO IMAGE DANS PAGE permet de modifier les informations de l'image dont le numéro a été passé en paramètre.
Attention : Cette commande ne s'applique pas aux images se trouvant dans le texte.
page permet de définir dans quelle page l'image doit être affichée. Pour cela, passez le numéro de la page. Il tient compte du début de numérotation.
Si page est égal à -11, l'image sera visible dans les pages droites si les en-têtes pairs et impairs sont différents, et sinon dans toutes les pages.
Si page est égal à -12, l'image sera visible dans les pages gauches si les en-têtes pairs et impairs sont différents.
Si page est égal à -4, la valeur n'est pas modifiée.
derrière
Si derrière est égal à 0, l'image sera sur le texte.
Si derrière est égal à 1, l'image sera sous le texte. Le texte comportera alors un fond transparent sauf si une couleur de fond lui avait au préalable été affectée.
pageUne
Ce paramètre correspond à un ancien fonctionnement de la commande, il est conservé pour des raisons de compatibilité uniquement et ne doit plus être utilisé à compter de la version 2004. Passez -1 pour l'ignorer.
posHoriz et posVert permettent de fixer les coordonnées du point supérieur gauche de l'image par rapport à l'angle supérieur gauche du papier. Les valeurs sont exprimées dans l'unité courante. posHoriz peut être compris entre 0 et la largeur de la page. Dans ce cas, il n'est pas tenu compte des marges mortes et l'image peut se retrouver en dehors du document.
Note : Lorsque vous collez une image dans la page en mode Utilisation, elle est placée à l'intérieur des marges mortes.
largeur et hauteur permettent de fixer les nouvelles dimensions de l'image s'il y a une déformation éventuelle de celle-ci. Les valeurs sont exprimées dans l'unité courante.
Note : Si vous passez -1 dans les paramètres derrière, pageUne, posHoriz, posVert, largeur et hauteur, la valeur du paramètre concerné n'est pas modifiée.
Exemple
Vous désirez placer en fond d'en-tête une image d'habillage pour tous vos documents :
C_REEL($PosHoriz;$PosVert;$LargImage;$HautImage;$LargOrig;$HauteurOrig;$TxtMgHaut;$EntMgBas) WR FIXER PROPRIETE DOCUMENT(LaZone;wr affichage mode;0) $PosHoriz:=WR Lire propriete document (LaZone;wr texte marge gauche) $PosVert:=WR Lire propriete document(LaZone;wr entête marge haut) TOUT SELECTIONNER([Interface]) `Insertion de l'image WR INSERER IMAGE(LaZone;[Interface]Logo;-1;$PosHoriz;$PosVert;1;0) `L'image provient du champ Logo WR SELECTION IMAGE DANS PAGE(LaZone;1) `Sélection de l'image `Lecture des propriétés de l'image MonImage:=WR Lire image selectionnee(LaZone;$NumImage) WR LIRE INFO IMAGE DANS PAGE (LaZone;$NumImage;$Page;$Derriere;$PageUne;$PosHoriz;$PosVert; $LargImage;$HautImage;$LargOrig;$HautOrig) `Réduction de l'image de 50 % $HautImage:=$HautImage*1/2 $LargImage:=$LargImage*1/2 WR FIXER INFO IMAGE DANS PAGE(LaZone;$NumImage;$Page;$Derriere;$PageUne;$PosHoriz;$PosVert; $LargImage;$HautImage) `Vérification que l'en-tête recouvre le logo $TxtMgHaut:=WR Lire propriete document(LaZone;wr texte marge haut) $EntMgBas:=WR Lire propriete document(LaZone;wr entête marge bas) `On descend le haut du texte pour retailler l'en-tête WR FIXER PROPRIETE DOCUMENT(LaZone;wr texte marge haut;$PosVert+$HautImage+ $TxtMgHaut+$EntMgBas) `On retaille la hauteur de l'en-tête WR FIXER PROPRIETE DOCUMENT(LaZone;wr entête marge bas;$PosVert+$HautImage)
Référence