Warenorte-ReadOnly eingebaut

This commit is contained in:
2023-11-24 11:45:37 +01:00
parent 88a0547479
commit c90ae94751
4 changed files with 112 additions and 81 deletions

View File

@@ -22,13 +22,11 @@ Partial Class frmWarenorte
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmWarenorte))
Me.pnlTop = New System.Windows.Forms.Panel()
Me.lblWarning = New System.Windows.Forms.Label()
Me.Label4 = New System.Windows.Forms.Label()
Me.Label3 = New System.Windows.Forms.Label()
Me.cbxFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.btnAdd = New System.Windows.Forms.Button()
Me.btnDelete = New System.Windows.Forms.Button()
Me.txtWarenort = New System.Windows.Forms.TextBox()
@@ -51,14 +49,15 @@ Partial Class frmWarenorte
Me.cxZV = New System.Windows.Forms.CheckBox()
Me.txtStrasse = New System.Windows.Forms.TextBox()
Me.Label10 = New System.Windows.Forms.Label()
Me.cbxFirmaChange = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Label = New System.Windows.Forms.Label()
Me.Label9 = New System.Windows.Forms.Label()
Me.txtReihenfolge = New System.Windows.Forms.TextBox()
Me.btnSave = New System.Windows.Forms.Button()
Me.cbxGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.dgvWarenorteNew = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.UsrcntlPDFScanList1 = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList()
Me.cbxFirmaChange = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cbxGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cbxFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.dgvWarenorteNew = New VERAG_PROG_ALLGEMEIN.MyDatagridview()
Me.pnlTop.SuspendLayout()
Me.mainPanel.SuspendLayout()
Me.GroupBoxFK.SuspendLayout()
@@ -109,18 +108,6 @@ Partial Class frmWarenorte
Me.Label3.TabIndex = 5
Me.Label3.Text = "Firma"
'
'cbxFirma
'
Me.cbxFirma._allowedValuesFreiText = Nothing
Me.cbxFirma._allowFreiText = False
Me.cbxFirma._value = ""
Me.cbxFirma.DropDownWidth = 150
Me.cbxFirma.FormattingEnabled = True
Me.cbxFirma.Location = New System.Drawing.Point(595, 24)
Me.cbxFirma.Name = "cbxFirma"
Me.cbxFirma.Size = New System.Drawing.Size(128, 21)
Me.cbxFirma.TabIndex = 13
'
'btnAdd
'
Me.btnAdd.BackgroundImage = Global.AVISO.My.Resources.Resources.plus
@@ -342,20 +329,6 @@ Partial Class frmWarenorte
Me.Label10.TabIndex = 23
Me.Label10.Text = "Strasse"
'
'cbxFirmaChange
'
Me.cbxFirmaChange._allowedValuesFreiText = Nothing
Me.cbxFirmaChange._allowFreiText = False
Me.cbxFirmaChange._value = ""
Me.cbxFirmaChange.DropDownWidth = 120
Me.cbxFirmaChange.Enabled = False
Me.cbxFirmaChange.FormattingEnabled = True
Me.cbxFirmaChange.Location = New System.Drawing.Point(298, 175)
Me.cbxFirmaChange.Name = "cbxFirmaChange"
Me.cbxFirmaChange.Size = New System.Drawing.Size(100, 21)
Me.cbxFirmaChange.TabIndex = 21
Me.cbxFirmaChange.Visible = False
'
'Label
'
Me.Label.AutoSize = True
@@ -391,30 +364,6 @@ Partial Class frmWarenorte
Me.btnSave.Text = "Speichern"
Me.btnSave.UseVisualStyleBackColor = True
'
'cbxGrenzstelle
'
Me.cbxGrenzstelle._allowedValuesFreiText = Nothing
Me.cbxGrenzstelle._allowFreiText = False
Me.cbxGrenzstelle._value = ""
Me.cbxGrenzstelle.DropDownWidth = 120
Me.cbxGrenzstelle.FormattingEnabled = True
Me.cbxGrenzstelle.Location = New System.Drawing.Point(295, 130)
Me.cbxGrenzstelle.Name = "cbxGrenzstelle"
Me.cbxGrenzstelle.Size = New System.Drawing.Size(100, 21)
Me.cbxGrenzstelle.TabIndex = 9
'
'dgvWarenorteNew
'
Me.dgvWarenorteNew.AKTUALISIERUNGS_INTERVALL = -1
Me.dgvWarenorteNew.AllowUserToAddRows = False
Me.dgvWarenorteNew.AllowUserToDeleteRows = False
Me.dgvWarenorteNew.BackgroundColor = System.Drawing.Color.White
Me.dgvWarenorteNew.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvWarenorteNew.Location = New System.Drawing.Point(0, 49)
Me.dgvWarenorteNew.Name = "dgvWarenorteNew"
Me.dgvWarenorteNew.Size = New System.Drawing.Size(314, 331)
Me.dgvWarenorteNew.TabIndex = 98
'
'UsrcntlPDFScanList1
'
Me.UsrcntlPDFScanList1._DATENSERVER_KATEGORIE = "DOKUMENTE"
@@ -428,12 +377,62 @@ Partial Class frmWarenorte
Me.UsrcntlPDFScanList1.BackColor = System.Drawing.Color.White
Me.UsrcntlPDFScanList1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.UsrcntlPDFScanList1.Cursor = System.Windows.Forms.Cursors.Default
Me.UsrcntlPDFScanList1.Location = New System.Drawing.Point(335, 299)
Me.UsrcntlPDFScanList1.Location = New System.Drawing.Point(320, 299)
Me.UsrcntlPDFScanList1.Margin = New System.Windows.Forms.Padding(0)
Me.UsrcntlPDFScanList1.Name = "UsrcntlPDFScanList1"
Me.UsrcntlPDFScanList1.Size = New System.Drawing.Size(367, 81)
Me.UsrcntlPDFScanList1.Size = New System.Drawing.Size(368, 81)
Me.UsrcntlPDFScanList1.TabIndex = 99
'
'cbxFirmaChange
'
Me.cbxFirmaChange._allowedValuesFreiText = Nothing
Me.cbxFirmaChange._allowFreiText = False
Me.cbxFirmaChange._value = ""
Me.cbxFirmaChange.DropDownWidth = 120
Me.cbxFirmaChange.Enabled = False
Me.cbxFirmaChange.FormattingEnabled = True
Me.cbxFirmaChange.Location = New System.Drawing.Point(298, 175)
Me.cbxFirmaChange.Name = "cbxFirmaChange"
Me.cbxFirmaChange.Size = New System.Drawing.Size(100, 21)
Me.cbxFirmaChange.TabIndex = 21
Me.cbxFirmaChange.Visible = False
'
'cbxGrenzstelle
'
Me.cbxGrenzstelle._allowedValuesFreiText = Nothing
Me.cbxGrenzstelle._allowFreiText = False
Me.cbxGrenzstelle._value = ""
Me.cbxGrenzstelle.DropDownWidth = 120
Me.cbxGrenzstelle.FormattingEnabled = True
Me.cbxGrenzstelle.Location = New System.Drawing.Point(295, 130)
Me.cbxGrenzstelle.Name = "cbxGrenzstelle"
Me.cbxGrenzstelle.Size = New System.Drawing.Size(100, 21)
Me.cbxGrenzstelle.TabIndex = 9
'
'cbxFirma
'
Me.cbxFirma._allowedValuesFreiText = Nothing
Me.cbxFirma._allowFreiText = False
Me.cbxFirma._value = ""
Me.cbxFirma.DropDownWidth = 150
Me.cbxFirma.FormattingEnabled = True
Me.cbxFirma.Location = New System.Drawing.Point(595, 24)
Me.cbxFirma.Name = "cbxFirma"
Me.cbxFirma.Size = New System.Drawing.Size(128, 21)
Me.cbxFirma.TabIndex = 13
'
'dgvWarenorteNew
'
Me.dgvWarenorteNew.AKTUALISIERUNGS_INTERVALL = -1
Me.dgvWarenorteNew.AllowUserToAddRows = False
Me.dgvWarenorteNew.AllowUserToDeleteRows = False
Me.dgvWarenorteNew.BackgroundColor = System.Drawing.Color.White
Me.dgvWarenorteNew.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvWarenorteNew.Location = New System.Drawing.Point(0, 49)
Me.dgvWarenorteNew.Name = "dgvWarenorteNew"
Me.dgvWarenorteNew.Size = New System.Drawing.Size(314, 331)
Me.dgvWarenorteNew.TabIndex = 98
'
'frmWarenorte
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)