mirror of
https://github.com/hama3254/Crunchyroll-Downloader-v3.0.git
synced 2024-06-13 03:18:43 +02:00
subs only, network scan improvement
improved network scan subs only mode is now an option in the "Add Video" window removed subtitle only download for Crunchyroll from the settings
This commit is contained in:
hama3254
parent
dc444e5c28
commit
6ed4a31d19
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
96
Crunchyroll Downloader/Anime_Add.Designer.vb
generated
96
Crunchyroll Downloader/Anime_Add.Designer.vb
generated
|
|
@ -26,6 +26,7 @@ Partial Class Anime_Add
|
|||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Anime_Add))
|
||||
Me.groupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.SubTitlesOnlyCB = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.StatusLabel = New MetroFramework.Controls.MetroLabel()
|
||||
Me.ComboBox2 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.TextBox4 = New MetroFramework.Controls.MetroTextBox()
|
||||
|
|
@ -56,17 +57,33 @@ Partial Class Anime_Add
|
|||
'groupBox1
|
||||
'
|
||||
Me.groupBox1.BackColor = System.Drawing.Color.Transparent
|
||||
Me.groupBox1.Controls.Add(Me.SubTitlesOnlyCB)
|
||||
Me.groupBox1.Controls.Add(Me.StatusLabel)
|
||||
Me.groupBox1.Controls.Add(Me.ComboBox2)
|
||||
Me.groupBox1.Controls.Add(Me.TextBox4)
|
||||
Me.groupBox1.Controls.Add(Me.textBox1)
|
||||
Me.groupBox1.Controls.Add(Me.textBox2)
|
||||
Me.groupBox1.Location = New System.Drawing.Point(3, 63)
|
||||
Me.groupBox1.Location = New System.Drawing.Point(15, 70)
|
||||
Me.groupBox1.Name = "groupBox1"
|
||||
Me.groupBox1.Size = New System.Drawing.Size(620, 162)
|
||||
Me.groupBox1.Size = New System.Drawing.Size(720, 280)
|
||||
Me.groupBox1.TabIndex = 33
|
||||
Me.groupBox1.TabStop = False
|
||||
'
|
||||
'SubTitlesOnlyCB
|
||||
'
|
||||
Me.SubTitlesOnlyCB.BackColor = System.Drawing.Color.White
|
||||
Me.SubTitlesOnlyCB.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.SubTitlesOnlyCB.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.SubTitlesOnlyCB.FormattingEnabled = True
|
||||
Me.SubTitlesOnlyCB.ItemHeight = 23
|
||||
Me.SubTitlesOnlyCB.Items.AddRange(New Object() {"[Default]", "[Subtitles only]"})
|
||||
Me.SubTitlesOnlyCB.Location = New System.Drawing.Point(18, 190)
|
||||
Me.SubTitlesOnlyCB.Name = "SubTitlesOnlyCB"
|
||||
Me.SubTitlesOnlyCB.Size = New System.Drawing.Size(693, 29)
|
||||
Me.SubTitlesOnlyCB.Sorted = True
|
||||
Me.SubTitlesOnlyCB.TabIndex = 39
|
||||
Me.SubTitlesOnlyCB.UseSelectable = True
|
||||
'
|
||||
'StatusLabel
|
||||
'
|
||||
Me.StatusLabel.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
|
|
@ -76,9 +93,9 @@ Partial Class Anime_Add
|
|||
Me.StatusLabel.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.StatusLabel.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.StatusLabel.ForeColor = System.Drawing.SystemColors.InactiveCaptionText
|
||||
Me.StatusLabel.Location = New System.Drawing.Point(18, 127)
|
||||
Me.StatusLabel.Location = New System.Drawing.Point(18, 228)
|
||||
Me.StatusLabel.Name = "StatusLabel"
|
||||
Me.StatusLabel.Size = New System.Drawing.Size(593, 29)
|
||||
Me.StatusLabel.Size = New System.Drawing.Size(693, 46)
|
||||
Me.StatusLabel.TabIndex = 38
|
||||
Me.StatusLabel.Text = "Status: idle"
|
||||
Me.StatusLabel.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
|
|
@ -90,9 +107,9 @@ Partial Class Anime_Add
|
|||
Me.ComboBox2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.ComboBox2.FormattingEnabled = True
|
||||
Me.ComboBox2.ItemHeight = 23
|
||||
Me.ComboBox2.Location = New System.Drawing.Point(18, 98)
|
||||
Me.ComboBox2.Location = New System.Drawing.Point(18, 148)
|
||||
Me.ComboBox2.Name = "ComboBox2"
|
||||
Me.ComboBox2.Size = New System.Drawing.Size(584, 29)
|
||||
Me.ComboBox2.Size = New System.Drawing.Size(693, 29)
|
||||
Me.ComboBox2.Sorted = True
|
||||
Me.ComboBox2.TabIndex = 37
|
||||
Me.ComboBox2.UseSelectable = True
|
||||
|
|
@ -105,17 +122,18 @@ Partial Class Anime_Add
|
|||
'
|
||||
'
|
||||
Me.TextBox4.CustomButton.Image = Nothing
|
||||
Me.TextBox4.CustomButton.Location = New System.Drawing.Point(565, 2)
|
||||
Me.TextBox4.CustomButton.Location = New System.Drawing.Point(665, 1)
|
||||
Me.TextBox4.CustomButton.Name = ""
|
||||
Me.TextBox4.CustomButton.Size = New System.Drawing.Size(17, 17)
|
||||
Me.TextBox4.CustomButton.Size = New System.Drawing.Size(27, 27)
|
||||
Me.TextBox4.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.TextBox4.CustomButton.TabIndex = 1
|
||||
Me.TextBox4.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.TextBox4.CustomButton.UseSelectable = True
|
||||
Me.TextBox4.CustomButton.Visible = False
|
||||
Me.TextBox4.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.TextBox4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.TextBox4.Lines = New String() {"Main Directory"}
|
||||
Me.TextBox4.Location = New System.Drawing.Point(18, 70)
|
||||
Me.TextBox4.Location = New System.Drawing.Point(18, 106)
|
||||
Me.TextBox4.MaxLength = 32767
|
||||
Me.TextBox4.Name = "TextBox4"
|
||||
Me.TextBox4.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
|
|
@ -125,7 +143,7 @@ Partial Class Anime_Add
|
|||
Me.TextBox4.SelectionLength = 0
|
||||
Me.TextBox4.SelectionStart = 0
|
||||
Me.TextBox4.ShortcutsEnabled = True
|
||||
Me.TextBox4.Size = New System.Drawing.Size(585, 22)
|
||||
Me.TextBox4.Size = New System.Drawing.Size(693, 29)
|
||||
Me.TextBox4.TabIndex = 36
|
||||
Me.TextBox4.TabStop = False
|
||||
Me.TextBox4.Text = "Main Directory"
|
||||
|
|
@ -142,17 +160,18 @@ Partial Class Anime_Add
|
|||
'
|
||||
'
|
||||
Me.textBox1.CustomButton.Image = Nothing
|
||||
Me.textBox1.CustomButton.Location = New System.Drawing.Point(565, 2)
|
||||
Me.textBox1.CustomButton.Location = New System.Drawing.Point(665, 1)
|
||||
Me.textBox1.CustomButton.Name = ""
|
||||
Me.textBox1.CustomButton.Size = New System.Drawing.Size(17, 17)
|
||||
Me.textBox1.CustomButton.Size = New System.Drawing.Size(27, 27)
|
||||
Me.textBox1.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.textBox1.CustomButton.TabIndex = 1
|
||||
Me.textBox1.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.textBox1.CustomButton.UseSelectable = True
|
||||
Me.textBox1.CustomButton.Visible = False
|
||||
Me.textBox1.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.textBox1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.textBox1.Lines = New String() {"URL"}
|
||||
Me.textBox1.Location = New System.Drawing.Point(18, 14)
|
||||
Me.textBox1.Location = New System.Drawing.Point(18, 22)
|
||||
Me.textBox1.MaxLength = 32767
|
||||
Me.textBox1.Name = "textBox1"
|
||||
Me.textBox1.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
|
|
@ -161,7 +180,7 @@ Partial Class Anime_Add
|
|||
Me.textBox1.SelectionLength = 0
|
||||
Me.textBox1.SelectionStart = 0
|
||||
Me.textBox1.ShortcutsEnabled = True
|
||||
Me.textBox1.Size = New System.Drawing.Size(585, 22)
|
||||
Me.textBox1.Size = New System.Drawing.Size(693, 29)
|
||||
Me.textBox1.TabIndex = 4
|
||||
Me.textBox1.TabStop = False
|
||||
Me.textBox1.Text = "URL"
|
||||
|
|
@ -178,17 +197,18 @@ Partial Class Anime_Add
|
|||
'
|
||||
'
|
||||
Me.textBox2.CustomButton.Image = Nothing
|
||||
Me.textBox2.CustomButton.Location = New System.Drawing.Point(565, 2)
|
||||
Me.textBox2.CustomButton.Location = New System.Drawing.Point(665, 1)
|
||||
Me.textBox2.CustomButton.Name = ""
|
||||
Me.textBox2.CustomButton.Size = New System.Drawing.Size(17, 17)
|
||||
Me.textBox2.CustomButton.Size = New System.Drawing.Size(27, 27)
|
||||
Me.textBox2.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.textBox2.CustomButton.TabIndex = 1
|
||||
Me.textBox2.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.textBox2.CustomButton.UseSelectable = True
|
||||
Me.textBox2.CustomButton.Visible = False
|
||||
Me.textBox2.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.textBox2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.textBox2.Lines = New String() {"Name of the Anime"}
|
||||
Me.textBox2.Location = New System.Drawing.Point(18, 42)
|
||||
Me.textBox2.Location = New System.Drawing.Point(18, 64)
|
||||
Me.textBox2.MaxLength = 32767
|
||||
Me.textBox2.Name = "textBox2"
|
||||
Me.textBox2.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
|
|
@ -197,7 +217,7 @@ Partial Class Anime_Add
|
|||
Me.textBox2.SelectionLength = 0
|
||||
Me.textBox2.SelectionStart = 0
|
||||
Me.textBox2.ShortcutsEnabled = True
|
||||
Me.textBox2.Size = New System.Drawing.Size(585, 22)
|
||||
Me.textBox2.Size = New System.Drawing.Size(693, 29)
|
||||
Me.textBox2.TabIndex = 5
|
||||
Me.textBox2.TabStop = False
|
||||
Me.textBox2.Text = "Name of the Anime"
|
||||
|
|
@ -211,7 +231,7 @@ Partial Class Anime_Add
|
|||
Me.pictureBox4.BackColor = System.Drawing.Color.Transparent
|
||||
Me.pictureBox4.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.pictureBox4.Image = Global.Crunchyroll_Downloader.My.Resources.Resources.main_button_download_default
|
||||
Me.pictureBox4.Location = New System.Drawing.Point(46, 231)
|
||||
Me.pictureBox4.Location = New System.Drawing.Point(106, 377)
|
||||
Me.pictureBox4.Name = "pictureBox4"
|
||||
Me.pictureBox4.Size = New System.Drawing.Size(538, 50)
|
||||
Me.pictureBox4.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
|
|
@ -226,9 +246,9 @@ Partial Class Anime_Add
|
|||
Me.groupBox2.Controls.Add(Me.comboBox3)
|
||||
Me.groupBox2.Controls.Add(Me.PictureBox1)
|
||||
Me.groupBox2.Controls.Add(Me.Add_Display)
|
||||
Me.groupBox2.Location = New System.Drawing.Point(3, 63)
|
||||
Me.groupBox2.Location = New System.Drawing.Point(15, 70)
|
||||
Me.groupBox2.Name = "groupBox2"
|
||||
Me.groupBox2.Size = New System.Drawing.Size(620, 162)
|
||||
Me.groupBox2.Size = New System.Drawing.Size(720, 280)
|
||||
Me.groupBox2.TabIndex = 44
|
||||
Me.groupBox2.TabStop = False
|
||||
Me.groupBox2.Visible = False
|
||||
|
|
@ -238,9 +258,9 @@ Partial Class Anime_Add
|
|||
Me.comboBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.comboBox4.FormattingEnabled = True
|
||||
Me.comboBox4.ItemHeight = 23
|
||||
Me.comboBox4.Location = New System.Drawing.Point(24, 83)
|
||||
Me.comboBox4.Location = New System.Drawing.Point(13, 154)
|
||||
Me.comboBox4.Name = "comboBox4"
|
||||
Me.comboBox4.Size = New System.Drawing.Size(585, 29)
|
||||
Me.comboBox4.Size = New System.Drawing.Size(693, 29)
|
||||
Me.comboBox4.TabIndex = 2
|
||||
Me.comboBox4.UseSelectable = True
|
||||
'
|
||||
|
|
@ -249,9 +269,9 @@ Partial Class Anime_Add
|
|||
Me.ComboBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ComboBox1.FormattingEnabled = True
|
||||
Me.ComboBox1.ItemHeight = 23
|
||||
Me.ComboBox1.Location = New System.Drawing.Point(24, 19)
|
||||
Me.ComboBox1.Location = New System.Drawing.Point(13, 50)
|
||||
Me.ComboBox1.Name = "ComboBox1"
|
||||
Me.ComboBox1.Size = New System.Drawing.Size(585, 29)
|
||||
Me.ComboBox1.Size = New System.Drawing.Size(693, 29)
|
||||
Me.ComboBox1.TabIndex = 1
|
||||
Me.ComboBox1.UseSelectable = True
|
||||
'
|
||||
|
|
@ -260,9 +280,9 @@ Partial Class Anime_Add
|
|||
Me.comboBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.comboBox3.FormattingEnabled = True
|
||||
Me.comboBox3.ItemHeight = 23
|
||||
Me.comboBox3.Location = New System.Drawing.Point(24, 51)
|
||||
Me.comboBox3.Location = New System.Drawing.Point(13, 102)
|
||||
Me.comboBox3.Name = "comboBox3"
|
||||
Me.comboBox3.Size = New System.Drawing.Size(585, 29)
|
||||
Me.comboBox3.Size = New System.Drawing.Size(693, 29)
|
||||
Me.comboBox3.TabIndex = 1
|
||||
Me.comboBox3.UseSelectable = True
|
||||
'
|
||||
|
|
@ -271,7 +291,7 @@ Partial Class Anime_Add
|
|||
Me.PictureBox1.BackColor = System.Drawing.Color.Transparent
|
||||
Me.PictureBox1.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.PictureBox1.Image = Global.Crunchyroll_Downloader.My.Resources.Resources.add_mass_cancel
|
||||
Me.PictureBox1.Location = New System.Drawing.Point(113, 117)
|
||||
Me.PictureBox1.Location = New System.Drawing.Point(159, 231)
|
||||
Me.PictureBox1.Name = "PictureBox1"
|
||||
Me.PictureBox1.Size = New System.Drawing.Size(403, 36)
|
||||
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
|
|
@ -287,9 +307,9 @@ Partial Class Anime_Add
|
|||
Me.Add_Display.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.Add_Display.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.Add_Display.ForeColor = System.Drawing.Color.Black
|
||||
Me.Add_Display.Location = New System.Drawing.Point(20, 114)
|
||||
Me.Add_Display.Location = New System.Drawing.Point(20, 228)
|
||||
Me.Add_Display.Name = "Add_Display"
|
||||
Me.Add_Display.Size = New System.Drawing.Size(591, 38)
|
||||
Me.Add_Display.Size = New System.Drawing.Size(691, 42)
|
||||
Me.Add_Display.TabIndex = 36
|
||||
Me.Add_Display.Text = "..."
|
||||
Me.Add_Display.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
|
|
@ -298,9 +318,9 @@ Partial Class Anime_Add
|
|||
'
|
||||
Me.GroupBox3.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox3.Controls.Add(Me.ListBox1)
|
||||
Me.GroupBox3.Location = New System.Drawing.Point(3, 63)
|
||||
Me.GroupBox3.Location = New System.Drawing.Point(15, 70)
|
||||
Me.GroupBox3.Name = "GroupBox3"
|
||||
Me.GroupBox3.Size = New System.Drawing.Size(620, 162)
|
||||
Me.GroupBox3.Size = New System.Drawing.Size(720, 280)
|
||||
Me.GroupBox3.TabIndex = 46
|
||||
Me.GroupBox3.TabStop = False
|
||||
Me.GroupBox3.Visible = False
|
||||
|
|
@ -308,11 +328,12 @@ Partial Class Anime_Add
|
|||
'ListBox1
|
||||
'
|
||||
Me.ListBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer))
|
||||
Me.ListBox1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.ListBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ListBox1.FormattingEnabled = True
|
||||
Me.ListBox1.Location = New System.Drawing.Point(3, 16)
|
||||
Me.ListBox1.ItemHeight = 15
|
||||
Me.ListBox1.Location = New System.Drawing.Point(13, 18)
|
||||
Me.ListBox1.Name = "ListBox1"
|
||||
Me.ListBox1.Size = New System.Drawing.Size(614, 143)
|
||||
Me.ListBox1.Size = New System.Drawing.Size(693, 244)
|
||||
Me.ListBox1.TabIndex = 0
|
||||
'
|
||||
'Timer1
|
||||
|
|
@ -358,13 +379,13 @@ Partial Class Anime_Add
|
|||
Me.ApplyImageInvert = True
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None
|
||||
Me.BorderStyle = MetroFramework.Forms.MetroFormBorderStyle.FixedSingle
|
||||
Me.ClientSize = New System.Drawing.Size(630, 300)
|
||||
Me.ClientSize = New System.Drawing.Size(750, 450)
|
||||
Me.Controls.Add(Me.Btn_min)
|
||||
Me.Controls.Add(Me.Btn_Close)
|
||||
Me.Controls.Add(Me.pictureBox4)
|
||||
Me.Controls.Add(Me.groupBox2)
|
||||
Me.Controls.Add(Me.groupBox1)
|
||||
Me.Controls.Add(Me.GroupBox3)
|
||||
Me.Controls.Add(Me.groupBox2)
|
||||
Me.Name = "Anime_Add"
|
||||
Me.Padding = New System.Windows.Forms.Padding(10, 60, 20, 20)
|
||||
Me.Text = "Add Video"
|
||||
|
|
@ -399,4 +420,5 @@ Partial Class Anime_Add
|
|||
Public WithEvents comboBox3 As MetroFramework.Controls.MetroComboBox
|
||||
Private WithEvents Btn_min As PictureBox
|
||||
Private WithEvents Btn_Close As PictureBox
|
||||
Public WithEvents SubTitlesOnlyCB As MetroFramework.Controls.MetroComboBox
|
||||
End Class
|
||||
|
|
|
|||
|
|
@ -43,7 +43,7 @@ Public Class Anime_Add
|
|||
|
||||
|
||||
Private Sub Anime_Add_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
|
||||
SubTitlesOnlyCB.SelectedIndex = 0
|
||||
Manager.Owner = Me
|
||||
Me.StyleManager = Manager
|
||||
Btn_Close.Image = Main.CloseImg
|
||||
|
|
@ -148,6 +148,11 @@ Public Class Anime_Add
|
|||
Private Sub PictureBox4_Click(sender As Object, e As EventArgs) Handles pictureBox4.Click
|
||||
'pictureBox4.Enabled = False
|
||||
Main.LoginOnly = "Download Mode!"
|
||||
If SubTitlesOnlyCB.Text = "[Default]" Then
|
||||
Main.SubsOnly = False
|
||||
Else
|
||||
Main.SubsOnly = True
|
||||
End If
|
||||
If groupBox1.Visible = True Then
|
||||
Try
|
||||
If CBool(InStr(textBox1.Text, "crunchyroll.com")) Or CBool(InStr(textBox1.Text, "funimation.com")) Then 'Or CBool(InStr(textBox1.Text, "anime-on-demand.de")) Then
|
||||
|
|
@ -223,6 +228,11 @@ Public Class Anime_Add
|
|||
End If
|
||||
End If
|
||||
ElseIf CBool(InStr(textBox1.Text, "anime-on-demand.de")) Then
|
||||
If Main.SubsOnly = True Then
|
||||
MsgBox("Anime on Demand wird nicht im [Subtitles only] modus unterstützt" + vbNewLine + "Normaler Download modus ist aktiv!", MsgBoxStyle.Information)
|
||||
Main.SubsOnly = False
|
||||
SubTitlesOnlyCB.Text = "[Default]"
|
||||
End If
|
||||
Main.b = False
|
||||
AoD_DubList.Clear()
|
||||
AoD_OmUList.Clear()
|
||||
|
|
@ -285,10 +295,10 @@ Public Class Anime_Add
|
|||
If AoD_Cookie = Nothing Then
|
||||
|
||||
MsgBox(Main.LoginReminder)
|
||||
Main.Text = "Crunchyroll Downloader"
|
||||
Main.Invalidate()
|
||||
StatusLabel.Text = "Status: idle"
|
||||
Exit Sub
|
||||
Main.Text = "Crunchyroll Downloader"
|
||||
Main.Invalidate()
|
||||
StatusLabel.Text = "Status: idle"
|
||||
Exit Sub
|
||||
|
||||
End If
|
||||
'MsgBox(AoD_Cookie)
|
||||
|
|
@ -298,37 +308,37 @@ Public Class Anime_Add
|
|||
Dim OmUStreamSplitToken() As String = OmUStreamSplit(1).Split(New String() {Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
Dim OmUStreamSplitEpisodeIndex() As String = OmUStreamSplit(0).Split(New String() {"/videomaterialurl/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim OmUStreamSplitEpisodeIndex2() As String = OmUStreamSplitEpisodeIndex(1).Split(New String() {"/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim m3u8Strings As String = Nothing
|
||||
'I/nsHttp Cookie:
|
||||
Dim OmUStreamSplitEpisodeIndex2() As String = OmUStreamSplitEpisodeIndex(1).Split(New String() {"/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim m3u8Strings As String = Nothing
|
||||
'I/nsHttp Cookie:
|
||||
|
||||
Try
|
||||
Using client As New WebClient()
|
||||
client.Encoding = System.Text.Encoding.UTF8
|
||||
client.Headers.Add(My.Resources.ffmpeg_user_agend.Replace(Chr(34), ""))
|
||||
client.Headers.Add("ACCEPT: application/json, text/javascript, */*; q=0.01")
|
||||
client.Headers.Add("Accept-Encoding: gzip, deflate, br")
|
||||
client.Headers.Add("X-Requested-With: XMLHttpRequest")
|
||||
client.Headers.Add(AoD_Cookie) '+ WebBrowser1.Document.Cookie)
|
||||
'MsgBox(OmUStreamSplitEpisodeIndex(1))
|
||||
m3u8Strings = client.DownloadString("https://www.anime-on-demand.de/videomaterialurl/" + OmUStreamSplitEpisodeIndex2(0) + "/OmU/1080/hlsfirst/" + OmUStreamSplitToken(0))
|
||||
'("Sub: " + m3u8Strings)
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.ToString + vbNewLine + "https://www.anime-on-demand.de/videomaterialurl/" + OmUStreamSplitEpisodeIndex2(0) + "/OmU/1080/hlsfirst/" + OmUStreamSplitToken(0))
|
||||
End Try
|
||||
If m3u8Strings = Nothing Then
|
||||
Else
|
||||
|
||||
Dim OmUStreams() As String = m3u8Strings.Split(New String() {My.Resources.AoD_files}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
For i As Integer = 1 To OmUStreams.Count - 1
|
||||
AoD_OmUList.Add(OmUStreams(i))
|
||||
Next
|
||||
End If
|
||||
Try
|
||||
Using client As New WebClient()
|
||||
client.Encoding = System.Text.Encoding.UTF8
|
||||
client.Headers.Add(My.Resources.ffmpeg_user_agend.Replace(Chr(34), ""))
|
||||
client.Headers.Add("ACCEPT: application/json, text/javascript, */*; q=0.01")
|
||||
client.Headers.Add("Accept-Encoding: gzip, deflate, br")
|
||||
client.Headers.Add("X-Requested-With: XMLHttpRequest")
|
||||
client.Headers.Add(AoD_Cookie) '+ WebBrowser1.Document.Cookie)
|
||||
'MsgBox(OmUStreamSplitEpisodeIndex(1))
|
||||
m3u8Strings = client.DownloadString("https://www.anime-on-demand.de/videomaterialurl/" + OmUStreamSplitEpisodeIndex2(0) + "/OmU/1080/hlsfirst/" + OmUStreamSplitToken(0))
|
||||
'("Sub: " + m3u8Strings)
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.ToString + vbNewLine + "https://www.anime-on-demand.de/videomaterialurl/" + OmUStreamSplitEpisodeIndex2(0) + "/OmU/1080/hlsfirst/" + OmUStreamSplitToken(0))
|
||||
End Try
|
||||
If m3u8Strings = Nothing Then
|
||||
Else
|
||||
|
||||
Dim OmUStreams() As String = m3u8Strings.Split(New String() {My.Resources.AoD_files}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
For i As Integer = 1 To OmUStreams.Count - 1
|
||||
AoD_OmUList.Add(OmUStreams(i))
|
||||
Next
|
||||
End If
|
||||
|
||||
If CBool(InStr(Main.WebbrowserText, "/Dub/1080/hlsfirst/")) Then
|
||||
End If
|
||||
|
||||
If CBool(InStr(Main.WebbrowserText, "/Dub/1080/hlsfirst/")) Then
|
||||
Dim DubStreamSplit() As String = Main.WebbrowserText.Split(New String() {"/Dub/1080/hlsfirst/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim DubStreamSplitToken() As String = DubStreamSplit(1).Split(New String() {Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim DubStreamSplitEpisodeIndex() As String = DubStreamSplit(0).Split(New String() {"/videomaterialurl/"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
|
@ -746,6 +756,7 @@ Public Class Anime_Add
|
|||
Main.Text = "Status: Website error"
|
||||
Me.StatusLabel.Text = "Status: no video found"
|
||||
Return Nothing
|
||||
Main.Funimation_Grapp_RDY = True
|
||||
End Function))
|
||||
|
||||
Else
|
||||
|
|
@ -753,6 +764,8 @@ Public Class Anime_Add
|
|||
Me.Invoke(New Action(Function()
|
||||
Main.Text = "Status: no video found"
|
||||
Me.StatusLabel.Text = "Status: no video found"
|
||||
My.Computer.FileSystem.WriteAllText(Application.StartupPath + "funimation.log", HTMLString, True)
|
||||
Main.Funimation_Grapp_RDY = True
|
||||
Return Nothing
|
||||
End Function))
|
||||
|
||||
|
|
@ -760,6 +773,8 @@ Public Class Anime_Add
|
|||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.ToString)
|
||||
|
||||
Main.Funimation_Grapp_RDY = True
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
|
|
@ -1359,5 +1374,11 @@ Public Class Anime_Add
|
|||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub SubTitlesOnlyCB_SelectedIndexChanged(sender As Object, e As EventArgs) Handles SubTitlesOnlyCB.SelectedIndexChanged
|
||||
If SubTitlesOnlyCB.Text = "[Default]" Then
|
||||
Main.SubsOnly = False
|
||||
Else
|
||||
Main.SubsOnly = True
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
|
|
@ -423,8 +423,18 @@ Public Class CRD_List_Item
|
|||
HistoryDL_URL = DL_URL
|
||||
HistoryDL_Pfad = DL_Pfad
|
||||
HistoryFilename = Filename
|
||||
If InStr(DL_URL, "-i [Subtitles only]") Then
|
||||
Me.Invoke(New Action(Function()
|
||||
|
||||
If DownloadHybridMode = True Then
|
||||
ProgressBar1.Value = 100
|
||||
Label_percent.Text = "selected subtiles have been dowloaded"
|
||||
Canceld = True
|
||||
PlaybackVideoFileToolStripMenuItem.Enabled = False
|
||||
LogTocClipboard.Enabled = False
|
||||
SaveToFile.Enabled = False
|
||||
Return Nothing
|
||||
End Function))
|
||||
ElseIf DownloadHybridMode = True Then
|
||||
Dim Evaluator = New Thread(Sub() DownloadHybrid(DL_URL, DL_Pfad, Filename))
|
||||
Evaluator.Start()
|
||||
HybridMode = True
|
||||
|
|
@ -470,7 +480,7 @@ Public Class CRD_List_Item
|
|||
End If
|
||||
|
||||
|
||||
Debug.WriteLine("Download error #2: " + DL_Pfad + vbNewLine + ex.ToString + vbNewLine + DL_URL)
|
||||
Debug.WriteLine("Download error #2: " + DL_Pfad + vbNewLine + ex2.ToString + vbNewLine + DL_URL)
|
||||
End Try
|
||||
End Try
|
||||
|
||||
|
|
|
|||
|
|
@ -96,18 +96,11 @@ Public Class GeckoFX
|
|||
Main.WebbrowserTitle = WebBrowser1.DocumentTitle
|
||||
Main.WebbrowserHeadText = WebBrowser1.Document.Head.InnerHtml
|
||||
Main.b = True
|
||||
If Main.d = False Then
|
||||
Main.d = True
|
||||
t = New Thread(AddressOf Main.DownloadSubsOnly)
|
||||
t.Priority = ThreadPriority.Normal
|
||||
t.IsBackground = True
|
||||
t.Start()
|
||||
Else
|
||||
t = New Thread(AddressOf Main.GrappURL)
|
||||
t.Priority = ThreadPriority.Normal
|
||||
t.IsBackground = True
|
||||
t.Start()
|
||||
End If
|
||||
|
||||
t = New Thread(AddressOf Main.GrappURL)
|
||||
t.Priority = ThreadPriority.Normal
|
||||
t.IsBackground = True
|
||||
t.Start()
|
||||
|
||||
|
||||
|
||||
|
|
@ -118,13 +111,9 @@ Public Class GeckoFX
|
|||
Main.WebbrowserText = WebBrowser1.Document.Body.OuterHtml
|
||||
Main.WebbrowserTitle = WebBrowser1.DocumentTitle
|
||||
Main.WebbrowserHeadText = WebBrowser1.Document.Head.InnerHtml
|
||||
If Main.d = False Then
|
||||
Main.d = True
|
||||
Main.SeasonDropdownGrappSubs()
|
||||
Einstellungen.StatusLabel.Text = "Status: Multi Download detected!"
|
||||
Else
|
||||
Main.SeasonDropdownGrapp()
|
||||
End If
|
||||
|
||||
Main.SeasonDropdownGrapp()
|
||||
|
||||
ElseIf CBool(InStr(WebBrowser1.Document.Body.OuterHtml, "wrapper container-shadow hover-classes")) Then
|
||||
Main.b = True
|
||||
Anime_Add.textBox2.Text = "Name of the Anime"
|
||||
|
|
@ -132,14 +121,7 @@ Public Class GeckoFX
|
|||
Main.WebbrowserText = WebBrowser1.Document.Body.OuterHtml
|
||||
Main.WebbrowserTitle = WebBrowser1.DocumentTitle
|
||||
Main.WebbrowserHeadText = WebBrowser1.Document.Head.InnerHtml
|
||||
If Main.d = False Then
|
||||
Main.d = True
|
||||
Main.MassGrappSubs()
|
||||
Einstellungen.StatusLabel.Text = "Status: Multi Download detected!"
|
||||
|
||||
Else
|
||||
Main.MassGrapp()
|
||||
End If
|
||||
Main.MassGrapp()
|
||||
Else
|
||||
Main.b = True
|
||||
MsgBox(Main.No_Stream, MsgBoxStyle.OkOnly)
|
||||
|
|
@ -286,8 +268,9 @@ Public Class GeckoFX
|
|||
|
||||
|
||||
If InStr(RequestURL, ".m3u8") Then
|
||||
|
||||
MsgBox(RequestURL)
|
||||
Dim str0 As String = client0.DownloadString(RequestURL)
|
||||
MsgBox(str0)
|
||||
If InStr(str0, "#EXTM3U") Then
|
||||
Main.m3u8List.Add(RequestURL)
|
||||
|
||||
|
|
@ -671,11 +654,24 @@ Public Class GeckoFX
|
|||
If InStr(RequestURL, ".m3u8") Then
|
||||
|
||||
Dim str0 As String = client0.DownloadString(RequestURL)
|
||||
|
||||
If InStr(str0, "#EXTM3U") Then
|
||||
Main.m3u8List.Add(RequestURL)
|
||||
Else
|
||||
Dim DecodedUrl As String = UrlDecode(RequestURL)
|
||||
'MsgBox(DecodedUrl)
|
||||
Dim URLSplit() As String = DecodedUrl.Split(New String() {".m3u8"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim URLSplit2() As String = URLSplit(0).Split(New String() {"https://"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim NewUrl As String = "https://" + URLSplit2(URLSplit2.Count - 1) + ".m3u8" + URLSplit(1)
|
||||
'MsgBox(NewUrl)
|
||||
Dim str1 As String = client0.DownloadString(NewUrl)
|
||||
'MsgBox(str1)
|
||||
If InStr(str1, "#EXTM3U") Then
|
||||
Main.m3u8List.Add(NewUrl)
|
||||
End If
|
||||
|
||||
End If
|
||||
ElseIf InStr(RequestURL, ".mpd") Then
|
||||
ElseIf InStr(RequestURL, ".mpd") Then
|
||||
Main.mpdList.Add(RequestURL)
|
||||
|
||||
ElseIf InStr(RequestURL, ".txt") Then
|
||||
|
|
|
|||
File diff suppressed because it is too large
Load Diff
|
|
@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
|
|||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("3.7.6.2")>
|
||||
<Assembly: AssemblyFileVersion("3.7.6.2")>
|
||||
<Assembly: AssemblyVersion("3.7.8")>
|
||||
<Assembly: AssemblyFileVersion("3.7.8")>
|
||||
<Assembly: NeutralResourcesLanguage("en")>
|
||||
|
|
|
|||
Binary file not shown.
Binary file not shown.
382
Crunchyroll Downloader/einstellungen.Designer.vb
generated
382
Crunchyroll Downloader/einstellungen.Designer.vb
generated
|
|
@ -27,9 +27,6 @@ Partial Class Einstellungen
|
|||
Me.pictureBox1 = New System.Windows.Forms.PictureBox()
|
||||
Me.pictureBox4 = New System.Windows.Forms.PictureBox()
|
||||
Me.ToolTip2 = New System.Windows.Forms.ToolTip(Me.components)
|
||||
Me.TabPage4 = New System.Windows.Forms.TabPage()
|
||||
Me.TabControl2 = New MetroFramework.Controls.MetroTabControl()
|
||||
Me.TabPage5 = New MetroFramework.Controls.MetroTabPage()
|
||||
Me.GroupBox14 = New System.Windows.Forms.GroupBox()
|
||||
Me.CR_SoftSubDefault = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
|
||||
|
|
@ -45,17 +42,6 @@ Partial Class Einstellungen
|
|||
Me.CBenUS = New MetroFramework.Controls.MetroCheckBox()
|
||||
Me.GB_SubLanguage = New System.Windows.Forms.GroupBox()
|
||||
Me.ComboBox1 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.TabPage3 = New MetroFramework.Controls.MetroTabPage()
|
||||
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
|
||||
Me.PictureBox5 = New System.Windows.Forms.PictureBox()
|
||||
Me.StatusLabel = New MetroFramework.Controls.MetroLabel()
|
||||
Me.TextBox2 = New MetroFramework.Controls.MetroTextBox()
|
||||
Me.MultiDLSoftSubs = New System.Windows.Forms.GroupBox()
|
||||
Me.SoftSubsMass = New MetroFramework.Controls.MetroLabel()
|
||||
Me.PictureBox3 = New System.Windows.Forms.PictureBox()
|
||||
Me.comboBox4 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.ComboBox2 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.comboBox3 = New MetroFramework.Controls.MetroComboBox()
|
||||
Me.TabPage2 = New MetroFramework.Controls.MetroTabPage()
|
||||
Me.GroupBox12 = New System.Windows.Forms.GroupBox()
|
||||
Me.DD_Episode_Prefix = New MetroFramework.Controls.MetroComboBox()
|
||||
|
|
@ -140,20 +126,13 @@ Partial Class Einstellungen
|
|||
Me.Label6 = New MetroFramework.Controls.MetroLabel()
|
||||
Me.Label5 = New MetroFramework.Controls.MetroLabel()
|
||||
Me.BackgroundWorker1 = New System.ComponentModel.BackgroundWorker()
|
||||
Me.MetroTabPage1 = New MetroFramework.Controls.MetroTabPage()
|
||||
CType(Me.pictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.pictureBox4, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.TabPage4.SuspendLayout()
|
||||
Me.TabControl2.SuspendLayout()
|
||||
Me.TabPage5.SuspendLayout()
|
||||
Me.GroupBox14.SuspendLayout()
|
||||
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SoftSubs.SuspendLayout()
|
||||
Me.GB_SubLanguage.SuspendLayout()
|
||||
Me.TabPage3.SuspendLayout()
|
||||
Me.GroupBox3.SuspendLayout()
|
||||
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.MultiDLSoftSubs.SuspendLayout()
|
||||
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.TabPage2.SuspendLayout()
|
||||
Me.GroupBox12.SuspendLayout()
|
||||
Me.GroupBox4.SuspendLayout()
|
||||
|
|
@ -179,6 +158,7 @@ Partial Class Einstellungen
|
|||
Me.GroupBox8.SuspendLayout()
|
||||
Me.TabPage7.SuspendLayout()
|
||||
CType(Me.PictureBox7, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.MetroTabPage1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'ToolTip1
|
||||
|
|
@ -211,63 +191,15 @@ Partial Class Einstellungen
|
|||
Me.pictureBox4.TabIndex = 8
|
||||
Me.pictureBox4.TabStop = False
|
||||
'
|
||||
'TabPage4
|
||||
'
|
||||
Me.TabPage4.BackColor = System.Drawing.Color.FromArgb(CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer))
|
||||
Me.TabPage4.Controls.Add(Me.TabControl2)
|
||||
Me.TabPage4.Location = New System.Drawing.Point(4, 44)
|
||||
Me.TabPage4.Name = "TabPage4"
|
||||
Me.TabPage4.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage4.Size = New System.Drawing.Size(493, 452)
|
||||
Me.TabPage4.TabIndex = 3
|
||||
Me.TabPage4.Text = "Crunchyroll"
|
||||
'
|
||||
'TabControl2
|
||||
'
|
||||
Me.TabControl2.Controls.Add(Me.TabPage5)
|
||||
Me.TabControl2.Controls.Add(Me.TabPage3)
|
||||
Me.TabControl2.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.TabControl2.FontSize = MetroFramework.MetroTabControlSize.Tall
|
||||
Me.TabControl2.FontWeight = MetroFramework.MetroTabControlWeight.Regular
|
||||
Me.TabControl2.Location = New System.Drawing.Point(3, 3)
|
||||
Me.TabControl2.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.TabControl2.Name = "TabControl2"
|
||||
Me.TabControl2.SelectedIndex = 0
|
||||
Me.TabControl2.Size = New System.Drawing.Size(487, 446)
|
||||
Me.TabControl2.TabIndex = 0
|
||||
Me.TabControl2.UseSelectable = True
|
||||
'
|
||||
'TabPage5
|
||||
'
|
||||
Me.TabPage5.BackColor = System.Drawing.Color.FromArgb(CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer))
|
||||
Me.TabPage5.Controls.Add(Me.GroupBox14)
|
||||
Me.TabPage5.Controls.Add(Me.PictureBox2)
|
||||
Me.TabPage5.Controls.Add(Me.SoftSubs)
|
||||
Me.TabPage5.Controls.Add(Me.GB_SubLanguage)
|
||||
Me.TabPage5.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.TabPage5.HorizontalScrollbarBarColor = True
|
||||
Me.TabPage5.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage5.HorizontalScrollbarSize = 10
|
||||
Me.TabPage5.Location = New System.Drawing.Point(4, 44)
|
||||
Me.TabPage5.Name = "TabPage5"
|
||||
Me.TabPage5.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage5.Size = New System.Drawing.Size(479, 398)
|
||||
Me.TabPage5.TabIndex = 0
|
||||
Me.TabPage5.Text = "Main"
|
||||
Me.TabPage5.VerticalScrollbarBarColor = True
|
||||
Me.TabPage5.VerticalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage5.VerticalScrollbarSize = 10
|
||||
Me.TabPage5.Visible = False
|
||||
'
|
||||
'GroupBox14
|
||||
'
|
||||
Me.GroupBox14.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox14.Controls.Add(Me.CR_SoftSubDefault)
|
||||
Me.GroupBox14.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox14.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox14.Location = New System.Drawing.Point(6, 242)
|
||||
Me.GroupBox14.Location = New System.Drawing.Point(7, 250)
|
||||
Me.GroupBox14.Name = "GroupBox14"
|
||||
Me.GroupBox14.Size = New System.Drawing.Size(467, 69)
|
||||
Me.GroupBox14.Size = New System.Drawing.Size(480, 69)
|
||||
Me.GroupBox14.TabIndex = 57
|
||||
Me.GroupBox14.TabStop = False
|
||||
Me.GroupBox14.Text = "default subtitle"
|
||||
|
|
@ -292,7 +224,7 @@ Partial Class Einstellungen
|
|||
Me.PictureBox2.BackColor = System.Drawing.Color.Transparent
|
||||
Me.PictureBox2.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.PictureBox2.Image = Global.Crunchyroll_Downloader.My.Resources.Resources.crdsettings_setUScookie_button
|
||||
Me.PictureBox2.Location = New System.Drawing.Point(162, 351)
|
||||
Me.PictureBox2.Location = New System.Drawing.Point(169, 359)
|
||||
Me.PictureBox2.Name = "PictureBox2"
|
||||
Me.PictureBox2.Size = New System.Drawing.Size(150, 30)
|
||||
Me.PictureBox2.SizeMode = System.Windows.Forms.PictureBoxSizeMode.AutoSize
|
||||
|
|
@ -312,9 +244,9 @@ Partial Class Einstellungen
|
|||
Me.SoftSubs.Controls.Add(Me.CBdeDE)
|
||||
Me.SoftSubs.Controls.Add(Me.CBenUS)
|
||||
Me.SoftSubs.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.SoftSubs.Location = New System.Drawing.Point(6, 75)
|
||||
Me.SoftSubs.Location = New System.Drawing.Point(7, 83)
|
||||
Me.SoftSubs.Name = "SoftSubs"
|
||||
Me.SoftSubs.Size = New System.Drawing.Size(467, 161)
|
||||
Me.SoftSubs.Size = New System.Drawing.Size(480, 161)
|
||||
Me.SoftSubs.TabIndex = 51
|
||||
Me.SoftSubs.TabStop = False
|
||||
Me.SoftSubs.Text = "SoftSubs"
|
||||
|
|
@ -433,9 +365,9 @@ Partial Class Einstellungen
|
|||
Me.GB_SubLanguage.Controls.Add(Me.ComboBox1)
|
||||
Me.GB_SubLanguage.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GB_SubLanguage.ForeColor = System.Drawing.Color.Black
|
||||
Me.GB_SubLanguage.Location = New System.Drawing.Point(6, 6)
|
||||
Me.GB_SubLanguage.Location = New System.Drawing.Point(7, 14)
|
||||
Me.GB_SubLanguage.Name = "GB_SubLanguage"
|
||||
Me.GB_SubLanguage.Size = New System.Drawing.Size(467, 63)
|
||||
Me.GB_SubLanguage.Size = New System.Drawing.Size(480, 63)
|
||||
Me.GB_SubLanguage.TabIndex = 50
|
||||
Me.GB_SubLanguage.TabStop = False
|
||||
Me.GB_SubLanguage.Text = "Sub Sprache"
|
||||
|
|
@ -455,182 +387,6 @@ Partial Class Einstellungen
|
|||
Me.ComboBox1.TabIndex = 33
|
||||
Me.ComboBox1.UseSelectable = True
|
||||
'
|
||||
'TabPage3
|
||||
'
|
||||
Me.TabPage3.BackColor = System.Drawing.Color.FromArgb(CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer))
|
||||
Me.TabPage3.Controls.Add(Me.GroupBox3)
|
||||
Me.TabPage3.Controls.Add(Me.MultiDLSoftSubs)
|
||||
Me.TabPage3.HorizontalScrollbarBarColor = True
|
||||
Me.TabPage3.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage3.HorizontalScrollbarSize = 10
|
||||
Me.TabPage3.Location = New System.Drawing.Point(4, 35)
|
||||
Me.TabPage3.Name = "TabPage3"
|
||||
Me.TabPage3.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage3.Size = New System.Drawing.Size(479, 416)
|
||||
Me.TabPage3.TabIndex = 3
|
||||
Me.TabPage3.Text = "Subtile Download"
|
||||
Me.TabPage3.VerticalScrollbarBarColor = True
|
||||
Me.TabPage3.VerticalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage3.VerticalScrollbarSize = 10
|
||||
Me.TabPage3.Visible = False
|
||||
'
|
||||
'GroupBox3
|
||||
'
|
||||
Me.GroupBox3.BackColor = System.Drawing.Color.Transparent
|
||||
Me.GroupBox3.Controls.Add(Me.PictureBox5)
|
||||
Me.GroupBox3.Controls.Add(Me.StatusLabel)
|
||||
Me.GroupBox3.Controls.Add(Me.TextBox2)
|
||||
Me.GroupBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox3.Location = New System.Drawing.Point(9, 6)
|
||||
Me.GroupBox3.Name = "GroupBox3"
|
||||
Me.GroupBox3.Size = New System.Drawing.Size(440, 148)
|
||||
Me.GroupBox3.TabIndex = 46
|
||||
Me.GroupBox3.TabStop = False
|
||||
Me.GroupBox3.Text = "Single Download "
|
||||
'
|
||||
'PictureBox5
|
||||
'
|
||||
Me.PictureBox5.BackColor = System.Drawing.Color.Transparent
|
||||
Me.PictureBox5.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.PictureBox5.Image = Global.Crunchyroll_Downloader.My.Resources.Resources.softsubs_download
|
||||
Me.PictureBox5.Location = New System.Drawing.Point(24, 103)
|
||||
Me.PictureBox5.Name = "PictureBox5"
|
||||
Me.PictureBox5.Size = New System.Drawing.Size(403, 36)
|
||||
Me.PictureBox5.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.PictureBox5.TabIndex = 46
|
||||
Me.PictureBox5.TabStop = False
|
||||
'
|
||||
'StatusLabel
|
||||
'
|
||||
Me.StatusLabel.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.StatusLabel.BackColor = System.Drawing.Color.Transparent
|
||||
Me.StatusLabel.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.StatusLabel.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.StatusLabel.ForeColor = System.Drawing.SystemColors.InactiveCaptionText
|
||||
Me.StatusLabel.Location = New System.Drawing.Point(11, 65)
|
||||
Me.StatusLabel.Name = "StatusLabel"
|
||||
Me.StatusLabel.Size = New System.Drawing.Size(423, 29)
|
||||
Me.StatusLabel.TabIndex = 38
|
||||
Me.StatusLabel.Text = "Status: idle"
|
||||
Me.StatusLabel.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'TextBox2
|
||||
'
|
||||
Me.TextBox2.BackColor = System.Drawing.Color.White
|
||||
Me.TextBox2.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
'
|
||||
'
|
||||
'
|
||||
Me.TextBox2.CustomButton.Image = Nothing
|
||||
Me.TextBox2.CustomButton.Location = New System.Drawing.Point(407, 1)
|
||||
Me.TextBox2.CustomButton.Name = ""
|
||||
Me.TextBox2.CustomButton.Size = New System.Drawing.Size(23, 23)
|
||||
Me.TextBox2.CustomButton.Style = MetroFramework.MetroColorStyle.Blue
|
||||
Me.TextBox2.CustomButton.TabIndex = 1
|
||||
Me.TextBox2.CustomButton.Theme = MetroFramework.MetroThemeStyle.Light
|
||||
Me.TextBox2.CustomButton.UseSelectable = True
|
||||
Me.TextBox2.CustomButton.Visible = False
|
||||
Me.TextBox2.FontSize = MetroFramework.MetroTextBoxSize.Medium
|
||||
Me.TextBox2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
|
||||
Me.TextBox2.Lines = New String() {"URL"}
|
||||
Me.TextBox2.Location = New System.Drawing.Point(6, 35)
|
||||
Me.TextBox2.MaxLength = 32767
|
||||
Me.TextBox2.Name = "TextBox2"
|
||||
Me.TextBox2.PasswordChar = Global.Microsoft.VisualBasic.ChrW(0)
|
||||
Me.TextBox2.ScrollBars = System.Windows.Forms.ScrollBars.None
|
||||
Me.TextBox2.SelectedText = ""
|
||||
Me.TextBox2.SelectionLength = 0
|
||||
Me.TextBox2.SelectionStart = 0
|
||||
Me.TextBox2.ShortcutsEnabled = True
|
||||
Me.TextBox2.Size = New System.Drawing.Size(431, 25)
|
||||
Me.TextBox2.TabIndex = 4
|
||||
Me.TextBox2.TabStop = False
|
||||
Me.TextBox2.Text = "URL"
|
||||
Me.TextBox2.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
Me.TextBox2.UseSelectable = True
|
||||
Me.TextBox2.WaterMarkColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer), CType(CType(109, Byte), Integer))
|
||||
Me.TextBox2.WaterMarkFont = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Pixel)
|
||||
'
|
||||
'MultiDLSoftSubs
|
||||
'
|
||||
Me.MultiDLSoftSubs.BackColor = System.Drawing.Color.Transparent
|
||||
Me.MultiDLSoftSubs.Controls.Add(Me.SoftSubsMass)
|
||||
Me.MultiDLSoftSubs.Controls.Add(Me.PictureBox3)
|
||||
Me.MultiDLSoftSubs.Controls.Add(Me.comboBox4)
|
||||
Me.MultiDLSoftSubs.Controls.Add(Me.ComboBox2)
|
||||
Me.MultiDLSoftSubs.Controls.Add(Me.comboBox3)
|
||||
Me.MultiDLSoftSubs.Enabled = False
|
||||
Me.MultiDLSoftSubs.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.MultiDLSoftSubs.Location = New System.Drawing.Point(9, 157)
|
||||
Me.MultiDLSoftSubs.Name = "MultiDLSoftSubs"
|
||||
Me.MultiDLSoftSubs.Size = New System.Drawing.Size(440, 220)
|
||||
Me.MultiDLSoftSubs.TabIndex = 45
|
||||
Me.MultiDLSoftSubs.TabStop = False
|
||||
Me.MultiDLSoftSubs.Text = "Multi Download"
|
||||
'
|
||||
'SoftSubsMass
|
||||
'
|
||||
Me.SoftSubsMass.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.SoftSubsMass.BackColor = System.Drawing.Color.Transparent
|
||||
Me.SoftSubsMass.FontSize = MetroFramework.MetroLabelSize.Tall
|
||||
Me.SoftSubsMass.FontWeight = MetroFramework.MetroLabelWeight.Regular
|
||||
Me.SoftSubsMass.ForeColor = System.Drawing.Color.Black
|
||||
Me.SoftSubsMass.Location = New System.Drawing.Point(6, 130)
|
||||
Me.SoftSubsMass.Name = "SoftSubsMass"
|
||||
Me.SoftSubsMass.Size = New System.Drawing.Size(428, 23)
|
||||
Me.SoftSubsMass.TabIndex = 46
|
||||
Me.SoftSubsMass.Text = "Status: idle"
|
||||
Me.SoftSubsMass.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
|
||||
'
|
||||
'PictureBox3
|
||||
'
|
||||
Me.PictureBox3.BackColor = System.Drawing.Color.Transparent
|
||||
Me.PictureBox3.Cursor = System.Windows.Forms.Cursors.Hand
|
||||
Me.PictureBox3.Image = Global.Crunchyroll_Downloader.My.Resources.Resources.softsubs_download_gray
|
||||
Me.PictureBox3.Location = New System.Drawing.Point(24, 159)
|
||||
Me.PictureBox3.Name = "PictureBox3"
|
||||
Me.PictureBox3.Size = New System.Drawing.Size(403, 36)
|
||||
Me.PictureBox3.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
|
||||
Me.PictureBox3.TabIndex = 45
|
||||
Me.PictureBox3.TabStop = False
|
||||
'
|
||||
'comboBox4
|
||||
'
|
||||
Me.comboBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.comboBox4.FormattingEnabled = True
|
||||
Me.comboBox4.ItemHeight = 23
|
||||
Me.comboBox4.Location = New System.Drawing.Point(6, 97)
|
||||
Me.comboBox4.Name = "comboBox4"
|
||||
Me.comboBox4.Size = New System.Drawing.Size(431, 29)
|
||||
Me.comboBox4.TabIndex = 2
|
||||
Me.comboBox4.UseSelectable = True
|
||||
'
|
||||
'ComboBox2
|
||||
'
|
||||
Me.ComboBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ComboBox2.FormattingEnabled = True
|
||||
Me.ComboBox2.ItemHeight = 23
|
||||
Me.ComboBox2.Location = New System.Drawing.Point(6, 25)
|
||||
Me.ComboBox2.Name = "ComboBox2"
|
||||
Me.ComboBox2.Size = New System.Drawing.Size(431, 29)
|
||||
Me.ComboBox2.TabIndex = 1
|
||||
Me.ComboBox2.UseSelectable = True
|
||||
'
|
||||
'comboBox3
|
||||
'
|
||||
Me.comboBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.comboBox3.FormattingEnabled = True
|
||||
Me.comboBox3.ItemHeight = 23
|
||||
Me.comboBox3.Location = New System.Drawing.Point(6, 62)
|
||||
Me.comboBox3.Name = "comboBox3"
|
||||
Me.comboBox3.Size = New System.Drawing.Size(431, 29)
|
||||
Me.comboBox3.TabIndex = 1
|
||||
Me.comboBox3.UseSelectable = True
|
||||
'
|
||||
'TabPage2
|
||||
'
|
||||
Me.TabPage2.BackColor = System.Drawing.Color.FromArgb(CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer), CType(CType(243, Byte), Integer))
|
||||
|
|
@ -661,9 +417,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox12.Controls.Add(Me.CR_Filename)
|
||||
Me.GroupBox12.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox12.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox12.Location = New System.Drawing.Point(8, 11)
|
||||
Me.GroupBox12.Location = New System.Drawing.Point(7, 11)
|
||||
Me.GroupBox12.Name = "GroupBox12"
|
||||
Me.GroupBox12.Size = New System.Drawing.Size(479, 126)
|
||||
Me.GroupBox12.Size = New System.Drawing.Size(480, 126)
|
||||
Me.GroupBox12.TabIndex = 53
|
||||
Me.GroupBox12.TabStop = False
|
||||
Me.GroupBox12.Text = "Filename"
|
||||
|
|
@ -719,9 +475,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox4.Controls.Add(Me.CB_Format)
|
||||
Me.GroupBox4.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox4.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox4.Location = New System.Drawing.Point(8, 205)
|
||||
Me.GroupBox4.Location = New System.Drawing.Point(7, 205)
|
||||
Me.GroupBox4.Name = "GroupBox4"
|
||||
Me.GroupBox4.Size = New System.Drawing.Size(479, 78)
|
||||
Me.GroupBox4.Size = New System.Drawing.Size(480, 78)
|
||||
Me.GroupBox4.TabIndex = 42
|
||||
Me.GroupBox4.TabStop = False
|
||||
'
|
||||
|
|
@ -770,7 +526,7 @@ Partial Class Einstellungen
|
|||
Me.GroupBox2.Enabled = False
|
||||
Me.GroupBox2.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox2.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(8, 325)
|
||||
Me.GroupBox2.Location = New System.Drawing.Point(7, 325)
|
||||
Me.GroupBox2.Name = "GroupBox2"
|
||||
Me.GroupBox2.Size = New System.Drawing.Size(480, 63)
|
||||
Me.GroupBox2.TabIndex = 40
|
||||
|
|
@ -922,9 +678,9 @@ Partial Class Einstellungen
|
|||
Me.GB_Resolution.Controls.Add(Me.A1080p)
|
||||
Me.GB_Resolution.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GB_Resolution.ForeColor = System.Drawing.Color.Black
|
||||
Me.GB_Resolution.Location = New System.Drawing.Point(8, 140)
|
||||
Me.GB_Resolution.Location = New System.Drawing.Point(7, 140)
|
||||
Me.GB_Resolution.Name = "GB_Resolution"
|
||||
Me.GB_Resolution.Size = New System.Drawing.Size(479, 59)
|
||||
Me.GB_Resolution.Size = New System.Drawing.Size(480, 59)
|
||||
Me.GB_Resolution.TabIndex = 38
|
||||
Me.GB_Resolution.TabStop = False
|
||||
Me.GB_Resolution.Text = "Auflösung"
|
||||
|
|
@ -1027,9 +783,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox6.Controls.Add(Me.NumericUpDown2)
|
||||
Me.GroupBox6.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox6.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox6.Location = New System.Drawing.Point(0, 296)
|
||||
Me.GroupBox6.Location = New System.Drawing.Point(7, 296)
|
||||
Me.GroupBox6.Name = "GroupBox6"
|
||||
Me.GroupBox6.Size = New System.Drawing.Size(487, 150)
|
||||
Me.GroupBox6.Size = New System.Drawing.Size(480, 150)
|
||||
Me.GroupBox6.TabIndex = 45
|
||||
Me.GroupBox6.TabStop = False
|
||||
Me.GroupBox6.Text = "Error Handling"
|
||||
|
|
@ -1067,9 +823,9 @@ Partial Class Einstellungen
|
|||
'
|
||||
'NumericUpDown2
|
||||
'
|
||||
Me.NumericUpDown2.Location = New System.Drawing.Point(141, 70)
|
||||
Me.NumericUpDown2.Location = New System.Drawing.Point(135, 70)
|
||||
Me.NumericUpDown2.Name = "NumericUpDown2"
|
||||
Me.NumericUpDown2.Size = New System.Drawing.Size(225, 22)
|
||||
Me.NumericUpDown2.Size = New System.Drawing.Size(200, 22)
|
||||
Me.NumericUpDown2.TabIndex = 1
|
||||
Me.NumericUpDown2.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
'
|
||||
|
|
@ -1082,9 +838,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox5.Controls.Add(Me.ListViewAdd_True)
|
||||
Me.GroupBox5.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox5.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox5.Location = New System.Drawing.Point(0, 173)
|
||||
Me.GroupBox5.Location = New System.Drawing.Point(7, 173)
|
||||
Me.GroupBox5.Name = "GroupBox5"
|
||||
Me.GroupBox5.Size = New System.Drawing.Size(487, 117)
|
||||
Me.GroupBox5.Size = New System.Drawing.Size(480, 117)
|
||||
Me.GroupBox5.TabIndex = 7
|
||||
Me.GroupBox5.TabStop = False
|
||||
Me.GroupBox5.Text = "Other"
|
||||
|
|
@ -1144,9 +900,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox1.Controls.Add(Me.TextBox1)
|
||||
Me.GroupBox1.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox1.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(0, 85)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(7, 85)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(487, 86)
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(480, 86)
|
||||
Me.GroupBox1.TabIndex = 7
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Browser Settings"
|
||||
|
|
@ -1199,9 +955,9 @@ Partial Class Einstellungen
|
|||
Me.DL_Count_simultaneous.Controls.Add(Me.NumericUpDown1)
|
||||
Me.DL_Count_simultaneous.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.DL_Count_simultaneous.ForeColor = System.Drawing.Color.Black
|
||||
Me.DL_Count_simultaneous.Location = New System.Drawing.Point(0, 11)
|
||||
Me.DL_Count_simultaneous.Location = New System.Drawing.Point(7, 11)
|
||||
Me.DL_Count_simultaneous.Name = "DL_Count_simultaneous"
|
||||
Me.DL_Count_simultaneous.Size = New System.Drawing.Size(487, 68)
|
||||
Me.DL_Count_simultaneous.Size = New System.Drawing.Size(480, 68)
|
||||
Me.DL_Count_simultaneous.TabIndex = 5
|
||||
Me.DL_Count_simultaneous.TabStop = False
|
||||
Me.DL_Count_simultaneous.Text = "simultaneous downloads"
|
||||
|
|
@ -1220,7 +976,7 @@ Partial Class Einstellungen
|
|||
'
|
||||
Me.TabControl1.Controls.Add(Me.TabPage1)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage2)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage4)
|
||||
Me.TabControl1.Controls.Add(Me.MetroTabPage1)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage6)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage8)
|
||||
Me.TabControl1.Controls.Add(Me.TabPage7)
|
||||
|
|
@ -1228,7 +984,7 @@ Partial Class Einstellungen
|
|||
Me.TabControl1.FontWeight = MetroFramework.MetroTabControlWeight.Regular
|
||||
Me.TabControl1.Location = New System.Drawing.Point(22, 60)
|
||||
Me.TabControl1.Name = "TabControl1"
|
||||
Me.TabControl1.SelectedIndex = 1
|
||||
Me.TabControl1.SelectedIndex = 0
|
||||
Me.TabControl1.Size = New System.Drawing.Size(501, 500)
|
||||
Me.TabControl1.TabIndex = 38
|
||||
Me.TabControl1.UseSelectable = True
|
||||
|
|
@ -1244,10 +1000,10 @@ Partial Class Einstellungen
|
|||
Me.TabPage6.HorizontalScrollbarBarColor = True
|
||||
Me.TabPage6.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.TabPage6.HorizontalScrollbarSize = 10
|
||||
Me.TabPage6.Location = New System.Drawing.Point(4, 35)
|
||||
Me.TabPage6.Location = New System.Drawing.Point(4, 44)
|
||||
Me.TabPage6.Name = "TabPage6"
|
||||
Me.TabPage6.Padding = New System.Windows.Forms.Padding(3)
|
||||
Me.TabPage6.Size = New System.Drawing.Size(493, 461)
|
||||
Me.TabPage6.Size = New System.Drawing.Size(493, 452)
|
||||
Me.TabPage6.TabIndex = 4
|
||||
Me.TabPage6.Text = "Funimation"
|
||||
Me.TabPage6.VerticalScrollbarBarColor = True
|
||||
|
|
@ -1261,9 +1017,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox13.Controls.Add(Me.FunSubDef)
|
||||
Me.GroupBox13.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox13.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox13.Location = New System.Drawing.Point(6, 270)
|
||||
Me.GroupBox13.Location = New System.Drawing.Point(7, 270)
|
||||
Me.GroupBox13.Name = "GroupBox13"
|
||||
Me.GroupBox13.Size = New System.Drawing.Size(475, 69)
|
||||
Me.GroupBox13.Size = New System.Drawing.Size(480, 69)
|
||||
Me.GroupBox13.TabIndex = 56
|
||||
Me.GroupBox13.TabStop = False
|
||||
Me.GroupBox13.Text = "default subtitle"
|
||||
|
|
@ -1290,9 +1046,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox11.Controls.Add(Me.CB_vtt)
|
||||
Me.GroupBox11.Controls.Add(Me.CB_dfxp)
|
||||
Me.GroupBox11.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox11.Location = New System.Drawing.Point(6, 182)
|
||||
Me.GroupBox11.Location = New System.Drawing.Point(7, 182)
|
||||
Me.GroupBox11.Name = "GroupBox11"
|
||||
Me.GroupBox11.Size = New System.Drawing.Size(475, 82)
|
||||
Me.GroupBox11.Size = New System.Drawing.Size(480, 82)
|
||||
Me.GroupBox11.TabIndex = 54
|
||||
Me.GroupBox11.TabStop = False
|
||||
Me.GroupBox11.Text = "Soft-Subtitle Format"
|
||||
|
|
@ -1339,9 +1095,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox10.Controls.Add(Me.Fun_Dub_Over)
|
||||
Me.GroupBox10.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox10.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox10.Location = New System.Drawing.Point(6, 345)
|
||||
Me.GroupBox10.Location = New System.Drawing.Point(7, 345)
|
||||
Me.GroupBox10.Name = "GroupBox10"
|
||||
Me.GroupBox10.Size = New System.Drawing.Size(475, 69)
|
||||
Me.GroupBox10.Size = New System.Drawing.Size(480, 69)
|
||||
Me.GroupBox10.TabIndex = 55
|
||||
Me.GroupBox10.TabStop = False
|
||||
Me.GroupBox10.Text = "Funimation Dub"
|
||||
|
|
@ -1367,9 +1123,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox7.Controls.Add(Me.CB_Fun_HardSubs)
|
||||
Me.GroupBox7.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox7.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox7.Location = New System.Drawing.Point(3, 6)
|
||||
Me.GroupBox7.Location = New System.Drawing.Point(7, 6)
|
||||
Me.GroupBox7.Name = "GroupBox7"
|
||||
Me.GroupBox7.Size = New System.Drawing.Size(478, 69)
|
||||
Me.GroupBox7.Size = New System.Drawing.Size(480, 69)
|
||||
Me.GroupBox7.TabIndex = 54
|
||||
Me.GroupBox7.TabStop = False
|
||||
Me.GroupBox7.Text = "Hard Subtitle (post-processed)"
|
||||
|
|
@ -1396,9 +1152,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox9.Controls.Add(Me.CB_fun_es)
|
||||
Me.GroupBox9.Controls.Add(Me.CB_fun_ptbr)
|
||||
Me.GroupBox9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GroupBox9.Location = New System.Drawing.Point(3, 81)
|
||||
Me.GroupBox9.Location = New System.Drawing.Point(7, 81)
|
||||
Me.GroupBox9.Name = "GroupBox9"
|
||||
Me.GroupBox9.Size = New System.Drawing.Size(478, 95)
|
||||
Me.GroupBox9.Size = New System.Drawing.Size(480, 95)
|
||||
Me.GroupBox9.TabIndex = 53
|
||||
Me.GroupBox9.TabStop = False
|
||||
Me.GroupBox9.Text = "Soft-Subtitle"
|
||||
|
|
@ -1443,9 +1199,9 @@ Partial Class Einstellungen
|
|||
'
|
||||
Me.TabPage8.BackColor = System.Drawing.Color.Transparent
|
||||
Me.TabPage8.Controls.Add(Me.GroupBox8)
|
||||
Me.TabPage8.Location = New System.Drawing.Point(4, 35)
|
||||
Me.TabPage8.Location = New System.Drawing.Point(4, 44)
|
||||
Me.TabPage8.Name = "TabPage8"
|
||||
Me.TabPage8.Size = New System.Drawing.Size(493, 461)
|
||||
Me.TabPage8.Size = New System.Drawing.Size(493, 452)
|
||||
Me.TabPage8.TabIndex = 6
|
||||
Me.TabPage8.Text = " AoD"
|
||||
'
|
||||
|
|
@ -1457,9 +1213,9 @@ Partial Class Einstellungen
|
|||
Me.GroupBox8.Controls.Add(Me.AoD_1080_Plus)
|
||||
Me.GroupBox8.Font = New System.Drawing.Font("Arial", 9.75!)
|
||||
Me.GroupBox8.ForeColor = System.Drawing.Color.Black
|
||||
Me.GroupBox8.Location = New System.Drawing.Point(3, 15)
|
||||
Me.GroupBox8.Location = New System.Drawing.Point(7, 15)
|
||||
Me.GroupBox8.Name = "GroupBox8"
|
||||
Me.GroupBox8.Size = New System.Drawing.Size(487, 74)
|
||||
Me.GroupBox8.Size = New System.Drawing.Size(480, 74)
|
||||
Me.GroupBox8.TabIndex = 39
|
||||
Me.GroupBox8.TabStop = False
|
||||
Me.GroupBox8.Text = "Anime on Demand unique resolution "
|
||||
|
|
@ -1515,9 +1271,9 @@ Partial Class Einstellungen
|
|||
Me.TabPage7.Controls.Add(Me.Label4)
|
||||
Me.TabPage7.Controls.Add(Me.Label6)
|
||||
Me.TabPage7.Controls.Add(Me.Label5)
|
||||
Me.TabPage7.Location = New System.Drawing.Point(4, 35)
|
||||
Me.TabPage7.Location = New System.Drawing.Point(4, 44)
|
||||
Me.TabPage7.Name = "TabPage7"
|
||||
Me.TabPage7.Size = New System.Drawing.Size(493, 461)
|
||||
Me.TabPage7.Size = New System.Drawing.Size(493, 452)
|
||||
Me.TabPage7.TabIndex = 5
|
||||
Me.TabPage7.Text = "About "
|
||||
'
|
||||
|
|
@ -1633,12 +1389,30 @@ Partial Class Einstellungen
|
|||
'BackgroundWorker1
|
||||
'
|
||||
'
|
||||
'MetroTabPage1
|
||||
'
|
||||
Me.MetroTabPage1.Controls.Add(Me.GroupBox14)
|
||||
Me.MetroTabPage1.Controls.Add(Me.GB_SubLanguage)
|
||||
Me.MetroTabPage1.Controls.Add(Me.SoftSubs)
|
||||
Me.MetroTabPage1.Controls.Add(Me.PictureBox2)
|
||||
Me.MetroTabPage1.HorizontalScrollbarBarColor = True
|
||||
Me.MetroTabPage1.HorizontalScrollbarHighlightOnWheel = False
|
||||
Me.MetroTabPage1.HorizontalScrollbarSize = 10
|
||||
Me.MetroTabPage1.Location = New System.Drawing.Point(4, 44)
|
||||
Me.MetroTabPage1.Name = "MetroTabPage1"
|
||||
Me.MetroTabPage1.Size = New System.Drawing.Size(493, 452)
|
||||
Me.MetroTabPage1.TabIndex = 7
|
||||
Me.MetroTabPage1.Text = "Crunchyroll"
|
||||
Me.MetroTabPage1.VerticalScrollbarBarColor = True
|
||||
Me.MetroTabPage1.VerticalScrollbarHighlightOnWheel = False
|
||||
Me.MetroTabPage1.VerticalScrollbarSize = 10
|
||||
'
|
||||
'Einstellungen
|
||||
'
|
||||
Me.ApplyImageInvert = True
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None
|
||||
Me.BorderStyle = MetroFramework.Forms.MetroFormBorderStyle.FixedSingle
|
||||
Me.ClientSize = New System.Drawing.Size(545, 625)
|
||||
Me.ClientSize = New System.Drawing.Size(546, 625)
|
||||
Me.Controls.Add(Me.TabControl1)
|
||||
Me.Controls.Add(Me.pictureBox4)
|
||||
Me.Controls.Add(Me.pictureBox1)
|
||||
|
|
@ -1653,20 +1427,11 @@ Partial Class Einstellungen
|
|||
Me.TextAlign = MetroFramework.Forms.MetroFormTextAlign.Center
|
||||
CType(Me.pictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.pictureBox4, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.TabPage4.ResumeLayout(False)
|
||||
Me.TabControl2.ResumeLayout(False)
|
||||
Me.TabPage5.ResumeLayout(False)
|
||||
Me.TabPage5.PerformLayout()
|
||||
Me.GroupBox14.ResumeLayout(False)
|
||||
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.SoftSubs.ResumeLayout(False)
|
||||
Me.SoftSubs.PerformLayout()
|
||||
Me.GB_SubLanguage.ResumeLayout(False)
|
||||
Me.TabPage3.ResumeLayout(False)
|
||||
Me.GroupBox3.ResumeLayout(False)
|
||||
CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.MultiDLSoftSubs.ResumeLayout(False)
|
||||
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.TabPage2.ResumeLayout(False)
|
||||
Me.TabPage2.PerformLayout()
|
||||
Me.GroupBox12.ResumeLayout(False)
|
||||
|
|
@ -1702,6 +1467,8 @@ Partial Class Einstellungen
|
|||
Me.GroupBox8.PerformLayout()
|
||||
Me.TabPage7.ResumeLayout(False)
|
||||
CType(Me.PictureBox7, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.MetroTabPage1.ResumeLayout(False)
|
||||
Me.MetroTabPage1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
|
|
@ -1710,11 +1477,6 @@ Partial Class Einstellungen
|
|||
Private WithEvents pictureBox1 As PictureBox
|
||||
Private WithEvents pictureBox4 As PictureBox
|
||||
Friend WithEvents ToolTip2 As ToolTip
|
||||
Friend WithEvents TabPage4 As TabPage
|
||||
Public WithEvents GroupBox3 As GroupBox
|
||||
Public WithEvents PictureBox5 As PictureBox
|
||||
Public WithEvents MultiDLSoftSubs As GroupBox
|
||||
Public WithEvents PictureBox3 As PictureBox
|
||||
Friend WithEvents GroupBox2 As GroupBox
|
||||
Friend WithEvents Panel1 As Panel
|
||||
Friend WithEvents MenuStrip1 As MenuStrip
|
||||
|
|
@ -1747,9 +1509,6 @@ Partial Class Einstellungen
|
|||
Friend WithEvents GroupBox4 As GroupBox
|
||||
Friend WithEvents GroupBox6 As GroupBox
|
||||
Friend WithEvents NumericUpDown2 As NumericUpDown
|
||||
Private WithEvents TabControl2 As MetroFramework.Controls.MetroTabControl
|
||||
Private WithEvents TabPage5 As MetroFramework.Controls.MetroTabPage
|
||||
Private WithEvents TabPage3 As MetroFramework.Controls.MetroTabPage
|
||||
Private WithEvents TabPage2 As MetroFramework.Controls.MetroTabPage
|
||||
Private WithEvents TabPage1 As MetroFramework.Controls.MetroTabPage
|
||||
Private WithEvents TabControl1 As MetroFramework.Controls.MetroTabControl
|
||||
|
|
@ -1764,8 +1523,6 @@ Partial Class Einstellungen
|
|||
Friend WithEvents GroupBox11 As GroupBox
|
||||
Friend WithEvents GroupBox12 As GroupBox
|
||||
Friend WithEvents Button1 As Button
|
||||
Public WithEvents StatusLabel As MetroFramework.Controls.MetroLabel
|
||||
Public WithEvents SoftSubsMass As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents ListViewAdd_True As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents Label1 As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents MergeMP4 As MetroFramework.Controls.MetroCheckBox
|
||||
|
|
@ -1804,10 +1561,6 @@ Partial Class Einstellungen
|
|||
Public WithEvents Label3 As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents MetroLabel1 As MetroFramework.Controls.MetroLabel
|
||||
Friend WithEvents DarkMode As MetroFramework.Controls.MetroCheckBox
|
||||
Public WithEvents TextBox2 As MetroFramework.Controls.MetroTextBox
|
||||
Public WithEvents comboBox4 As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents ComboBox2 As MetroFramework.Controls.MetroComboBox
|
||||
Public WithEvents comboBox3 As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents TextBox1 As MetroFramework.Controls.MetroTextBox
|
||||
Friend WithEvents ComboBox1 As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents CB_Fun_HardSubs As MetroFramework.Controls.MetroComboBox
|
||||
|
|
@ -1824,4 +1577,5 @@ Partial Class Einstellungen
|
|||
Friend WithEvents CR_SoftSubDefault As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents CB_Format As MetroFramework.Controls.MetroComboBox
|
||||
Friend WithEvents HybridMode_CB As MetroFramework.Controls.MetroCheckBox
|
||||
Friend WithEvents MetroTabPage1 As MetroFramework.Controls.MetroTabPage
|
||||
End Class
|
||||
|
|
|
|||
|
|
@ -727,7 +727,7 @@ Public Class Einstellungen
|
|||
End Sub
|
||||
|
||||
|
||||
Private Sub ComboBox1_DrawItem(sender As Object, e As DrawItemEventArgs) Handles ComboBox1.DrawItem, ComboBox2.DrawItem, comboBox3.DrawItem, comboBox4.DrawItem, CB_Fun_HardSubs.DrawItem, Fun_Dub_Over.DrawItem, CR_Filename.DrawItem
|
||||
Private Sub ComboBox1_DrawItem(sender As Object, e As DrawItemEventArgs) Handles ComboBox1.DrawItem, CB_Fun_HardSubs.DrawItem, Fun_Dub_Over.DrawItem, CR_Filename.DrawItem
|
||||
Dim CB As ComboBox = sender
|
||||
CB.BackColor = Color.White
|
||||
If e.Index >= 0 Then
|
||||
|
|
@ -779,109 +779,11 @@ Public Class Einstellungen
|
|||
|
||||
|
||||
|
||||
Private Sub PictureBox5_Click(sender As Object, e As EventArgs) Handles PictureBox5.Click
|
||||
If Main.SoftSubs.Count > 0 Then
|
||||
If CBool(InStr(TextBox2.Text, "crunchyroll.com")) Then
|
||||
GeckoFX.WebBrowser1.Navigate(TextBox2.Text)
|
||||
StatusLabel.Text = "Status: looking for subtitles"
|
||||
Main.d = False
|
||||
Main.b = False
|
||||
End If
|
||||
Else
|
||||
Main.TempSoftSubs.Clear()
|
||||
If CBdeDE.Checked = True Then
|
||||
Main.TempSoftSubs.Add("deDE")
|
||||
End If
|
||||
If CBenUS.Checked = True Then
|
||||
Main.TempSoftSubs.Add("enUS")
|
||||
End If
|
||||
If CBptBR.Checked = True Then
|
||||
Main.TempSoftSubs.Add("ptBR")
|
||||
End If
|
||||
If CBesLA.Checked = True Then
|
||||
Main.TempSoftSubs.Add("esLA")
|
||||
End If
|
||||
If CBfrFR.Checked = True Then
|
||||
Main.TempSoftSubs.Add("frFR")
|
||||
End If
|
||||
If CBarME.Checked = True Then
|
||||
Main.TempSoftSubs.Add("arME")
|
||||
End If
|
||||
If CBruRU.Checked = True Then
|
||||
Main.TempSoftSubs.Add("ruRU")
|
||||
End If
|
||||
If CBitIT.Checked = True Then
|
||||
Main.TempSoftSubs.Add("itIT")
|
||||
End If
|
||||
If CBesES.Checked = True Then
|
||||
Main.TempSoftSubs.Add("esES")
|
||||
End If
|
||||
If Main.TempSoftSubs.Count > 0 Then
|
||||
|
||||
If CBool(InStr(TextBox2.Text, "crunchyroll.com")) Then
|
||||
GeckoFX.WebBrowser1.Navigate(TextBox2.Text)
|
||||
StatusLabel.Text = "Status: looking for subtitles"
|
||||
Main.d = False
|
||||
Main.b = False
|
||||
End If
|
||||
Else
|
||||
StatusLabel.Text = "Status: No language selected"
|
||||
Pause(3)
|
||||
StatusLabel.Text = "Status: idle"
|
||||
End If
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub PictureBox3_Click(sender As Object, e As EventArgs) Handles PictureBox3.Click
|
||||
Main.MassSubsDL()
|
||||
End Sub
|
||||
|
||||
Private Sub PictureBox3_MouseEnter(sender As Object, e As EventArgs) Handles PictureBox3.MouseEnter
|
||||
PictureBox3.Image = My.Resources.softsubs_download_hover
|
||||
End Sub
|
||||
|
||||
Private Sub PictureBox3_MouseLeave(sender As Object, e As EventArgs) Handles PictureBox3.MouseLeave
|
||||
PictureBox3.Image = My.Resources.softsubs_download
|
||||
End Sub
|
||||
Private Sub PictureBox5_MouseEnter(sender As Object, e As EventArgs) Handles PictureBox5.MouseEnter
|
||||
PictureBox5.Image = My.Resources.softsubs_download_hover
|
||||
End Sub
|
||||
|
||||
Private Sub PictureBox5_MouseLeave(sender As Object, e As EventArgs) Handles PictureBox5.MouseLeave
|
||||
PictureBox5.Image = My.Resources.softsubs_download
|
||||
End Sub
|
||||
|
||||
Private Sub TextBox2_Click(sender As Object, e As EventArgs) Handles TextBox2.Click
|
||||
If TextBox2.Text = "URL" Then
|
||||
TextBox2.Text = Nothing
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ComboBox2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox2.SelectedIndexChanged
|
||||
|
||||
comboBox3.Items.Clear()
|
||||
comboBox4.Items.Clear()
|
||||
Dim SeasonDropdownAnzahl As String() = Main.WebbrowserText.Split(New String() {"season-dropdown content-menu block"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Array.Reverse(SeasonDropdownAnzahl)
|
||||
Dim SDV As Integer = 0
|
||||
For i As Integer = 0 To SeasonDropdownAnzahl.Count - 1
|
||||
If InStr(SeasonDropdownAnzahl(i), Chr(34) + ">" + ComboBox2.SelectedItem.ToString + "</a>") Then
|
||||
SDV = i
|
||||
End If
|
||||
Next
|
||||
Dim Anzahl As String() = SeasonDropdownAnzahl(SDV).Split(New String() {"wrapper container-shadow hover-classes"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim c As Integer = Anzahl.Count - 1
|
||||
Array.Reverse(Anzahl)
|
||||
For i As Integer = 0 To Anzahl.Count - 2
|
||||
Dim URLGrapp As String() = Anzahl(i).Split(New String() {"title=" + Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
Dim URLGrapp2 As String() = URLGrapp(1).Split(New String() {Chr(34)}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
comboBox3.Items.Add(URLGrapp2(0))
|
||||
comboBox4.Items.Add(URLGrapp2(0))
|
||||
Next
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged
|
||||
|
|
@ -963,7 +865,6 @@ Public Class Einstellungen
|
|||
GB_Resolution.ForeColor = color
|
||||
GroupBox1.ForeColor = color
|
||||
GroupBox2.ForeColor = color
|
||||
GroupBox3.ForeColor = color
|
||||
GroupBox5.ForeColor = color
|
||||
GroupBox6.ForeColor = color
|
||||
GroupBox7.ForeColor = color
|
||||
|
|
|
|||
|
|
@ -125,7 +125,8 @@ Public Class network_scan
|
|||
Dim startinfo As New System.Diagnostics.ProcessStartInfo
|
||||
Dim sr As StreamReader
|
||||
Dim cmd As String = "-headers " + My.Resources.ffmpeg_user_agend + " -i " + Chr(34) + ComboBox2.Text + Chr(34) 'start ffmpeg with command strFFCMD string
|
||||
'
|
||||
|
||||
'MsgBox(cmd)
|
||||
Dim ffmpegOutput As String = Nothing
|
||||
Dim ffmpegOutputLine As String = Nothing
|
||||
Dim ffmpegOutputLine2 As String = Nothing
|
||||
|
|
@ -160,7 +161,18 @@ Public Class network_scan
|
|||
Dim ZeileReso3() As String = ffmpegOutput2(i).Split(New String() {": Video:"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
Dim ZeileReso4() As String = ZeileReso3(0).Split(New String() {"Stream #"}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
|
||||
ComboBox3.Items.Add(ZeileReso2(ZeileReso2.Count - 1).Trim + ":--:" + ZeileReso4(1))
|
||||
|
||||
If InStr(ZeileReso2(ZeileReso2.Count - 1), ", ") Then
|
||||
Dim ZeileReso5() As String = ZeileReso2(ZeileReso2.Count - 1).Split(New String() {", "}, System.StringSplitOptions.RemoveEmptyEntries)
|
||||
ComboBox3.Items.Add(ZeileReso5(0).Trim + ":--:" + ZeileReso4(1))
|
||||
|
||||
Else
|
||||
ComboBox3.Items.Add(ZeileReso2(ZeileReso2.Count - 1).Trim + ":--:" + ZeileReso4(1))
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
ElseIf InStr(ffmpegOutput2(i), "Duration: N/A, bitrate: N/A") Then
|
||||
|
||||
ElseIf InStr(ffmpegOutput2(i), "Subtitle: ") Then
|
||||
|
|
|
|||
Binary file not shown.
Binary file not shown.
Binary file not shown.
Loading…
Reference in New Issue
Block a user