vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
Re: Formular erstellen bzw. drucken 
Autor: Erichbru
Datum: 30.04.23 12:24

Hallo bitte



ich glaube ich check das irgendwie nicht

so bekomme ich nur eine 2te leere Seite ? die erste wird abgeschnitten

        'Beg: Druckbereich
        Dim Druckbereich = g.VisibleClipBounds
        Dim margin = Me.PD_Strombeleg.DefaultPageSettings.Margins
        Druckbereich.Offset(margin.Left, margin.Top) ' obere linke Ecke
        Druckbereich.Width -= (margin.Left + margin.Right) ' neue Breite
        Druckbereich.Height -= (margin.Top + margin.Bottom) ' neue Höhe
 
        Dim x, y As Single
 
        x = Druckbereich.Left
        y = Druckbereich.Top
 
 
        Select Case DruckSeite
            Case 1
                'Titel & Text:
                Titel_Text_Block_Strom(g, Druckbereich)
                If Druckbereich.Height < e.MarginBounds.Bottom Then
                    e.HasMorePages = True
                    y += 30
                    DruckSeite += 1
                Else
                    e.HasMorePages = False
                    DruckSeite = 0
                End If
        End Select
 
            e.Graphics.Dispose()
            g.Dispose()


Beitrag wurde zuletzt am 30.04.23 um 12:28:37 editiert.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Formular erstellen bzw. drucken472Erichbru25.04.23 18:42
Re: Formular erstellen bzw. drucken166Erichbru28.04.23 18:20
Re: Formular erstellen bzw. drucken178Erichbru28.04.23 18:34
Re: Formular erstellen bzw. drucken199Erichbru30.04.23 12:24
Re: Formular erstellen bzw. drucken146Erichbru07.05.23 12:11
Re: Formular erstellen bzw. drucken165Erichbru22.05.23 19:52

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel