Handling InsertReceivers und kleinigkeiten frm Main

This commit is contained in:
Developer01
2025-09-16 09:00:43 +02:00
parent 85e0bc3400
commit 69afea012b
2 changed files with 28 additions and 2 deletions

View File

@@ -271,7 +271,7 @@ Public Class frmMain
If ViewEnvelopes.FocusedRowHandle < 0 Then
Exit Sub
End If
sd
Dim oEnvelope As Envelope = ViewEnvelopes.GetRow(ViewEnvelopes.FocusedRowHandle)
txtEnvelopeIdLabel.Caption = String.Format(txtEnvelopeIdLabel.Tag, oEnvelope.Id)
@@ -795,6 +795,10 @@ Public Class frmMain
End Sub
Private Sub bbtnitm2Faktor_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtnitm2Faktor.ItemClick
Show_MF_Info
End Sub
Private Sub Show_MF_Info()
If ViewEnvelopes.FocusedRowHandle < 0 Then
Exit Sub
End If
@@ -821,7 +825,6 @@ Public Class frmMain
MsgBox(Resources.Envelope.Please_select_a_recipient_from_the_Recipients_tab, MsgBoxStyle.Information, Text)
End If
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If txtEnvID.Text = String.Empty Then
Exit Sub