www.pudn.com > WMACompressor.zip > Config.vb

Public Class Config 
    Inherits System.Windows.Forms.Form 
 
#Region " Windows Form Designer generated code " 
 
    Public Sub New() 
        MyBase.New() 
 
        'This call is required by the Windows Form Designer. 
        InitializeComponent() 
 
        'Add any initialization after the InitializeComponent() call 
 
    End Sub 
 
    'Form overrides dispose to clean up the component list. 
    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 
 
    'Required by the Windows Form Designer 
    Private components As System.ComponentModel.IContainer 
 
    'NOTE: The following procedure is required by the Windows Form Designer 
    'It can be modified using the Windows Form Designer.   
    'Do not modify it using the code editor. 
  Friend WithEvents ButtonOK As System.Windows.Forms.Button 
  Friend WithEvents ButtonApply As System.Windows.Forms.Button 
  Friend WithEvents ButtonCancel As System.Windows.Forms.Button 
  Friend WithEvents EditWmaWriter1 As WmaUserCtrls.EditWmaWriter 
   Private Sub InitializeComponent() 
    Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(Config)) 
    Me.ButtonOK = New System.Windows.Forms.Button 
    Me.ButtonApply = New System.Windows.Forms.Button 
    Me.ButtonCancel = New System.Windows.Forms.Button 
    Me.EditWmaWriter1 = New WmaUserCtrls.EditWmaWriter 
    Me.SuspendLayout() 
    ' 
    'ButtonOK 
    ' 
    Me.ButtonOK.DialogResult = System.Windows.Forms.DialogResult.OK 
    Me.ButtonOK.Location = New System.Drawing.Point(336, 8) 
    Me.ButtonOK.Name = "ButtonOK" 
    Me.ButtonOK.TabIndex = 1 
    Me.ButtonOK.Text = "Ok" 
    ' 
    'ButtonApply 
    ' 
    Me.ButtonApply.Enabled = False 
    Me.ButtonApply.Location = New System.Drawing.Point(336, 40) 
    Me.ButtonApply.Name = "ButtonApply" 
    Me.ButtonApply.TabIndex = 2 
    Me.ButtonApply.Text = "Apply" 
    ' 
    'ButtonCancel 
    ' 
    Me.ButtonCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel 
    Me.ButtonCancel.Location = New System.Drawing.Point(336, 72) 
    Me.ButtonCancel.Name = "ButtonCancel" 
    Me.ButtonCancel.TabIndex = 3 
    Me.ButtonCancel.Text = "Cancel" 
    ' 
    'EditWmaWriter1 
    ' 
    Me.EditWmaWriter1.Config = CType(resources.GetObject("EditWmaWriter1.Config"), Yeti.MMedia.AudioWriterConfig) 
    Me.EditWmaWriter1.InFormatReadOnly = True 
    Me.EditWmaWriter1.Location = New System.Drawing.Point(8, 8) 
    Me.EditWmaWriter1.Name = "EditWmaWriter1" 
    Me.EditWmaWriter1.Size = New System.Drawing.Size(320, 184) 
    Me.EditWmaWriter1.TabIndex = 4 
    ' 
    'Config 
    ' 
    Me.AcceptButton = Me.ButtonOK 
    Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13) 
    Me.CancelButton = Me.ButtonCancel 
    Me.ClientSize = New System.Drawing.Size(418, 197) 
    Me.Controls.Add(Me.EditWmaWriter1) 
    Me.Controls.Add(Me.ButtonCancel) 
    Me.Controls.Add(Me.ButtonApply) 
    Me.Controls.Add(Me.ButtonOK) 
    Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog 
    Me.MaximizeBox = False 
    Me.MinimizeBox = False 
    Me.Name = "Config" 
    Me.ShowInTaskbar = False 
    Me.Text = "Config" 
    Me.ResumeLayout(False) 
 
  End Sub 
 
#End Region 
 
  Private Sub EditWmaWriter1_ConfigChange(ByVal sender As Object, ByVal e As System.EventArgs) Handles EditWmaWriter1.ConfigChange 
    ButtonApply.Enabled = True 
  End Sub 
 
  Private Sub ButtonApply_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonApply.Click 
    EditWmaWriter1.DoApply() 
    ButtonApply.Enabled = False 
  End Sub 
End Class