Initial commit
This commit is contained in:
82
EDOKA/EDEX/Serienbriefe/Controls/ucProgress.vb
Normal file
82
EDOKA/EDEX/Serienbriefe/Controls/ucProgress.vb
Normal file
@@ -0,0 +1,82 @@
|
||||
Public Class ucProgress
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
#Region " Vom Windows Form Designer generierter Code "
|
||||
|
||||
Public Sub New()
|
||||
MyBase.New()
|
||||
|
||||
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
|
||||
|
||||
End Sub
|
||||
|
||||
'UserControl überschreibt den Löschvorgang zum Bereinigen der Komponentenliste.
|
||||
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing Then
|
||||
If Not (components Is Nothing) Then
|
||||
components.Dispose()
|
||||
End If
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
' Für Windows Form-Designer erforderlich
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
|
||||
'Sie kann mit dem Windows Form-Designer modifiziert werden.
|
||||
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
|
||||
Friend WithEvents Bar1 As UtilityLibrary.WinControls.ProgressBarEx
|
||||
Friend WithEvents info As System.Windows.Forms.Label
|
||||
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||
Me.Bar1 = New UtilityLibrary.WinControls.ProgressBarEx()
|
||||
Me.info = New System.Windows.Forms.Label()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Bar1
|
||||
'
|
||||
Me.Bar1.BackgroundBitmap = Nothing
|
||||
Me.Bar1.BackgroundColor = System.Drawing.Color.FromArgb(CType(220, Byte), CType(217, Byte), CType(211, Byte))
|
||||
Me.Bar1.Border3D = System.Windows.Forms.Border3DStyle.Flat
|
||||
Me.Bar1.BorderColor = System.Drawing.SystemColors.Highlight
|
||||
Me.Bar1.EnableBorder3D = True
|
||||
Me.Bar1.ForegroundBitmap = Nothing
|
||||
Me.Bar1.ForegroundColor = System.Drawing.Color.Blue
|
||||
Me.Bar1.GradientEndColor = System.Drawing.Color.Navy
|
||||
Me.Bar1.GradientMiddleColor = System.Drawing.Color.Blue
|
||||
Me.Bar1.GradientStartColor = System.Drawing.Color.FromArgb(CType(128, Byte), CType(128, Byte), CType(255, Byte))
|
||||
Me.Bar1.Maximum = 100
|
||||
Me.Bar1.Minimum = 0
|
||||
Me.Bar1.Name = "Bar1"
|
||||
Me.Bar1.ProgressTextColor = System.Drawing.Color.Empty
|
||||
Me.Bar1.ProgressTextHiglightColor = System.Drawing.Color.Empty
|
||||
Me.Bar1.ShowProgressText = True
|
||||
Me.Bar1.Size = New System.Drawing.Size(224, 24)
|
||||
Me.Bar1.Smooth = True
|
||||
Me.Bar1.Step = 10
|
||||
Me.Bar1.TabIndex = 3
|
||||
Me.Bar1.Text = "ProgressBarEx1"
|
||||
Me.Bar1.Value = 0
|
||||
'
|
||||
'info
|
||||
'
|
||||
Me.info.Location = New System.Drawing.Point(228, 5)
|
||||
Me.info.Name = "info"
|
||||
Me.info.Size = New System.Drawing.Size(284, 23)
|
||||
Me.info.TabIndex = 4
|
||||
'
|
||||
'ucProgress
|
||||
'
|
||||
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.info, Me.Bar1})
|
||||
Me.Name = "ucProgress"
|
||||
Me.Size = New System.Drawing.Size(520, 24)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
End Class
|
||||
Reference in New Issue
Block a user