1. Bonjour tout le monde ! Veillez consulter la Politique de forum pour comprendre nos règles, Merci a vous !
    Rejeter la notice

WD Imprimer CB sur étiquettes dans un format A4

Discussion dans 'Windev' créé par faq, Jan 4, 2020.

  1. faq

    faq Active Member

    Inscrit:
    Fev 13, 2019
    Messages:
    420
    J'aime reçus:
    35

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Bonjour

    Je veux imprimer des étiquettes de code-barres dans un papier format A4, ce papier contient 65 exemplaires (8 étiquettes en colonne X 13 étiquettes en ligne).
    Alors j'ai trouvé des difficultés suivantes:

    1 - Est ce je choisi le type Etat : Vierge ou type Étiquette
    2 - Comment je crée un état depuis l'éditeur comportant 8 X 13 étiquettes

    Mon code écrit dans le bouton "Imprimer Etiquette CB sur A4" est le suivant

    [windev]
    iParamètre("FORMATPAPIER = A4")
    iParamètre("ORIENTATION = PORTRAIT")

    iParamètre(iLargeurPapier, SAI_LargeurPage)
    iParamètre(iHauteurPapier, SAI_LargeurPage)


    ETAT_Etiq65..LargeurEtiquette =SAI_LargEtiq
    ETAT_Etiq65..HauteurEtiquette =SAI_HautEtiq

    ETAT_Etiq65..MargeHaute = SAI_MargeH
    ETAT_Etiq65..MargeGauche = SAI_MargeG
    ETAT_Etiq65..MargeDroite = SAI_MargeD
    ETAT_Etiq65..MargeBasse = SAI_MargeB

    ETAT_Etiq65..EspaceH = SAI_EspaceH
    ETAT_Etiq65..EspaceV = SAI_EspaceV

    ETAT_Etiq65..NbEtiquette = SAI_Copie


    iAperçu()
    iImprimeEtat(ETAT_Etiq65,SAI_CodeBarre)
    iFinImprime
    [/windev]



    Merci de vos aides
     
    Tags:
  2. commun

    commun Active Member
    MEMBRE WX

    Inscrit:
    Jan 1, 2018
    Messages:
    237
    J'aime reçus:
    114
    salut
    je change ce que j'ai dit, je viens de tester, les etiquettes fonctionnent parfaitement
    il faut que tu renseignes la valeur etat.nbexemplaireetiquette, pas nbetiquette
    nbetiquettes, c'est le nombre par ligne
     
    #2 commun, Jan 4, 2020
    Dernière édition: Jan 4, 2020
  3. faq

    faq Active Member

    Inscrit:
    Fev 13, 2019
    Messages:
    420
    J'aime reçus:
    35
    Merci commun de ton retour

    les étiquettes fonctionnent parfaitement : Est ce que t'as testé mon code ou bien un autre code?
    Si oui, est ce que tu peux me montrer comment ?
     
  4. commun

    commun Active Member
    MEMBRE WX

    Inscrit:
    Jan 1, 2018
    Messages:
    237
    J'aime reçus:
    114
    tu crées un etat etiquettes avec 2 etiquettes en largeur
    tu colles un code barre dans l'etiquette modèle, tu l'ancres
    dans le code ouverture de l'etat :

    [windev]
    PROCÉDURE ETAT_Etiq65(nb est entier,gsCb_ est une chaîne,largeur_e est entier,hauteur_e est entier,marge_h est entier,marge_g est entier,marge_d est entier,marge_b est entier,espace_h est entier,espace_v est entier,gnB_en_largeur est un entier=2)
    MoiMême..LargeurEtiquette =largeur_e
    MoiMême..HauteurEtiquette =hauteur_e

    MoiMême..MargeHaute = marge_h
    MoiMême..MargeGauche = marge_g
    MoiMême..MargeDroite = marge_d
    MoiMême..MargeBasse = marge_b

    MoiMême..EspaceH = espace_h
    MoiMême..EspaceV =espace_v

    MoiMême..NbExemplaireEtiquette=nb
    MoiMême..NbEtiquette=gnB_en_largeur
    [/windev]

    pour appeler :

    [windev]
    iAperçu()
    iImprimeEtat(ETAT_Etiq65,15,"12457885417",30,40,10,10,10,10,15,20)
    [/windev]

    a toi de fournier les parametres d'étiquettes
    tu peux changer le nombre d'etiquettes par ligne en changeant "gnB_en_largeur" dans l'appel ou en dur

    tu n'as pas besoin de donner la taille de ta page si elle est comme ton etat (a4)
     
    #4 commun, Jan 6, 2020
    Dernière édition: Jan 6, 2020
  5. faq

    faq Active Member

    Inscrit:
    Fev 13, 2019
    Messages:
    420
    J'aime reçus:
    35
    Merci commun

    Oui j'arrive à imprimer l'état souhaité (5x13 sauf j'ai un problème au niveau de page
    Cela signifie que je souhaite imprimer le code-barres en 5 colonnes x 13 lignes par page au lieu de 2 pages( voir l’Aperçu)

    Mon souci est par là
    MoiMême..NbExemplaireEtiquette=5 // OK
    MoiMême..NbEtiquette=65 // la 12 et 13 ligne passent à la 2 page

    NB :
    le papier A4 contient 65 étiquettes
     

    Fichiers attachés:

    #5 faq, Jan 7, 2020
    Dernière édition: Jan 7, 2020
  6. commun

    commun Active Member
    MEMBRE WX

    Inscrit:
    Jan 1, 2018
    Messages:
    237
    J'aime reçus:
    114
    sur ton premier post, tu donnes la taille d'etiquette sur l'image, mais 5 etiquettes de 68 ne passent pas en largeur sur une page de 210.
    il faut la taille de tes etiquettes pour que je t'aide plus.
    et les espaces entre etiquettes
     

Partager cette page

Chargement...