sieht ich finde nicht so schlecht aus - also viel Databinding-Kram sinnvoll und funktional verbaut
Nur sowas ist natürlich eine ständige Selbst-Wiederholung - das kann man bestimmt auch iwie zusammenfassen:
Spoiler anzeigen
Unschön dabei ist, dass du auf die Default-Instanzen der Dialoge zugreifst - das ist eiglich ein Hack - jo kann man benutzen, wenn man weiß was man tut, aber weißt du's?
Dass dlgFirma gar kein Objekt ist, sondern ein Datentyp?
Richtig problematisch ist das .RemoveCurrent() - warum removest du in den BindingSources immer den Current?
Und warum ist dein Zip 260Kb gross?
Ich hab geguckt, es sind die Resource-Dateien - je 500kb - was ist da monströses drinne?
Nur sowas ist natürlich eine ständige Selbst-Wiederholung - das kann man bestimmt auch iwie zusammenfassen:
VB.NET-Quellcode
- Private Sub ArtikelBearbeiten()
- Dim frmArtikel = dlgArtikel
- frmArtikel.ArtikelBindingSource.DataSource = ArtikelBindingSource.Current
- If frmArtikel.ShowDialog(Me) = Windows.Forms.DialogResult.OK Then
- frmArtikel.ArtikelBindingSource.EndEdit()
- frmArtikel.ArtikelBindingSource.RemoveCurrent()
- Else
- frmArtikel.ArtikelBindingSource.CancelEdit()
- End If
- End Sub
- Private Sub RechnungBearbeiten()
- Dim frmRechnung = dlgRechnung
- frmRechnung.RechnungBindingSource.DataSource = RechnungBindingSource.Current
- If frmRechnung.ShowDialog(Me) = Windows.Forms.DialogResult.OK Then
- frmRechnung.RechnungBindingSource.EndEdit()
- frmRechnung.RechnungBindingSource.RemoveCurrent()
- Else
- frmRechnung.RechnungBindingSource.CancelEdit()
- End If
- End Sub
- Private Sub KundeBearbeiten()
- Dim frmKunde = dlgKunde
- frmKunde.KundeBindingSource.DataSource = KundeBindingSource.Current
- If frmKunde.ShowDialog(Me) = Windows.Forms.DialogResult.OK Then
- frmKunde.KundeBindingSource.EndEdit()
- frmKunde.KundeBindingSource.RemoveCurrent()
- Else
- frmKunde.KundeBindingSource.CancelEdit()
- End If
- End Sub
- Private Sub FirmaBearbeiten()
- Dim frmFirma = dlgFirma
- frmFirma.FirmaBindingSource.DataSource = FirmaBindingSource.Current
- If frmFirma.ShowDialog(Me) = Windows.Forms.DialogResult.OK Then
- frmFirma.FirmaBindingSource.EndEdit()
- frmFirma.FirmaBindingSource.RemoveCurrent()
- Else
- frmFirma.FirmaBindingSource.CancelEdit()
- End If
- End Sub
Dass dlgFirma gar kein Objekt ist, sondern ein Datentyp?
Richtig problematisch ist das .RemoveCurrent() - warum removest du in den BindingSources immer den Current?
Und warum ist dein Zip 260Kb gross?
Ich hab geguckt, es sind die Resource-Dateien - je 500kb - was ist da monströses drinne?