none
Progressbar değiştirme RRS feed

  • Soru

  • Progressbar nasıl yukarıdan aşağıya yapabilirim soldan sağa değilde aşağıdan yukarı doğru dolacak ve bide rengi nasıl değişir yani yeşili örnek kırmızı veya sarı yapmak istiyorum onun gibi.
    14 Eylül 2013 Cumartesi 19:15

Yanıtlar

  • Aşağıdaki sınıfla oluşacak progressbar dikey olur. Proje özelliklerine girip enabled xp visual styles seçeneğini devre dışı bırakırsan forecolor değiştirerek rengin değişmesini sağlayabilirsin.

    Public Class Form1
    
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim vpb As New VerticalProgressBar() With {.Width = 20, .Height = 100}
            vpb.ForeColor = Color.Red
            vpb.Value = 30
            Me.Controls.Add(vpb)
        End Sub
    End Class
    
    Public Class VerticalProgressBar
        Inherits ProgressBar
        Protected Overloads Overrides ReadOnly Property CreateParams() As CreateParams
            Get
                Dim cp As CreateParams = MyBase.CreateParams
                cp.Style = cp.Style Or &H4
                Return cp
            End Get
        End Property
    End Class

    15 Eylül 2013 Pazar 10:34
    Moderatör
  • O zaman ya extended progressbar örneklerine bak ya da telerik, devexpress gibi üçüncü parti kontrolleri dene.

    http://www.codeproject.com/Articles/12167/Extended-NET-Controls

    http://www.codeproject.com/Articles/10710/Extended-ProgressBar

    vs.

    16 Eylül 2013 Pazartesi 19:45
    Moderatör

Tüm Yanıtlar

  • Aşağıdaki sınıfla oluşacak progressbar dikey olur. Proje özelliklerine girip enabled xp visual styles seçeneğini devre dışı bırakırsan forecolor değiştirerek rengin değişmesini sağlayabilirsin.

    Public Class Form1
    
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            Dim vpb As New VerticalProgressBar() With {.Width = 20, .Height = 100}
            vpb.ForeColor = Color.Red
            vpb.Value = 30
            Me.Controls.Add(vpb)
        End Sub
    End Class
    
    Public Class VerticalProgressBar
        Inherits ProgressBar
        Protected Overloads Overrides ReadOnly Property CreateParams() As CreateParams
            Get
                Dim cp As CreateParams = MyBase.CreateParams
                cp.Style = cp.Style Or &H4
                Return cp
            End Get
        End Property
    End Class

    15 Eylül 2013 Pazar 10:34
    Moderatör
  • Yön için teşekkür ederim enable xp kullanmadan nasıl değiştire bilirim ? ve ayrıca progressbar hani pat diye değilde yavaş dolar ya onu boşalırken de nasıl yaparım ?
    • Düzenleyen Utku Halis 16 Eylül 2013 Pazartesi 15:27
    16 Eylül 2013 Pazartesi 15:24
  • O zaman ya extended progressbar örneklerine bak ya da telerik, devexpress gibi üçüncü parti kontrolleri dene.

    http://www.codeproject.com/Articles/12167/Extended-NET-Controls

    http://www.codeproject.com/Articles/10710/Extended-ProgressBar

    vs.

    16 Eylül 2013 Pazartesi 19:45
    Moderatör
  • Teşekkür ederim...
    18 Eylül 2013 Çarşamba 05:12