diff --git a/initATLASAufschubkonten/frmStartOptions.Designer.vb b/initATLASAufschubkonten/frmStartOptions.Designer.vb index 8cdbf96..450b5c3 100644 --- a/initATLASAufschubkonten/frmStartOptions.Designer.vb +++ b/initATLASAufschubkonten/frmStartOptions.Designer.vb @@ -69,7 +69,6 @@ Partial Class frmStartOptions Me.LinkLabel99 = New System.Windows.Forms.LinkLabel() Me.PictureBox99 = New System.Windows.Forms.PictureBox() Me.Button99 = New System.Windows.Forms.Button() - Me.Button21 = New System.Windows.Forms.Button() Me.Button20 = New System.Windows.Forms.Button() Me.Button19 = New System.Windows.Forms.Button() Me.Label99 = New System.Windows.Forms.Label() @@ -160,6 +159,8 @@ Partial Class frmStartOptions Me.LinkLabel30 = New System.Windows.Forms.LinkLabel() Me.Label11 = New System.Windows.Forms.Label() Me.TabPage4 = New System.Windows.Forms.TabPage() + Me.PictureBox21 = New System.Windows.Forms.PictureBox() + Me.LinkLabel47 = New System.Windows.Forms.LinkLabel() Me.LinkLabel46 = New System.Windows.Forms.LinkLabel() Me.PictureBox19 = New System.Windows.Forms.PictureBox() Me.PictureBox18 = New System.Windows.Forms.PictureBox() @@ -193,8 +194,7 @@ Partial Class frmStartOptions Me.lklAufschubkontenATLASEZOLL = New System.Windows.Forms.LinkLabel() Me.lblRoutineManager = New System.Windows.Forms.Label() Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox() - Me.LinkLabel47 = New System.Windows.Forms.LinkLabel() - Me.PictureBox21 = New System.Windows.Forms.PictureBox() + Me.Button21 = New System.Windows.Forms.Button() Me.pnl.SuspendLayout() CType(Me.piceZollAnh, System.ComponentModel.ISupportInitialize).BeginInit() Me.tbcntr.SuspendLayout() @@ -219,13 +219,13 @@ Partial Class frmStartOptions CType(Me.PictureBox14, System.ComponentModel.ISupportInitialize).BeginInit() Me.TabPage3.SuspendLayout() Me.TabPage4.SuspendLayout() + CType(Me.PictureBox21, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox19, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox18, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox12, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit() - CType(Me.PictureBox21, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'pnl @@ -886,18 +886,6 @@ Partial Class frmStartOptions Me.Button99.Text = "AAS Sendung 24h" Me.Button99.UseVisualStyleBackColor = True ' - 'Button21 - ' - Me.Button21.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button21.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.Button21.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button21.Location = New System.Drawing.Point(581, 346) - Me.Button21.Name = "Button21" - Me.Button21.Size = New System.Drawing.Size(211, 24) - Me.Button21.TabIndex = 81 - Me.Button21.Text = "AAS Sendung 24h" - Me.Button21.UseVisualStyleBackColor = True - ' 'Button20 ' Me.Button20.Enabled = False @@ -949,7 +937,7 @@ Partial Class frmStartOptions ' Me.PictureBox20.BackgroundImage = CType(resources.GetObject("PictureBox20.BackgroundImage"), System.Drawing.Image) Me.PictureBox20.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.PictureBox20.Location = New System.Drawing.Point(586, 90) + Me.PictureBox20.Location = New System.Drawing.Point(698, 90) Me.PictureBox20.Name = "PictureBox20" Me.PictureBox20.Size = New System.Drawing.Size(18, 18) Me.PictureBox20.TabIndex = 62 @@ -960,7 +948,7 @@ Partial Class frmStartOptions ' Me.LinkLabel45.AutoSize = True Me.LinkLabel45.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel45.Location = New System.Drawing.Point(475, 95) + Me.LinkLabel45.Location = New System.Drawing.Point(543, 95) Me.LinkLabel45.Name = "LinkLabel45" Me.LinkLabel45.Size = New System.Drawing.Size(112, 13) Me.LinkLabel45.TabIndex = 61 @@ -1994,6 +1982,28 @@ Partial Class frmStartOptions Me.TabPage4.Text = "Asfinag" Me.TabPage4.UseVisualStyleBackColor = True ' + 'PictureBox21 + ' + Me.PictureBox21.BackgroundImage = CType(resources.GetObject("PictureBox21.BackgroundImage"), System.Drawing.Image) + Me.PictureBox21.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom + Me.PictureBox21.Location = New System.Drawing.Point(99, 115) + Me.PictureBox21.Name = "PictureBox21" + Me.PictureBox21.Size = New System.Drawing.Size(18, 18) + Me.PictureBox21.TabIndex = 40 + Me.PictureBox21.TabStop = False + Me.PictureBox21.Visible = False + ' + 'LinkLabel47 + ' + Me.LinkLabel47.AutoSize = True + Me.LinkLabel47.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.LinkLabel47.Location = New System.Drawing.Point(17, 115) + Me.LinkLabel47.Name = "LinkLabel47" + Me.LinkLabel47.Size = New System.Drawing.Size(72, 13) + Me.LinkLabel47.TabIndex = 39 + Me.LinkLabel47.TabStop = True + Me.LinkLabel47.Text = "Import to SDL" + ' 'LinkLabel46 ' Me.LinkLabel46.AutoSize = True @@ -2384,27 +2394,17 @@ Partial Class frmStartOptions Me.txtGJ_UNISPED.Size = New System.Drawing.Size(53, 20) Me.txtGJ_UNISPED.TabIndex = 68 ' - 'LinkLabel47 + 'Button21 ' - Me.LinkLabel47.AutoSize = True - Me.LinkLabel47.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.LinkLabel47.Location = New System.Drawing.Point(17, 115) - Me.LinkLabel47.Name = "LinkLabel47" - Me.LinkLabel47.Size = New System.Drawing.Size(72, 13) - Me.LinkLabel47.TabIndex = 39 - Me.LinkLabel47.TabStop = True - Me.LinkLabel47.Text = "Import to SDL" - ' - 'PictureBox21 - ' - Me.PictureBox21.BackgroundImage = CType(resources.GetObject("PictureBox21.BackgroundImage"), System.Drawing.Image) - Me.PictureBox21.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom - Me.PictureBox21.Location = New System.Drawing.Point(99, 115) - Me.PictureBox21.Name = "PictureBox21" - Me.PictureBox21.Size = New System.Drawing.Size(18, 18) - Me.PictureBox21.TabIndex = 40 - Me.PictureBox21.TabStop = False - Me.PictureBox21.Visible = False + Me.Button21.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button21.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Button21.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button21.Location = New System.Drawing.Point(581, 346) + Me.Button21.Name = "Button21" + Me.Button21.Size = New System.Drawing.Size(211, 24) + Me.Button21.TabIndex = 81 + Me.Button21.Text = "AAS Sendung 24h" + Me.Button21.UseVisualStyleBackColor = True ' 'frmStartOptions ' @@ -2448,13 +2448,13 @@ Partial Class frmStartOptions Me.TabPage3.PerformLayout() Me.TabPage4.ResumeLayout(False) Me.TabPage4.PerformLayout() + CType(Me.PictureBox21, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox19, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox18, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox12, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit() - CType(Me.PictureBox21, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb index f37e9d7..1e34cd0 100644 --- a/initATLASAufschubkonten/frmStartOptions.vb +++ b/initATLASAufschubkonten/frmStartOptions.vb @@ -3748,7 +3748,7 @@ Public Class frmStartOptions doAASVermerke_Ankunft() End Sub - Private Sub LinkLabel46_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel46.LinkClicked + Private Sub LinkLabel99_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel46.LinkClicked Try @@ -3878,7 +3878,7 @@ Public Class frmStartOptions showPic(ASFINAG_LKW(False), PictureBox21) End Sub - Private Sub LinkLabel46_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel99.LinkClicked + Private Sub LinkLabel46_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel99.LinkClicked, LinkLabel46.LinkClicked Me.Cursor = Cursors.WaitCursor Try DAKOSY_Worker.cIMPORT_Codelisten.IMPORT("C0219", True) 'TESTSYSTEM