Δεν μπορώ να αλλάξω backcolor στα label όταν τυπώνω[VB 2005]

Συζητήσεις για τις γλώσσες του dot Net και για του Visual Studio της Microsoft

Συντονιστές: WebDev Moderators, Super-Moderators

Απάντηση
Άβαταρ μέλους
mousi
Δημοσιεύσεις: 7
Εγγραφή: 10 Ιαν 2005 02:10
Τοποθεσία: Ξάνθη
Επικοινωνία:

Δεν μπορώ να αλλάξω backcolor στα label όταν τυπώνω[VB 2005]

Δημοσίευση από mousi » 25 Ιαν 2006 17:51

Δεν μπορώ να καταλάβω τι συμβαίνει... Θέλω να τυπώσω μια φόρμα και στο printbutton έχω βάλει το εξής:

Κώδικας: Επιλογή όλων

Private Sub PrintButton_Click(ByVal sender As System.Object, ByVal e As _
       System.EventArgs) Handles printbutton.Click
        Dim deflabcolor As Color = Label1.BackColor
        Dim defcolor As Color = Me.BackColor
        Dim defheight As Integer = Me.Height
        Dim ctrl As Control
        For Each ctrl In Me.Controls
            If TypeOf (ctrl) Is Label Then
                ctrl.BackColor = Color.White
            End If
        Next
        Me.BackColor = Color.White
        Me.Height = 197
        CaptureScreen()
        Me.WindowState = FormWindowState.Minimized
        Dim result As DialogResult = PrintDialog1.ShowDialog()
        If (result = DialogResult.OK) Then
            PrintDocument1.Print()
        End If
        Me.BackColor = defcolor
        Me.Height = defheight
        For Each ctrl In Me.Controls
            If TypeOf (ctrl) Is Label Then
                ctrl.BackColor = deflabcolor
            End If
        Next
        Me.WindowState = FormWindowState.Normal
    End Sub
Όταν τυπώνει τα κάνει όλα όπως θέλω (αλλάζει το χρώμα και το μέγεθος της φόρμας), εκτός από τα Label... Αυτά μου τα τυπώνει στο κλασσικό χρώμα, ενώ στην οθόνη τα βλέπω άσπρα (όσο είναι ανοιχτό το PrintDialog). Μπορεί να με βοηθήσει κάποιος; Μου έχει σπάσει τα νεύρα :hammer:

ΥΓ: Α! δοκίμασα επίσης να βάλω ένα Label1.Backcolor=color.white πριν από το screencapture φυσικά, αλλά πάλι δεν δουλεύει!

Άβαταρ μέλους
mousi
Δημοσιεύσεις: 7
Εγγραφή: 10 Ιαν 2005 02:10
Τοποθεσία: Ξάνθη
Επικοινωνία:

Δεν μπορώ να αλλάξω backcolor στα label όταν τυπώνω[VB 2005]

Δημοσίευση από mousi » 26 Ιαν 2006 03:13

Να και η εικόνα
Συνημμένα
1.jpg

Απάντηση

Επιστροφή στο “dot Net και Visual Studio”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 0 επισκέπτες