Remove chkQuellverzeichnisLoeschen from DI Profileigenschaften, From UI + logc

This commit is contained in:
OlgunR
2026-04-08 10:48:35 +02:00
parent 2bc948d29d
commit 6012ea42cc
2 changed files with 3 additions and 32 deletions

View File

@@ -62,7 +62,6 @@ Partial Class frmDIProfilEigenschaften
Me.btnRegeln = New System.Windows.Forms.Button()
Me.boxImportoptionenLoeschen = New System.Windows.Forms.GroupBox()
Me.chkUVloeschen = New System.Windows.Forms.CheckBox()
Me.chkQuellverzeichnisLoeschen = New System.Windows.Forms.CheckBox()
Me.chkDateienLoeschen = New System.Windows.Forms.CheckBox()
Me.boxImportoptionenBackup = New System.Windows.Forms.GroupBox()
Me.txtBackupordner = New System.Windows.Forms.TextBox()
@@ -464,12 +463,11 @@ Partial Class frmDIProfilEigenschaften
'boxImportoptionenLoeschen
'
Me.boxImportoptionenLoeschen.Controls.Add(Me.chkUVloeschen)
Me.boxImportoptionenLoeschen.Controls.Add(Me.chkQuellverzeichnisLoeschen)
Me.boxImportoptionenLoeschen.Controls.Add(Me.chkDateienLoeschen)
Me.boxImportoptionenLoeschen.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.boxImportoptionenLoeschen.Location = New System.Drawing.Point(584, 110)
Me.boxImportoptionenLoeschen.Name = "boxImportoptionenLoeschen"
Me.boxImportoptionenLoeschen.Size = New System.Drawing.Size(345, 99)
Me.boxImportoptionenLoeschen.Size = New System.Drawing.Size(345, 73)
Me.boxImportoptionenLoeschen.TabIndex = 46
Me.boxImportoptionenLoeschen.TabStop = False
Me.boxImportoptionenLoeschen.Text = "Löschen"
@@ -478,7 +476,7 @@ Partial Class frmDIProfilEigenschaften
'
Me.chkUVloeschen.AutoSize = True
Me.chkUVloeschen.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.chkUVloeschen.Location = New System.Drawing.Point(8, 65)
Me.chkUVloeschen.Location = New System.Drawing.Point(8, 47)
Me.chkUVloeschen.Name = "chkUVloeschen"
Me.chkUVloeschen.Size = New System.Drawing.Size(230, 17)
Me.chkUVloeschen.TabIndex = 2
@@ -486,23 +484,11 @@ Partial Class frmDIProfilEigenschaften
Me.chkUVloeschen.UseVisualStyleBackColor = True
Me.chkUVloeschen.Visible = False
'
'chkQuellverzeichnisLoeschen
'
Me.chkQuellverzeichnisLoeschen.AutoSize = True
Me.chkQuellverzeichnisLoeschen.Enabled = False
Me.chkQuellverzeichnisLoeschen.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.chkQuellverzeichnisLoeschen.Location = New System.Drawing.Point(8, 42)
Me.chkQuellverzeichnisLoeschen.Name = "chkQuellverzeichnisLoeschen"
Me.chkQuellverzeichnisLoeschen.Size = New System.Drawing.Size(217, 17)
Me.chkQuellverzeichnisLoeschen.TabIndex = 1
Me.chkQuellverzeichnisLoeschen.Text = "Quellverzeichnis nach Import löschen"
Me.chkQuellverzeichnisLoeschen.UseVisualStyleBackColor = True
'
'chkDateienLoeschen
'
Me.chkDateienLoeschen.AutoSize = True
Me.chkDateienLoeschen.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.chkDateienLoeschen.Location = New System.Drawing.Point(8, 19)
Me.chkDateienLoeschen.Location = New System.Drawing.Point(8, 23)
Me.chkDateienLoeschen.Name = "chkDateienLoeschen"
Me.chkDateienLoeschen.Size = New System.Drawing.Size(200, 17)
Me.chkDateienLoeschen.TabIndex = 0
@@ -666,7 +652,6 @@ Partial Class frmDIProfilEigenschaften
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents btnRegeln As System.Windows.Forms.Button
Friend WithEvents boxImportoptionenLoeschen As System.Windows.Forms.GroupBox
Friend WithEvents chkQuellverzeichnisLoeschen As System.Windows.Forms.CheckBox
Friend WithEvents chkDateienLoeschen As System.Windows.Forms.CheckBox
Friend WithEvents boxImportoptionenBackup As System.Windows.Forms.GroupBox
Friend WithEvents txtBackupordner As System.Windows.Forms.TextBox

View File

@@ -138,7 +138,6 @@ Public Class frmDIProfilEigenschaften
Me.txtBackupordner.Text = Me.selectedProfile.Backupordner
Me.chkDateienUeberschreiben.Checked = Me.selectedProfile.Overwrite
Me.chkDateienLoeschen.Checked = Me.selectedProfile.DateiLöschen
Me.chkQuellverzeichnisLoeschen.Checked = Me.selectedProfile.VerzeichnisLöschen
If CBool(Me.selectedProfile.Aktiv) = True Then
Me.chkbxAktiv.Checked = True
@@ -167,7 +166,6 @@ Public Class frmDIProfilEigenschaften
Me.txtBackupordner.Enabled = Me.chkImportoptionenBackup.Checked
Me.btnBackupordner.Enabled = Me.chkImportoptionenBackup.Checked
Me.chkDateienUeberschreiben.Enabled = Me.chkImportoptionenBackup.Checked
Me.chkQuellverzeichnisLoeschen.Enabled = Me.chkDateienLoeschen.Checked
'End If
End Sub
Sub rbBoxenenablen()
@@ -293,7 +291,6 @@ Public Class frmDIProfilEigenschaften
Me.chkDateienLoeschen.Checked = Me.selectedProfile.DateiLöschen
Me.chkDateienUeberschreiben.Checked = Me.selectedProfile.Overwrite
Me.chkImportoptionenBackup.Checked = Me.selectedProfile.Backup
Me.chkQuellverzeichnisLoeschen.Checked = Me.selectedProfile.DateiLöschen
End If
End If
@@ -540,17 +537,6 @@ Public Class frmDIProfilEigenschaften
End If
End Sub
Private Sub chkQuellverzeichnisLoeschen_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chkQuellverzeichnisLoeschen.CheckedChanged
If Me.selectedProfile IsNot Nothing Then
Me.selectedProfile.VerzeichnisLöschen = Me.chkQuellverzeichnisLoeschen.Checked
If Not Me.chkQuellverzeichnisLoeschen.Checked = Me.selectedProfile.OriginalVerzeichnisLöschen Then
Me.btnSpeichern.Enabled = True
Else
Me.btnSpeichern.Enabled = False
End If
End If
End Sub
Private Sub btnRegeln_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRegeln.Click
'Dim regelverwaltung As Control = New pnlDateiimportRegelverwaltung()