+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 7 su 7

Stampare fronte/retro

  1. #1
    L'avatar di sistemista
    sistemista non è in linea Topo di biblioteca
    Provo a stampare fronte/retro(duplex),ho la stampante multifunzione brother mfc-j5330dw
    che supporta la stampa fronte/retro ma non riesco,manca qualcosa sicuramente,ho provato a fare ricerche ma non portano a nulla.
    Questo il codice che ho provato:
     PrintDocument1.PrinterSettings.Duplex = Duplex.Vertical
            e.Graphics.PageUnit = GraphicsUnit.Millimeter
            Dim x, y As Integer, larghezza, altezza As Integer
            x = 0
            y = 0
            larghezza = 133 ' 150=carta identità,252=copertine cd
            altezza = 72 '110 '120
            e.Graphics.DrawImage(picfronte.Image, x, y, larghezza, altezza)
    
    L'impostazione Duplex.vertical da quello che ho trovato su MSDN dice che deve stampare in modalità verticale fronte e retro ma non succede niente,stampa da un lato.
    Idee?suggerimenti?
    ℹ️ Leggi di più su sistemista ...

  2. #2
    Ma tu stampi due pagine almeno?
    ℹ️ Leggi di più su AntonioG ...

  3. #3
    L'avatar di sistemista
    sistemista non è in linea Topo di biblioteca
    avevo tralasciato una riga di codice.
      larghezza = 130
                        altezza = 90
                        e.Graphics.DrawImage(immagineFronte, 0, 0, larghezza, altezza)
                        e.Graphics.DrawImage(immagineRetro, 0, 95, larghezza, altezza)
    
    stampo la prima immagine(immgineFronte),quindi,dovrebbe stampare la seconda immagine(immagineretro) nel retro del foglio ma stampa tutte e due le immagine nella pagina singola;
    il nocciolo è: quale comando devo impartire?
    Ho provato ha mettere dopo la stampa della prima immagine
    e.HasmorePages=true
    
    sperando che stampasse la seconda immagine sul retro ma niente da fare,giustamente continuava ad incrementare la pagine da stampare.
    ℹ️ Leggi di più su sistemista ...

  4. #4
    Il problema mi sembra legato al tuo codice di stampa. Secondo me non è proprio corretto (dato che non hai chiaro come utilizzare HasmorePages), anche perché, a prescindere dal fronte retro, dovresti poter stampare su due pagine. Se stampi solo su una vuol dire che il codice che usi è sbagliato.

    Posta tutto il codice che utilizzi per la stampa.

    Per capirci, dovremmo partire da qualcosa del genere (ad esempio)

        Dim pg As Integer = 1
        Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
            pd.PrinterSettings.Duplex = Duplex.Vertical
            pd.Print()
        End Sub
    
        Private Sub pd_PrintPage(sender As Object, e As Printing.PrintPageEventArgs) Handles pd.PrintPage
            Dim more As Boolean = True
    
            If pg = 1 Then
                e.Graphics.DrawImage(picFronte.Image, 0, 0, picFronte.Width, picFronte.Height)
            Else
                e.Graphics.DrawImage(picRetro.Image, 0, 0, picRetro.Width, picRetro.Height)
                more = False
            End If
    
    
            pg += 1
    
            e.HasMorePages = more
        End Sub
    
    Ultima modifica di AntonioG; 11-09-2021 18:30 
    ℹ️ Leggi di più su AntonioG ...

  5. #5
    L'avatar di sistemista
    sistemista non è in linea Topo di biblioteca
    Hai Ragione antonio,mi sono perso in un bicchiere d'acqua,causa lo snervante tormento che ho avuto stanotte che non ho chiuso occhio per una forte lombaggine e che fortunatamente stamani il mio dottore mi ha prescritto delle fiale intramuscolo,ora stò molto meglio di stanotte e di stamattina,il dolore al fondo schiena è passato e posso stare a sedere,comunque,posto il codice per i posteri.
    dichiarazione a livello di classe:
    Private WithEvents DOC As New Printing.PrintDocument
    dim numpag as Byte=0
    nella sezione Beginprint
     If DOC.PrinterSettings.CanDuplex = True Then
                DOC.PrinterSettings.Duplex = Duplex.Vertical
            End If
    
    e poi nella sezione Doc_printpage ho tralasciato linee codice in quanto ininfluente al risolversi del problema.
     Select Case colonna
                    Case "C"
                        x = 25       ' La lettera C è immagine catalogata di formato cartaceo
                        y = 20
                        larghezza = 150
                        altezza = 110
                        e.Graphics.DrawImage(immagineFronte, 0, 0, larghezza, altezza)
                        e.Graphics.DrawImage(immagineRetro, 0, 115, larghezza, altezza)
                    Case "E"       
                       ' La lettera E è immagine catalogata di formato elettronico
                        larghezza = 130
                        altezza = 90
                        If numpag = 0 Then
                            e.Graphics.DrawImage(immagineFronte, 0, 0, larghezza, altezza)
                            numpag = 1
                            e.HasMorePages = True
                        Else
                            e.Graphics.DrawImage(immagineRetro, 0, 0, larghezza, altezza)
                            e.HasMorePages = False
                        End If
    
    Tutto Risolto,comunque ti ringrazio perchè ho messo l'attenzione nell'evento e.HasMorePages
    e lì ho capito dove era l'inghippo.
    Ultima modifica di sistemista; 11-09-2021 18:53 
    ℹ️ Leggi di più su sistemista ...

  6. #6
    evento e.HasMorePages
    proprietà HasMorePages ....

    P.S. Auguri per la cura
    ℹ️ Leggi di più su AntonioG ...

  7. #7
    L'avatar di sistemista
    sistemista non è in linea Topo di biblioteca
    Hai ragione...proprietà,ho ancora dei piccoli postumi alla connessione al cervello.
    Grazie Antonio.
    ℹ️ Leggi di più su sistemista ...

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. report non fa il fronte-retro
    Da muttley005 nel forum Microsoft Access
    Risposte: 11
    Ultimo Post: 16-11-2017, 09:57
  2. Report fronte-retro
    Da zagor nel forum Microsoft Access
    Risposte: 4
    Ultimo Post: 18-02-2014, 08:43
  3. Stampa fronte - retro & VBA
    Da roccolamann nel forum Microsoft Access
    Risposte: 1
    Ultimo Post: 26-11-2010, 09:14
  4. stampa fronte retro
    Da biker nel forum Microsoft Word
    Risposte: 4
    Ultimo Post: 06-06-2009, 22:01
  5. stampare fronte/retro
    Da cris77 nel forum Visual Basic 6
    Risposte: 12
    Ultimo Post: 09-04-2009, 20:19