113 lines
4.5 KiB
VB.net
113 lines
4.5 KiB
VB.net
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
|
Partial Class Browser
|
|
Inherits System.Windows.Forms.Form
|
|
|
|
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
|
<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
|
|
|
|
'Wird vom Windows Form-Designer benötigt.
|
|
Private components As System.ComponentModel.IContainer
|
|
|
|
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
|
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
|
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
|
<System.Diagnostics.DebuggerStepThrough()>
|
|
Private Sub InitializeComponent()
|
|
Me.components = New System.ComponentModel.Container()
|
|
Me.TextBox1 = New System.Windows.Forms.TextBox()
|
|
Me.Button1 = New System.Windows.Forms.Button()
|
|
Me.Panel1 = New System.Windows.Forms.Panel()
|
|
Me.WebView2 = New Microsoft.Web.WebView2.WinForms.WebView2()
|
|
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
|
|
Me.Timer2 = New System.Windows.Forms.Timer(Me.components)
|
|
Me.Panel1.SuspendLayout()
|
|
CType(Me.WebView2, System.ComponentModel.ISupportInitialize).BeginInit()
|
|
Me.SuspendLayout()
|
|
'
|
|
'TextBox1
|
|
'
|
|
Me.TextBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
|
|
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
|
Me.TextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
|
Me.TextBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
|
Me.TextBox1.Location = New System.Drawing.Point(114, 1)
|
|
Me.TextBox1.Name = "TextBox1"
|
|
Me.TextBox1.Size = New System.Drawing.Size(1153, 26)
|
|
Me.TextBox1.TabIndex = 1
|
|
'
|
|
'Button1
|
|
'
|
|
Me.Button1.Location = New System.Drawing.Point(12, 1)
|
|
Me.Button1.Name = "Button1"
|
|
Me.Button1.Size = New System.Drawing.Size(96, 26)
|
|
Me.Button1.TabIndex = 2
|
|
Me.Button1.Text = "Copy URL"
|
|
Me.Button1.UseVisualStyleBackColor = True
|
|
'
|
|
'Panel1
|
|
'
|
|
Me.Panel1.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.Panel1.Controls.Add(Me.WebView2)
|
|
Me.Panel1.Location = New System.Drawing.Point(0, 30)
|
|
Me.Panel1.Name = "Panel1"
|
|
Me.Panel1.Size = New System.Drawing.Size(1280, 720)
|
|
Me.Panel1.TabIndex = 4
|
|
'
|
|
'WebView2
|
|
'
|
|
Me.WebView2.AllowExternalDrop = True
|
|
Me.WebView2.CreationProperties = Nothing
|
|
Me.WebView2.DefaultBackgroundColor = System.Drawing.Color.White
|
|
Me.WebView2.Dock = System.Windows.Forms.DockStyle.Fill
|
|
Me.WebView2.Location = New System.Drawing.Point(0, 0)
|
|
Me.WebView2.Name = "WebView2"
|
|
Me.WebView2.Size = New System.Drawing.Size(1280, 720)
|
|
Me.WebView2.TabIndex = 0
|
|
Me.WebView2.ZoomFactor = 1.0R
|
|
'
|
|
'Timer1
|
|
'
|
|
Me.Timer1.Interval = 60000
|
|
'
|
|
'Timer2
|
|
'
|
|
Me.Timer2.Interval = 15000
|
|
'
|
|
'Browser
|
|
'
|
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
|
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
|
Me.ClientSize = New System.Drawing.Size(1279, 750)
|
|
Me.Controls.Add(Me.Panel1)
|
|
Me.Controls.Add(Me.Button1)
|
|
Me.Controls.Add(Me.TextBox1)
|
|
Me.MinimumSize = New System.Drawing.Size(480, 480)
|
|
Me.Name = "Browser"
|
|
Me.ShowIcon = False
|
|
Me.Text = "Browser"
|
|
Me.Panel1.ResumeLayout(False)
|
|
CType(Me.WebView2, System.ComponentModel.ISupportInitialize).EndInit()
|
|
Me.ResumeLayout(False)
|
|
Me.PerformLayout()
|
|
|
|
End Sub
|
|
|
|
Friend WithEvents TextBox1 As TextBox
|
|
Friend WithEvents Button1 As Button
|
|
Friend WithEvents Panel1 As Panel
|
|
Friend WithEvents Timer1 As Timer
|
|
Friend WithEvents Timer2 As Timer
|
|
Public WithEvents WebView2 As Microsoft.Web.WebView2.WinForms.WebView2
|
|
End Class
|