mirror of
https://github.com/AAndyProgram/SCrawler.git
synced 2026-03-14 15:52:18 +00:00
Plugins.Attributes: add 'DependentFields' attribute Plugins.IPluginContentProvider: add 'Options' and 'IsSubscription' properties Plugins.ISiteSettings: add 'SubscriptionsAllowed' property Plugins.ExchangeOptions: add 'Options' field Plugins.Attributes.PropertyUpdater: replace 'Dependencies' with 'Arguments' YT: add 'OutputPathAskForName' and 'OutputPathAutoAddPaths' properties; add the ability to store download locations; add 'DownloadLocation' and 'DownloadLocationsCollection' objects YT.IDownloaderSettings: add 'OutputPathAskForName' and 'OutputPathAutoAddPaths' properties YT.Downloader: fixed bug with re-saving elements when loading a video list; fixed bug when files were not deleted when clicking on the delete button; fixed a bug that caused the video to redownload; download job removes elements at wrong indexes; added skipping of downloaded elements in the job; fixed a bug, pending option did not change after download complete YT.YouTubeMediaContainerBase: add '_MediaStateOnLoad' field and 'NeedToSave' function; update the 'Save' function to prevent saving a file when a download is complete and the file has already been saved; update code for new yt-dlp version Fixed cache deletion errors Add user queue Add global locations API.Base.SiteSettingsBase: implement 'SubscriptionsAllowed' property; remove request headers with null values on save; add '_AllowUserAgentUpdate' parameter API.Base.Structures: add 'SiteModes' enum API.Base.UserDataBase: add 'Erase' button; implement 'Options' and 'IsSubscription' properties; add 'SpecialLabels' property; update 'LVIKey'; update 'FitToAddParams' function; add 'EraseData' function; user colors; Not UserExists notification, UserQueue support API.Base: add 'DeclaredNames' API.Instagram: remove default values for headers; disable updating UserAgent from global; check for a new username for non-existent users API.Mastodon: bypass new inherited twitter options; update names and headers API.OnlyFans: make 'HH_BROWSER' property nullable; remove 'HH_BROWSER' from required; fix username bug (dots); handling of 504 and 429 errors; add 'DownloadHighlights' and 'DownloadChatMedia' options; add 'UserExchangeOptions'; fixed incorrect error handler API.PathPlugin: fixed incorrect detection of path existence API.Pinterest: add 'SpecialLabels' API.PornHub: add new video regex; remove old regex; added 'DownloadUploaded', 'DownloadTagged', 'DownloadPrivate' and 'DownloadFavorite' properties to 'SiteSettings', 'UserData' and 'UserExchangeOptions'; update regex to define user; added downloading search queries; update 'GetUserUrl' function; hide unnecessary 'RegexFieldsTextBecameNullException' errors; add subscriptions API.Reddit: add 'SpecialLabels'; add bearer token and its refresh interval; add OAuth; add additional options API.RedGifs: add 'DependentFields' for 'Token' API.ThisVid: add 'DownloadFavourite' option; add downloading search queries, tags, categories; add 'SpecialLabels'; add subscriptions; updating cookies issue API.TikTok: rewrite algorithms API.Twitter: add 'UseAppropriateModel', 'UseNewEndPointSearch', 'UseNewEndPointProfiles', 'AbortOnLimit', 'DownloadAlreadyParsed', 'MediaModelAllowNonUserTweets' properties; remove old commented code; remove 'TwitterPic_400' and replace with 'TwitterIcon_32.ToBitmap'; add 'DownloadModelForceApply' user option; update environment to GDL 1.25.8; fixed gifs downloading; fix typo in 'ReparseMissing'; update names API.UserDataBind: prevent adding site-specific labels when adding to a collection API.Xhamster: add downloading search queries, tags, categories; add 'SpecialLabels'; add additional nodes for channels; add subscriptions API.XVIDEOS: add downloading search queries, tags, categories; add 'SpecialLabels'; add subscriptions; changed users creation method; add subscriptions API.YouTube: add subscriptions AutoDownloader: add new group subscription options; update predicates; fixed excluded labels and sites in default mode; update notifications; add an additional skip options, add 'Force start' option DownloadedInfoForm: add subscriptions; fixed size/location bug; hide unnecessary error (refill) Feed: add subscriptions; update filters; add 'Ctrl+G' shortcut FeedMedia: add subscriptions; fixed 'webm' bug; add title for subscription media; add site icon to post; user colors; always using 'FriendlyName' instead of 'UserName' if it exists DownloadGroup, GroupDefaults, GroupParameters: add subscription and 'UsersCount' options MissingPostsForm: add 'BTT_DELETE_ALL' VideoDownloaderForm, DownloaderUrlForm, DownloaderUrlsArrForm: add download locations support VideoDownloaderForm: add subscriptions support GlobalSettingsForm: add new properties UserCreatorForm: add subscriptions; add 'Options' support (of 'ExchangeOptions'); user colors ListImagesLoader: add subscription colors; user colors MainFrame: add subscriptions; add filters by subscription and user; update predicates NuGet: update 'LibVLCSharp', 'LibVLCSharp.WinForms', 'VideoLAN.LibVLC.Windows' DownloadableMediaHost: update 'Save' function PropertyValueHost: fix 'CaptionWidth' bug; add 'Dependents' SettingsHost: add 'Dependents' UserDataHost: add 'Options' and 'IsSubscription' properties SettingsCLS: implement new 'IDownloaderSettings' properties; add 'CacheSnapshots'; add 'DownloadLocations'; add new properties UserInfo, UserFinder: add subscriptions UserSearchForm: fixed search by name bug
321 lines
18 KiB
VB.net
321 lines
18 KiB
VB.net
' Copyright (C) 2023 Andy https://github.com/AAndyProgram
|
|
' This program is free software: you can redistribute it and/or modify
|
|
' it under the terms of the GNU General Public License as published by
|
|
' the Free Software Foundation, either version 3 of the License, or
|
|
' (at your option) any later version.
|
|
'
|
|
' This program is distributed in the hope that it will be useful,
|
|
' but WITHOUT ANY WARRANTY
|
|
Namespace DownloadObjects.STDownloader
|
|
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
|
Partial Public Class VideoListForm : Inherits System.Windows.Forms.Form
|
|
<System.Diagnostics.DebuggerNonUserCode()>
|
|
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
|
Try
|
|
If disposing AndAlso components IsNot Nothing Then
|
|
components.Dispose()
|
|
End If
|
|
Finally
|
|
MyBase.Dispose(disposing)
|
|
End Try
|
|
End Sub
|
|
Private components As System.ComponentModel.IContainer
|
|
<System.Diagnostics.DebuggerStepThrough()>
|
|
Private Sub InitializeComponent()
|
|
Dim SEP_2 As System.Windows.Forms.ToolStripSeparator
|
|
Dim SEP_3 As System.Windows.Forms.ToolStripSeparator
|
|
Dim MENU_ADD_SEP_1 As System.Windows.Forms.ToolStripSeparator
|
|
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(VideoListForm))
|
|
Me.TOOLBAR_BOTTOM = New System.Windows.Forms.StatusStrip()
|
|
Me.PR_MAIN = New System.Windows.Forms.ToolStripProgressBar()
|
|
Me.LBL_INFO = New System.Windows.Forms.ToolStripStatusLabel()
|
|
Me.TP_CONTROLS = New System.Windows.Forms.TableLayoutPanel()
|
|
Me.TOOLBAR_TOP = New System.Windows.Forms.ToolStrip()
|
|
Me.BTT_SETTINGS = New System.Windows.Forms.ToolStripButton()
|
|
Me.SEP_1 = New System.Windows.Forms.ToolStripSeparator()
|
|
Me.MENU_ADD = New System.Windows.Forms.ToolStripDropDownButton()
|
|
Me.BTT_ADD = New PersonalUtilities.Forms.Controls.KeyClick.ToolStripMenuItemKeyClick()
|
|
Me.BTT_ADD_PLS_ARR = New PersonalUtilities.Forms.Controls.KeyClick.ToolStripMenuItemKeyClick()
|
|
Me.BTT_ADD_NO_SHORTS = New PersonalUtilities.Forms.Controls.KeyClick.ToolStripMenuItemKeyClick()
|
|
Me.BTT_ADD_SHORTS_ONLY = New PersonalUtilities.Forms.Controls.KeyClick.ToolStripMenuItemKeyClick()
|
|
Me.BTT_DOWN = New System.Windows.Forms.ToolStripButton()
|
|
Me.BTT_STOP = New System.Windows.Forms.ToolStripButton()
|
|
Me.BTT_DELETE = New System.Windows.Forms.ToolStripButton()
|
|
Me.BTT_CLEAR_DONE = New System.Windows.Forms.ToolStripButton()
|
|
Me.BTT_CLEAR_ALL = New System.Windows.Forms.ToolStripButton()
|
|
Me.SEP_LOG = New System.Windows.Forms.ToolStripSeparator()
|
|
Me.BTT_LOG = New System.Windows.Forms.ToolStripButton()
|
|
Me.BTT_INFO = New System.Windows.Forms.ToolStripButton()
|
|
Me.BTT_DONATE = New System.Windows.Forms.ToolStripButton()
|
|
Me.BTT_BUG_REPORT = New System.Windows.Forms.ToolStripButton()
|
|
SEP_2 = New System.Windows.Forms.ToolStripSeparator()
|
|
SEP_3 = New System.Windows.Forms.ToolStripSeparator()
|
|
MENU_ADD_SEP_1 = New System.Windows.Forms.ToolStripSeparator()
|
|
Me.TOOLBAR_BOTTOM.SuspendLayout()
|
|
Me.TOOLBAR_TOP.SuspendLayout()
|
|
Me.SuspendLayout()
|
|
'
|
|
'SEP_2
|
|
'
|
|
SEP_2.Name = "SEP_2"
|
|
SEP_2.Size = New System.Drawing.Size(6, 25)
|
|
'
|
|
'SEP_3
|
|
'
|
|
SEP_3.Name = "SEP_3"
|
|
SEP_3.Size = New System.Drawing.Size(6, 25)
|
|
'
|
|
'MENU_ADD_SEP_1
|
|
'
|
|
MENU_ADD_SEP_1.Name = "MENU_ADD_SEP_1"
|
|
MENU_ADD_SEP_1.Size = New System.Drawing.Size(181, 6)
|
|
'
|
|
'TOOLBAR_BOTTOM
|
|
'
|
|
Me.TOOLBAR_BOTTOM.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.PR_MAIN, Me.LBL_INFO})
|
|
Me.TOOLBAR_BOTTOM.Location = New System.Drawing.Point(0, 439)
|
|
Me.TOOLBAR_BOTTOM.Name = "TOOLBAR_BOTTOM"
|
|
Me.TOOLBAR_BOTTOM.Size = New System.Drawing.Size(584, 22)
|
|
Me.TOOLBAR_BOTTOM.TabIndex = 0
|
|
'
|
|
'PR_MAIN
|
|
'
|
|
Me.PR_MAIN.Name = "PR_MAIN"
|
|
Me.PR_MAIN.Size = New System.Drawing.Size(200, 16)
|
|
'
|
|
'LBL_INFO
|
|
'
|
|
Me.LBL_INFO.Name = "LBL_INFO"
|
|
Me.LBL_INFO.Size = New System.Drawing.Size(0, 17)
|
|
'
|
|
'TP_CONTROLS
|
|
'
|
|
Me.TP_CONTROLS.AutoScroll = True
|
|
Me.TP_CONTROLS.BackColor = System.Drawing.SystemColors.Window
|
|
Me.TP_CONTROLS.ColumnCount = 1
|
|
Me.TP_CONTROLS.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
|
|
Me.TP_CONTROLS.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.TP_CONTROLS.Location = New System.Drawing.Point(0, 25)
|
|
Me.TP_CONTROLS.Name = "TP_CONTROLS"
|
|
Me.TP_CONTROLS.RowCount = 1
|
|
Me.TP_CONTROLS.RowStyles.Add(New System.Windows.Forms.RowStyle())
|
|
Me.TP_CONTROLS.Size = New System.Drawing.Size(584, 414)
|
|
Me.TP_CONTROLS.TabIndex = 0
|
|
'
|
|
'TOOLBAR_TOP
|
|
'
|
|
Me.TOOLBAR_TOP.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
|
|
Me.TOOLBAR_TOP.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BTT_SETTINGS, Me.SEP_1, Me.MENU_ADD, SEP_2, Me.BTT_DOWN, Me.BTT_STOP, SEP_3, Me.BTT_DELETE, Me.BTT_CLEAR_DONE, Me.BTT_CLEAR_ALL, Me.SEP_LOG, Me.BTT_LOG, Me.BTT_INFO, Me.BTT_DONATE, Me.BTT_BUG_REPORT})
|
|
Me.TOOLBAR_TOP.Location = New System.Drawing.Point(0, 0)
|
|
Me.TOOLBAR_TOP.Name = "TOOLBAR_TOP"
|
|
Me.TOOLBAR_TOP.Size = New System.Drawing.Size(584, 25)
|
|
Me.TOOLBAR_TOP.TabIndex = 2
|
|
'
|
|
'BTT_SETTINGS
|
|
'
|
|
Me.BTT_SETTINGS.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.BTT_SETTINGS.Image = Global.SCrawler.My.Resources.Resources.SettingsPic_16
|
|
Me.BTT_SETTINGS.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_SETTINGS.Name = "BTT_SETTINGS"
|
|
Me.BTT_SETTINGS.Size = New System.Drawing.Size(23, 22)
|
|
Me.BTT_SETTINGS.Text = "Settings"
|
|
'
|
|
'SEP_1
|
|
'
|
|
Me.SEP_1.Name = "SEP_1"
|
|
Me.SEP_1.Size = New System.Drawing.Size(6, 25)
|
|
'
|
|
'MENU_ADD
|
|
'
|
|
Me.MENU_ADD.AutoToolTip = False
|
|
Me.MENU_ADD.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BTT_ADD, Me.BTT_ADD_PLS_ARR, MENU_ADD_SEP_1, Me.BTT_ADD_NO_SHORTS, Me.BTT_ADD_SHORTS_ONLY})
|
|
Me.MENU_ADD.Image = CType(resources.GetObject("MENU_ADD.Image"), System.Drawing.Image)
|
|
Me.MENU_ADD.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.MENU_ADD.Name = "MENU_ADD"
|
|
Me.MENU_ADD.Size = New System.Drawing.Size(84, 22)
|
|
Me.MENU_ADD.Text = "Add (Ins)"
|
|
'
|
|
'BTT_ADD
|
|
'
|
|
Me.BTT_ADD.AutoToolTip = True
|
|
Me.BTT_ADD.Image = CType(resources.GetObject("BTT_ADD.Image"), System.Drawing.Image)
|
|
Me.BTT_ADD.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_ADD.Name = "BTT_ADD"
|
|
Me.BTT_ADD.Size = New System.Drawing.Size(184, 22)
|
|
Me.BTT_ADD.Tag = "a"
|
|
Me.BTT_ADD.Text = "Add (Ins)"
|
|
Me.BTT_ADD.ToolTipText = "Click to add." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Ctrl+click to use cookies for download (if supported)." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Shift to a" &
|
|
"dd without downloading."
|
|
'
|
|
'BTT_ADD_PLS_ARR
|
|
'
|
|
Me.BTT_ADD_PLS_ARR.AutoToolTip = True
|
|
Me.BTT_ADD_PLS_ARR.Image = CType(resources.GetObject("BTT_ADD_PLS_ARR.Image"), System.Drawing.Image)
|
|
Me.BTT_ADD_PLS_ARR.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_ADD_PLS_ARR.Name = "BTT_ADD_PLS_ARR"
|
|
Me.BTT_ADD_PLS_ARR.Size = New System.Drawing.Size(184, 22)
|
|
Me.BTT_ADD_PLS_ARR.Tag = "pls"
|
|
Me.BTT_ADD_PLS_ARR.Text = "Add playlist array"
|
|
Me.BTT_ADD_PLS_ARR.ToolTipText = "Click to add." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Ctrl+click to use cookies for download (if supported)." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Shift to a" &
|
|
"dd without downloading."
|
|
'
|
|
'BTT_ADD_NO_SHORTS
|
|
'
|
|
Me.BTT_ADD_NO_SHORTS.AutoToolTip = True
|
|
Me.BTT_ADD_NO_SHORTS.Image = CType(resources.GetObject("BTT_ADD_NO_SHORTS.Image"), System.Drawing.Image)
|
|
Me.BTT_ADD_NO_SHORTS.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_ADD_NO_SHORTS.Name = "BTT_ADD_NO_SHORTS"
|
|
Me.BTT_ADD_NO_SHORTS.Size = New System.Drawing.Size(184, 22)
|
|
Me.BTT_ADD_NO_SHORTS.Tag = "ans"
|
|
Me.BTT_ADD_NO_SHORTS.Text = "Add (without Shorts)"
|
|
Me.BTT_ADD_NO_SHORTS.ToolTipText = "Download all videos except 'Shorts'." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Click to add." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Ctrl+click to use cookies fo" &
|
|
"r download (if supported)." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Shift to add without downloading."
|
|
'
|
|
'BTT_ADD_SHORTS_ONLY
|
|
'
|
|
Me.BTT_ADD_SHORTS_ONLY.AutoToolTip = True
|
|
Me.BTT_ADD_SHORTS_ONLY.Image = CType(resources.GetObject("BTT_ADD_SHORTS_ONLY.Image"), System.Drawing.Image)
|
|
Me.BTT_ADD_SHORTS_ONLY.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_ADD_SHORTS_ONLY.Name = "BTT_ADD_SHORTS_ONLY"
|
|
Me.BTT_ADD_SHORTS_ONLY.Size = New System.Drawing.Size(184, 22)
|
|
Me.BTT_ADD_SHORTS_ONLY.Tag = "as"
|
|
Me.BTT_ADD_SHORTS_ONLY.Text = "Add (Shorts only)"
|
|
Me.BTT_ADD_SHORTS_ONLY.ToolTipText = "Download only 'Shorts' videos." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Click to add." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Ctrl+click to use cookies for down" &
|
|
"load (if supported)." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Shift to add without downloading."
|
|
'
|
|
'BTT_DOWN
|
|
'
|
|
Me.BTT_DOWN.Image = Global.SCrawler.My.Resources.Resources.StartPic_Green_16
|
|
Me.BTT_DOWN.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_DOWN.Name = "BTT_DOWN"
|
|
Me.BTT_DOWN.Size = New System.Drawing.Size(81, 22)
|
|
Me.BTT_DOWN.Text = "Download"
|
|
Me.BTT_DOWN.ToolTipText = "Download pending items (F5)"
|
|
'
|
|
'BTT_STOP
|
|
'
|
|
Me.BTT_STOP.AutoToolTip = False
|
|
Me.BTT_STOP.Enabled = False
|
|
Me.BTT_STOP.Image = CType(resources.GetObject("BTT_STOP.Image"), System.Drawing.Image)
|
|
Me.BTT_STOP.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_STOP.Name = "BTT_STOP"
|
|
Me.BTT_STOP.Size = New System.Drawing.Size(51, 22)
|
|
Me.BTT_STOP.Text = "Stop"
|
|
'
|
|
'BTT_DELETE
|
|
'
|
|
Me.BTT_DELETE.Image = CType(resources.GetObject("BTT_DELETE.Image"), System.Drawing.Image)
|
|
Me.BTT_DELETE.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_DELETE.Name = "BTT_DELETE"
|
|
Me.BTT_DELETE.Size = New System.Drawing.Size(60, 22)
|
|
Me.BTT_DELETE.Text = "Delete"
|
|
Me.BTT_DELETE.ToolTipText = "Delete selected items"
|
|
'
|
|
'BTT_CLEAR_DONE
|
|
'
|
|
Me.BTT_CLEAR_DONE.Image = CType(resources.GetObject("BTT_CLEAR_DONE.Image"), System.Drawing.Image)
|
|
Me.BTT_CLEAR_DONE.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_CLEAR_DONE.Name = "BTT_CLEAR_DONE"
|
|
Me.BTT_CLEAR_DONE.Size = New System.Drawing.Size(54, 22)
|
|
Me.BTT_CLEAR_DONE.Text = "Clear"
|
|
Me.BTT_CLEAR_DONE.ToolTipText = "Remove all downloaded items"
|
|
'
|
|
'BTT_CLEAR_ALL
|
|
'
|
|
Me.BTT_CLEAR_ALL.Image = CType(resources.GetObject("BTT_CLEAR_ALL.Image"), System.Drawing.Image)
|
|
Me.BTT_CLEAR_ALL.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_CLEAR_ALL.Name = "BTT_CLEAR_ALL"
|
|
Me.BTT_CLEAR_ALL.Size = New System.Drawing.Size(69, 22)
|
|
Me.BTT_CLEAR_ALL.Text = "Clear all"
|
|
Me.BTT_CLEAR_ALL.ToolTipText = "Remove all items (pending and downloaded)"
|
|
'
|
|
'SEP_LOG
|
|
'
|
|
Me.SEP_LOG.Name = "SEP_LOG"
|
|
Me.SEP_LOG.Size = New System.Drawing.Size(6, 25)
|
|
'
|
|
'BTT_LOG
|
|
'
|
|
Me.BTT_LOG.AutoToolTip = False
|
|
Me.BTT_LOG.Image = CType(resources.GetObject("BTT_LOG.Image"), System.Drawing.Image)
|
|
Me.BTT_LOG.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_LOG.Name = "BTT_LOG"
|
|
Me.BTT_LOG.Size = New System.Drawing.Size(50, 22)
|
|
Me.BTT_LOG.Text = "LOG"
|
|
'
|
|
'BTT_INFO
|
|
'
|
|
Me.BTT_INFO.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
|
Me.BTT_INFO.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.BTT_INFO.Image = Global.SCrawler.My.Resources.Resources.InfoPic_32
|
|
Me.BTT_INFO.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_INFO.Name = "BTT_INFO"
|
|
Me.BTT_INFO.Size = New System.Drawing.Size(23, 22)
|
|
Me.BTT_INFO.ToolTipText = "Show program information and check for updates"
|
|
'
|
|
'BTT_DONATE
|
|
'
|
|
Me.BTT_DONATE.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
|
Me.BTT_DONATE.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.BTT_DONATE.Image = Global.SCrawler.My.Resources.Resources.HeartPic_32
|
|
Me.BTT_DONATE.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_DONATE.Name = "BTT_DONATE"
|
|
Me.BTT_DONATE.Size = New System.Drawing.Size(23, 22)
|
|
Me.BTT_DONATE.ToolTipText = "Support"
|
|
'
|
|
'BTT_BUG_REPORT
|
|
'
|
|
Me.BTT_BUG_REPORT.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
|
Me.BTT_BUG_REPORT.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
|
Me.BTT_BUG_REPORT.Image = Global.SCrawler.My.Resources.Resources.MailPic_16
|
|
Me.BTT_BUG_REPORT.ImageTransparentColor = System.Drawing.Color.Magenta
|
|
Me.BTT_BUG_REPORT.Name = "BTT_BUG_REPORT"
|
|
Me.BTT_BUG_REPORT.Size = New System.Drawing.Size(23, 22)
|
|
Me.BTT_BUG_REPORT.Text = "Bug report"
|
|
'
|
|
'VideoListForm
|
|
'
|
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
|
Me.ClientSize = New System.Drawing.Size(584, 461)
|
|
Me.Controls.Add(Me.TP_CONTROLS)
|
|
Me.Controls.Add(Me.TOOLBAR_TOP)
|
|
Me.Controls.Add(Me.TOOLBAR_BOTTOM)
|
|
Me.Icon = Global.SCrawler.My.Resources.SiteYouTube.YouTubeIcon_32
|
|
Me.KeyPreview = True
|
|
Me.MinimumSize = New System.Drawing.Size(300, 200)
|
|
Me.Name = "VideoListForm"
|
|
Me.Text = "YouTube Downloader"
|
|
Me.TOOLBAR_BOTTOM.ResumeLayout(False)
|
|
Me.TOOLBAR_BOTTOM.PerformLayout()
|
|
Me.TOOLBAR_TOP.ResumeLayout(False)
|
|
Me.TOOLBAR_TOP.PerformLayout()
|
|
Me.ResumeLayout(False)
|
|
Me.PerformLayout()
|
|
|
|
End Sub
|
|
|
|
Private WithEvents TOOLBAR_BOTTOM As StatusStrip
|
|
Private WithEvents PR_MAIN As ToolStripProgressBar
|
|
Private WithEvents LBL_INFO As ToolStripStatusLabel
|
|
Protected WithEvents TP_CONTROLS As TableLayoutPanel
|
|
Private WithEvents TOOLBAR_TOP As ToolStrip
|
|
Private WithEvents BTT_DELETE As ToolStripButton
|
|
Private WithEvents BTT_CLEAR_DONE As ToolStripButton
|
|
Private WithEvents BTT_CLEAR_ALL As ToolStripButton
|
|
Private WithEvents BTT_SETTINGS As ToolStripButton
|
|
Private WithEvents SEP_1 As ToolStripSeparator
|
|
Private WithEvents SEP_LOG As ToolStripSeparator
|
|
Private WithEvents BTT_LOG As ToolStripButton
|
|
Private WithEvents BTT_STOP As ToolStripButton
|
|
Private WithEvents BTT_INFO As ToolStripButton
|
|
Private WithEvents BTT_DONATE As ToolStripButton
|
|
Protected WithEvents BTT_ADD As PersonalUtilities.Forms.Controls.KeyClick.ToolStripMenuItemKeyClick
|
|
Protected WithEvents BTT_ADD_PLS_ARR As PersonalUtilities.Forms.Controls.KeyClick.ToolStripMenuItemKeyClick
|
|
Protected WithEvents BTT_ADD_NO_SHORTS As PersonalUtilities.Forms.Controls.KeyClick.ToolStripMenuItemKeyClick
|
|
Protected WithEvents BTT_ADD_SHORTS_ONLY As PersonalUtilities.Forms.Controls.KeyClick.ToolStripMenuItemKeyClick
|
|
Protected WithEvents MENU_ADD As ToolStripDropDownButton
|
|
Protected WithEvents BTT_DOWN As ToolStripButton
|
|
Private WithEvents BTT_BUG_REPORT As ToolStripButton
|
|
End Class
|
|
End Namespace |