jj: first usable version of lookup grid

This commit is contained in:
Jonathan Jenne
2018-10-12 16:17:18 +02:00
parent 650e6fe365
commit f939e0760c
10 changed files with 100 additions and 62 deletions

View File

@@ -1,9 +1,9 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class Grid
Inherits System.Windows.Forms.UserControl
'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
@@ -20,10 +20,10 @@ Partial Class Grid
'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()> _
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.TextBox1 = New System.Windows.Forms.TextBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.btnOpenForm = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'TextBox1
@@ -33,29 +33,30 @@ Partial Class Grid
Me.TextBox1.Size = New System.Drawing.Size(231, 20)
Me.TextBox1.TabIndex = 0
'
'Button1
'btnOpenForm
'
Me.Button1.Location = New System.Drawing.Point(237, 0)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(37, 20)
Me.Button1.TabIndex = 1
Me.Button1.Text = "Button1"
Me.Button1.UseVisualStyleBackColor = True
Me.btnOpenForm.Location = New System.Drawing.Point(237, 0)
Me.btnOpenForm.Name = "btnOpenForm"
Me.btnOpenForm.Size = New System.Drawing.Size(30, 20)
Me.btnOpenForm.TabIndex = 1
Me.btnOpenForm.Text = "..."
Me.btnOpenForm.UseVisualStyleBackColor = True
'
'LookupGrid
'Grid
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.AutoSize = True
Me.BackColor = System.Drawing.Color.Transparent
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.btnOpenForm)
Me.Controls.Add(Me.TextBox1)
Me.Name = "LookupGrid"
Me.Size = New System.Drawing.Size(323, 57)
Me.Name = "Grid"
Me.Size = New System.Drawing.Size(270, 23)
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents TextBox1 As Windows.Forms.TextBox
Friend WithEvents Button1 As Windows.Forms.Button
Friend WithEvents btnOpenForm As Windows.Forms.Button
End Class