Comment forcer la multiimpression à l'écran sur Mac

Joël Prince

- Titre : Comment forcer la multiimpression à l'écran sur Mac

- Auteur : Joël Prince

- Parution : 27 juillet 2005

- Licence : Copyright ® 2005 4D s.a. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents, images, etc. sans l'autorisation expresse de l'auteur. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.

Sommaire

- I. Présentation ♪

I - Présentation ♪

Produit : 4D 2004 · Plateforme : Mac

Je veux faire une démo sur Mac à l'écran des impressions possibles générées dans mon application. La première édition est bien à l'écran, mais les suivantes partent à l'imprimante. J'utilise les commandes PARAMETRES IMPRESSION, LIRE OPTION IMPRESSION et FIXER OPTION IMPRESSION(1)

1. C_ENTIER LONG($valeur1)

2. PARAMETRES IMPRESSION

La boîte de dialogue de paramétrage de l'impression s'affiche en premier lieu, suivie de celle d'impression proprement dite.
Cliquez sur Aperçu.

1. Si (OK=1)

Grâce à la commande : LIRE OPTION IMPRESSION (Option destination ;Résultat)

1. LIRE OPTION IMPRESSION(9;$valeur1)

on récupère dans $valeur1 la valeur de l'option 9 qui est égale à 5 si aperçu demandé.

On imprime par exemple :

1. Imprimer ligne([MaTable];"PrintLigne1")

2. Imprimer ligne([MaTable];"PrintLigne2")

3. Imprimer ligne([MaTable];"PrintLigne3")

4. ` etc., boucle et reboucle

Nous allons maintenant changer de commande d'impression :

1. IMPRIMER SELECTION([MaTable];›)

Le paramètre › provoque en outre l'impression sans réinitialisation des paramètres d'impression, sauf en changeant de commande.

Grâce à la valeur récupérée dans $valeur1, nous réinitialisons l'option de destination à l'écran (Aperçu =› 5) :

1. FIXER OPTION IMPRESSION(Option destination;$valeur1)

2. FORMULAIRE SORTIE([MaTable];"PrintSelection"

3. IMPRIMER SELECTION([MaTable];›)

4. `Faire quelque chose… et passer en paysage

5. FIXER OPTION IMPRESSION(Option orientation;2)

6. IMPRIMER SELECTION([MaTable];›)

7. `Faire quelque chose… et repasser en portrait

8. FIXER OPTION IMPRESSION(Option orientation;1)

9. ` etc., boucle et reboucle

10. FORMULAIRE SORTIE([MaTable];"Sortie")

12. Fin de si

(1)La commande FIXER OPTION IMPRESSION fonctionne avec les imprimantes PostScript uniquement.