From 21c59674f3e75ef8e801f47f6a2da6746e85c22a Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Thu, 9 Jan 2025 08:46:38 +0100 Subject: [PATCH] frmBelegNeu -> POS-Terminal Beschreibung --- SDL/kassenbuch/frmBelegNeu.Designer.vb | 78 +++++++++++++++----------- SDL/kassenbuch/frmBelegNeu.vb | 4 ++ 2 files changed, 50 insertions(+), 32 deletions(-) diff --git a/SDL/kassenbuch/frmBelegNeu.Designer.vb b/SDL/kassenbuch/frmBelegNeu.Designer.vb index a85cb33f..b194cfd7 100644 --- a/SDL/kassenbuch/frmBelegNeu.Designer.vb +++ b/SDL/kassenbuch/frmBelegNeu.Designer.vb @@ -71,6 +71,8 @@ Partial Class frmBelegNeu Me.btnAusgabebeleg = New System.Windows.Forms.Button() Me.lblErrPos = New System.Windows.Forms.Label() Me.pnlData = New System.Windows.Forms.Panel() + Me.Label28 = New System.Windows.Forms.Label() + Me.lblZahlungsmittel = New System.Windows.Forms.Label() Me.txtzuKassieren = New VERAG_PROG_ALLGEMEIN.MyTextBox() Me.Label22 = New System.Windows.Forms.Label() Me.cbxSplittung = New System.Windows.Forms.CheckBox() @@ -98,6 +100,7 @@ Partial Class frmBelegNeu Me.Label1 = New System.Windows.Forms.Label() Me.kdkunde = New VERAG_PROG_ALLGEMEIN.KdSearchBox() Me.pnlOPt = New System.Windows.Forms.Panel() + Me.LinkLabel1 = New System.Windows.Forms.LinkLabel() Me.cboPrinter = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.cbxBelegOffnen = New System.Windows.Forms.CheckBox() Me.lblStorno = New System.Windows.Forms.Label() @@ -141,8 +144,6 @@ Partial Class frmBelegNeu Me.DataGridViewTextBoxColumn9 = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.FlowLayoutPanel2 = New System.Windows.Forms.FlowLayoutPanel() Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.Label28 = New System.Windows.Forms.Label() - Me.lblZahlungsmittel = New System.Windows.Forms.Label() CType(Me.dgvBelegPos, System.ComponentModel.ISupportInitialize).BeginInit() Me.pnl.SuspendLayout() Me.pnlData.SuspendLayout() @@ -435,7 +436,7 @@ Partial Class frmBelegNeu Me.btnPrint.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnPrint.ForeColor = System.Drawing.Color.Black Me.btnPrint.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnPrint.Location = New System.Drawing.Point(71, 29) + Me.btnPrint.Location = New System.Drawing.Point(71, 27) Me.btnPrint.Name = "btnPrint" Me.btnPrint.Padding = New System.Windows.Forms.Padding(0, 0, 5, 0) Me.btnPrint.Size = New System.Drawing.Size(73, 59) @@ -689,6 +690,28 @@ Partial Class frmBelegNeu Me.pnlData.Size = New System.Drawing.Size(624, 212) Me.pnlData.TabIndex = 5 ' + 'Label28 + ' + Me.Label28.AutoSize = True + Me.Label28.BackColor = System.Drawing.Color.Transparent + Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.Label28.Location = New System.Drawing.Point(406, 38) + Me.Label28.Name = "Label28" + Me.Label28.Size = New System.Drawing.Size(78, 13) + Me.Label28.TabIndex = 46 + Me.Label28.Text = "Zahlungsmittel:" + ' + 'lblZahlungsmittel + ' + Me.lblZahlungsmittel.AutoSize = True + Me.lblZahlungsmittel.BackColor = System.Drawing.Color.Transparent + Me.lblZahlungsmittel.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lblZahlungsmittel.Location = New System.Drawing.Point(494, 35) + Me.lblZahlungsmittel.Name = "lblZahlungsmittel" + Me.lblZahlungsmittel.Size = New System.Drawing.Size(14, 17) + Me.lblZahlungsmittel.TabIndex = 47 + Me.lblZahlungsmittel.Text = "-" + ' 'txtzuKassieren ' Me.txtzuKassieren._DateTimeOnly = False @@ -1183,6 +1206,7 @@ Partial Class frmBelegNeu ' 'pnlOPt ' + Me.pnlOPt.Controls.Add(Me.LinkLabel1) Me.pnlOPt.Controls.Add(Me.cboPrinter) Me.pnlOPt.Controls.Add(Me.cbxBelegOffnen) Me.pnlOPt.Controls.Add(Me.lblStorno) @@ -1204,6 +1228,17 @@ Partial Class frmBelegNeu Me.pnlOPt.Size = New System.Drawing.Size(624, 92) Me.pnlOPt.TabIndex = 6 ' + 'LinkLabel1 + ' + Me.LinkLabel1.AutoSize = True + Me.LinkLabel1.Font = New System.Drawing.Font("Microsoft Sans Serif", 6.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.LinkLabel1.Location = New System.Drawing.Point(476, 0) + Me.LinkLabel1.Name = "LinkLabel1" + Me.LinkLabel1.Size = New System.Drawing.Size(126, 9) + Me.LinkLabel1.TabIndex = 16 + Me.LinkLabel1.TabStop = True + Me.LinkLabel1.Text = "Fragen zum POS-Terminal?" + ' 'cboPrinter ' Me.cboPrinter._allowedValuesFreiText = Nothing @@ -1371,18 +1406,18 @@ Partial Class frmBelegNeu Me.Panel1.Controls.Add(Me.btnPOS) Me.Panel1.Controls.Add(Me.btnPrint) Me.Panel1.Controls.Add(Me.Button3) - Me.Panel1.Location = New System.Drawing.Point(475, 3) + Me.Panel1.Location = New System.Drawing.Point(475, 9) Me.Panel1.Name = "Panel1" - Me.Panel1.Size = New System.Drawing.Size(145, 89) + Me.Panel1.Size = New System.Drawing.Size(145, 83) Me.Panel1.TabIndex = 13 ' 'Label27 ' Me.Label27.Cursor = System.Windows.Forms.Cursors.Default Me.Label27.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label27.Location = New System.Drawing.Point(3, 14) + Me.Label27.Location = New System.Drawing.Point(2, 12) Me.Label27.Name = "Label27" - Me.Label27.Size = New System.Drawing.Size(135, 13) + Me.Label27.Size = New System.Drawing.Size(136, 15) Me.Label27.TabIndex = 6 Me.Label27.Text = "Beleg drucken" Me.Label27.TextAlign = System.Drawing.ContentAlignment.TopCenter @@ -1391,9 +1426,9 @@ Partial Class frmBelegNeu ' Me.Label26.Cursor = System.Windows.Forms.Cursors.Default Me.Label26.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle)) - Me.Label26.Location = New System.Drawing.Point(3, 1) + Me.Label26.Location = New System.Drawing.Point(3, -1) Me.Label26.Name = "Label26" - Me.Label26.Size = New System.Drawing.Size(137, 20) + Me.Label26.Size = New System.Drawing.Size(137, 17) Me.Label26.TabIndex = 17 Me.Label26.Text = "Zahlung" Me.Label26.TextAlign = System.Drawing.ContentAlignment.TopCenter @@ -1405,7 +1440,7 @@ Partial Class frmBelegNeu Me.btnPOS.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnPOS.ForeColor = System.Drawing.Color.Black Me.btnPOS.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnPOS.Location = New System.Drawing.Point(-1, 29) + Me.btnPOS.Location = New System.Drawing.Point(-1, 27) Me.btnPOS.Name = "btnPOS" Me.btnPOS.Padding = New System.Windows.Forms.Padding(0, 0, 5, 0) Me.btnPOS.Size = New System.Drawing.Size(73, 59) @@ -1712,28 +1747,6 @@ Partial Class frmBelegNeu Me.ContextMenuStrip1.Name = "ContextMenuStrip1" Me.ContextMenuStrip1.Size = New System.Drawing.Size(61, 4) ' - 'Label28 - ' - Me.Label28.AutoSize = True - Me.Label28.BackColor = System.Drawing.Color.Transparent - Me.Label28.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label28.Location = New System.Drawing.Point(406, 38) - Me.Label28.Name = "Label28" - Me.Label28.Size = New System.Drawing.Size(78, 13) - Me.Label28.TabIndex = 46 - Me.Label28.Text = "Zahlungsmittel:" - ' - 'lblZahlungsmittel - ' - Me.lblZahlungsmittel.AutoSize = True - Me.lblZahlungsmittel.BackColor = System.Drawing.Color.Transparent - Me.lblZahlungsmittel.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblZahlungsmittel.Location = New System.Drawing.Point(494, 35) - Me.lblZahlungsmittel.Name = "lblZahlungsmittel" - Me.lblZahlungsmittel.Size = New System.Drawing.Size(14, 17) - Me.lblZahlungsmittel.TabIndex = 47 - Me.lblZahlungsmittel.Text = "-" - ' 'frmBelegNeu ' Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!) @@ -1881,4 +1894,5 @@ Partial Class frmBelegNeu Friend WithEvents Label26 As Label Friend WithEvents Label28 As Label Friend WithEvents lblZahlungsmittel As Label + Friend WithEvents LinkLabel1 As LinkLabel End Class diff --git a/SDL/kassenbuch/frmBelegNeu.vb b/SDL/kassenbuch/frmBelegNeu.vb index be01df9e..0849607d 100644 --- a/SDL/kassenbuch/frmBelegNeu.vb +++ b/SDL/kassenbuch/frmBelegNeu.vb @@ -1740,6 +1740,10 @@ Public Class frmBelegNeu End Sub + Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked + Process.Start("https://wiki.verag.ag/de/software/aviso/howtos/Bankomat") + End Sub + 'Private Sub generatePOSUmbuchung() ' Dim isUmbuchung = True ' Dim frmFremdbeleg As New frmFremdbeleg(isUmbuchung)