stammref, template

This commit is contained in:
2026-03-02 08:25:48 +01:00
parent 2cac04acc6
commit 61a7b3d011
4 changed files with 15 additions and 10 deletions

View File

@@ -770,16 +770,16 @@ Public Class usrCntlATLAS_EZA
End Sub
Private Sub DateiimportToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles DateiimportToolStripMenuItem.Click
'----- Kann ansonten keine Version freigeben!!!
'Dim f As New cATLAS_EZA_IMPORT(AVISO, SENDUNG, EZA)
'f.ShowDialog(Me.FindForm)
'EZA = f.EZA
'Me.FindForm.SuspendLayout()
'POSITIONEN.setValues(EZA, True)
'btnPositionen.PerformClick()
'Me.FindForm.ResumeLayout()
Dim f As New cATLAS_EZA_IMPORT(AVISO, SENDUNG, EZA)
f.ShowDialog(Me.FindForm)
EZA = f.EZA
Me.FindForm.SuspendLayout()
POSITIONEN.setValues(EZA, True)
btnPositionen.PerformClick()
Me.FindForm.ResumeLayout()
End Sub