![\"Datenmodell](\"..\/fileadmin\/_temp_\/2020_03\/pic_222_001.png\")
<\/p>\nAls selbständiger oder freiberuflicher Softwareentwickler braucht man am Ende vor allem eines: eine Anwendung zum Erstellen von Rechnungen. Diese wollen wir im vorliegenden Artikel programmieren – vom Entwurf des Datenmodells über die Erstellung des Entity Data Models und die Benutzeroberfläche bis zum Ausdrucken der Rechnung als PDF oder mit dem Drucker.<\/b><\/p>\n
Funktionen der Rechnungsverwaltung<\/b><\/p>\n
Welche Aufgaben wollen wir mit der Rechnungsverwaltung erledigen – welche Eingangsdaten haben wir, was soll am Ende herauskommen Und welche Funktionen bilden wir dabei mit der Benutzeroberfläche ab<\/p>\n
Wir wollen eine kleine Anwendung bauen, die verschiedene Funktionen über das Ribbon anbietet. Dazu gehören die Verwaltung von Rechnungsempfängern und der Rechnungen selbst. Für die Rechnungsempfänger wollen wir eine Übersicht der vorhandenen Kunden in Listenform anbieten und ein Fenster zum Anlegen eines neuen Kunden. Die Seite zum Anlegen eines Kunden wollen wir auch für die Detailansicht dieses Kunden nutzen. Praktisch ist dann, wenn wir direkt die Rechnungen, die bisher für diesen Kunden erstellt wurden, in einer Liste in dieser Ansicht anzeigen. Außerdem soll das Fenster jeweils eine Schaltfläche zum Anlegen einer neuen Rechnung enthalten und eine zum Ausdrucken einer markierten Rechnung.<\/p>\n
Für die Rechnungen wollen wir ebenfalls ein eigenes Fenster vorsehen. Dieses enthält Steuer-elemente zur Eingabe der allgemeinen Daten einer Rechnung, also Rechnungsdatum, Rechnungsbetreff, Rechnungstext und Rechnungsuntertext. Außerdem soll ein Listensteuerelement alle Rechnungspositionen mit Bezeichnung, Nettobetrag, Menge und Mehrwertsteuersatz anzeigen.<\/p>\n
Schließlich fehlt noch die Ausgabe der Rechnung – diese wollen wir über ein FlowDocument realisieren, das in einem entsprechenden Steuer-element in einem eigenen Fenster angezeigt wird und ausgedruckt oder als PDF gespeichert werden kann.<\/p>\n
Datenmodell der Anwendung<\/b><\/p>\n
Das Datenmodell haben wir, wenn wir schon im Artikel Access zu EDM: Dateien erstellen <\/b>(www.datenbankentwickler.net\/219<\/b>) eine kleine Funktion zum Erstellen eines Entity Data Models programmiert haben, schnell mit Access definiert (siehe Bild 1). Wir verwenden eine Tabelle namens tblKunden<\/b>, welche die üblichen Kundendaten enthält. Die Anreden speichern wir in einer eigenen Tabelle namens tblAnreden<\/b>, die von der Tabelle tblKunden <\/b>aus über das Feld AnredeID <\/b>referenziert wird. Die grundlegenden Rechnungsdaten speichern wir in der Tabelle tblRechnungen<\/b>. Hier finden Sie das Rechnungsdatum und die übrigen Informationen, die in der Rechnung rund um die Auflistung der Rechnungspositionen abgebildet werden. Außerdem enthält die Rechnungstabelle ein Fremdschlüsselfeld namens KundeID<\/b>, mit dem der Kunde zur jeweiligen Rechnung festgelegt wird. Schließlich folgen noch die Rechnungspositionen in der Tabelle tblRechnungspositionen<\/b>. Die einzelnen Positionen sind über das Feld RechnungID <\/b>mit der Tabelle tblRechnungen <\/b>verknüpft.<\/p>\n
<\/p>\n
Bild 1: Datenmodell der Rechnungsverwaltung<\/span><\/b><\/p>\n Achtung: Damit das nachfolgende Erstellen des Entity Data Models funktioniert, müssen die Primärschlüsselfelder die Entität im Namen enthalten, bei Kunde <\/b>also beispielsweise KundeID<\/b>.<\/p>\n Entity Data Model erstellen<\/b><\/p>\n Mit dem folgenden Aufruf der Funktion EDMDateienErstellen <\/b>legen wir im Unterverzeichnis RechnungsverwaltungContext <\/b>der Access-Datenbank einige Verzeichnisse und Dateien an, die wir gleich im Anschluss weiterverarbeiten:<\/p>\n Zuvor erstellen wir noch ein neues Visual Studio-Projekt mit der Vorlage Visual Basic|Windows Desktop|WPF-App<\/b> namens Rechnungsverwaltung<\/b>.<\/p>\n Nun öffnen wir mit dem Kontextmenü-Eintrag Hinzufügen|Neues Element… <\/b>des Projekt-Elements im Projektmappen-Explorer den Dialog Neues Element hinzufügen<\/b>, wählen dort das Element ADO.NET Entity Data Model <\/b>aus und geben dafür den Namen RechnungsverwaltungContext <\/b>ein.<\/p>\n Im folgenden Schritt wählen wir den Eintrag Leeres Code First-Modell <\/b>aus (siehe Bild 2).<\/p>\n Bild 2: Typ des Modells auswählen<\/span><\/b><\/p>\n Danach ziehen Sie den Inhalt aus dem soeben von Access aus erstellten Ordner RechnungsverwaltungContext <\/b>(alle enthaltenen Elemente, nicht den Ordner selbst) auf das Projekt-Element Rechnungsverwaltung<\/b>. Dies ersetzt die Datei RechnungsverwaltungContext.vb<\/b>, was sich Visual Studio mit der Meldung aus Bild 3 bestätigen lässt.<\/p>\n Bild 3: Überschreiben der Datei bestätigen<\/span><\/b><\/p>\n Mit einer weiteren Meldung bestätigen Sie außerdem, dass die extern geänderten Elemente in Visual Studio neu geladen werden sollen.<\/p>\n Datenbank erstellen<\/b><\/p>\n Wenn Sie jetzt noch in der Paket-Manager-Konsole über den Menüeintrag Extras|Nuget-Paket-Manager|Paket-Manager-Konsole <\/b>die folgenden beiden Befehle aufrufen, wird auch noch eine SQL Server-Datenbank auf Basis des Entity Data Models erstellt, die wir im weiteren Verlauf benötigen:<\/p>\n Danach finden Sie die Datenbank im SQL Server-Objekt-Explorer vor und können gleichzeitig über das Entity Data Model auf die enthaltenen Daten zugreifen beziehungsweise neue Daten schreiben.<\/p>\n Ribbon der Anwendung<\/b><\/p>\n Damit wir die einzelnen Bereiche der Anwendung öffnen können, fügen wir dem Fenster Main.xaml <\/b>ein Ribbon hinzu. Dazu müssen wir zunächst einen Verweis hinzufügen (Menüeintrag Projekt|Verweis hinzufügen…<\/b>), und zwar auf die Bibliothek System.Windows.Controls.Ribbon <\/b>(siehe Bild 4). Danach fügen wir dem Code des Fensters Main.xaml <\/b>die folgende Ribbon-Definition hinzu:<\/p>\n Bild 4: Hinzufügen eines Verweises auf die Bibliothek System.Windows.Controls.Ribbon<\/span><\/b><\/p>\n Damit erstellen wir ein Ribbon, das wie in Bild 5 aussieht. Die Ereignismethoden für die Schaltflächen werden automatisch angelegt, wenn Sie im XAML-Code Click <\/b>gefolgt vom Gleichheitszeichen eingeben und dann die Tabulator-Taste betätigen.<\/p>\n Bild 5: Ribbon der Anwendung<\/span><\/b><\/p>\n Kunden anlegen<\/b><\/p>\n Wir beginnen mit der Seite zum Anlegen eines neuen Kunden, da wir ja noch keine Kundendaten in der Datenbank haben – und diese sollten ja vorhanden sein, damit wir Material für die Übersichtsseite der Kunden haben. Wir erstellen also explizit kein neues Fenster, sondern eine Seite (Page<\/b>). Diese fügen wir hinzu, indem wir den Kontextmenü-Befehl des Projekt-Elements im Projektmappen-Explorer betätigen und im Dialog Neues Element hinzufügen <\/b>den Eintrag Seite (WPF) <\/b>auswählen. Die neue Seite soll Kundendetails <\/b>heißen und nicht nur zum Anlegen neuer Kunden, sondern auch zur Anzeige der Details bereits angelegter Kunden dienen. Der XAML-Code sieht in gekürzter Form wie folgt aus:<\/p>\n Bei den TextBox<\/b>-Elementen wird der Inhalt des jeweiligen Kunde<\/b>-Elements durch eine Bindung an das Feld Kunde.ID <\/b>erreicht:<\/p>\n Die Ausnahme ist hier die das ComboBox<\/b>-Element cboAnrede<\/b>. Es verwendet eine ganze Reihe von Attributen, damit es die Daten der Tabelle Anreden <\/b>anzeigt. ItemsSource <\/b>gibt den Namen der Eigenschaft der Code behind-Datei an, welche die Daten für das ComboBox<\/b>-Element liefert. SelectedItem <\/b>legt fest, wie der ausgewählte Eintrag selektiert wird. SelectedValuePath <\/b>gibt den Namen des Feldes an, über den das selektierte Element ermittelt wird.<\/p>\n Schließlich gibt das Binding<\/b>-Element im DataTemplate<\/b>-Element noch an, welches Feld der Anrede<\/b>-Objekte im Kombinationsfeld angezeigt wird:<\/p>\n Wir betten hier direkt auch die Funktion zum Validieren der Textfelder ein – daher finden Sie im Binding<\/b>-Element auch jeweils die Eigenschaft ValidationOnDataErrors <\/b>mit dem Wert True<\/b>.<\/p>\n Die so erstellte Seite betten wir beim Anklicken des Ribbon-Eintrags btnKundeAnlegen <\/b>über die folgende Methode ein:<\/p>\n Wir erstellen also ein neues Objekt auf Basis des Page<\/b>-Elements Kundendetails <\/b>und übergeben diesem einen Verweis auf das Frame<\/b>-Element WorkZone<\/b>, in dem wir es anzeigen wollen.<\/p>\n Diesen benötigen wir später, um die Seite wieder aus dem Frame<\/b>-Element zu entfernen. Dann weisen wir es dem mit WorkZone <\/b>benannten Frame<\/b>-Element zu, das wir wie folgt im Fenster Main.xaml <\/b>eingefügt haben:<\/p>\n Nach dem Starten des Projekts und einem Klick auf die Ribbon-Schaltfläche Neuer Kunde <\/b>sieht das Fenster wie in Bild 6 aus. Hier wird gerade die Anrede für einen neuen Kunden ausgewählt.<\/p>\n Bild 6: Die Seite Kundendetails.xaml im Fenster Main.xaml<\/span><\/b><\/p>\n Damit die Daten so wie im Screenshot auf der Seite landen, sind noch einige Zeilen in der Code behind-Datei nötig. Diese sehen wie folgt aus. Die Klasse deklariert zunächst drei Variablen. Die erste namens _kunde <\/b>nimmt den aktuell angezeigten Kunden auf, die zweite namens _anreden <\/b>ist eine Auflistung von Objekten des Typs Anrede <\/b>und die dritte namens dbContext <\/b>referenziert das Context-Objekt:<\/p>\n Außerdem benötigen wir noch eine Variable, mit der wir das Frame<\/b>-Objekt referenzieren, in dem das Page<\/b>-Element angezeigt wird:<\/p>\n Die private Variable _kunde <\/b>machen wir über die öffentliche Eigenschaft Kunde <\/b>schreib- und lesbar:<\/p>\n Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>EDMDateienErstellen False, \"RechnungsverwaltungContext\", \"DataModel\", True, True<\/span><\/pre>\n![\"Typ](\"..\/fileadmin\/_temp_\/2020_03\/pic_222_002.png\")
<\/p>\n![\"Überschreiben](\"..\/fileadmin\/_temp_\/2020_03\/pic_222_003.png\")
<\/p>\nadd-migration init\r\nupdate-database<\/pre>\n
![\"Hinzufügen](\"..\/fileadmin\/_temp_\/2020_03\/pic_222_005.png\")
<\/p>\n<Grid>\r\n <Grid.RowDefinitions>\r\n <RowDefinition Height=\"Auto\"><\/RowDefinition>\r\n <RowDefinition Height=\"*\"><\/RowDefinition>\r\n <\/Grid.RowDefinitions>\r\n <Ribbon>\r\n <RibbonTab Header=\"Rechnungsverwaltung\">\r\n <RibbonGroup Header=\"Kunden\">\r\n <RibbonButton x:Name=\"btnKundenuebersicht\" Label=\"Übersicht\" LargeImageSource=\"Images\/users.png\" \r\n Click=\"BtnKundenuebersicht_Click\"><\/RibbonButton>\r\n <RibbonButton x:Name=\"btnKundeHinzufuegen\" Label=\"Neuer Kunde\" LargeImageSource=\"Images\/user_add.png\" \r\n Click=\"BtnKundeHinzufuegen_Click\"><\/RibbonButton>\r\n <\/RibbonGroup>\r\n <RibbonGroup Header=\"Rechnungen\">\r\n <RibbonButton x:Name=\"btnRechnungsuebersicht\" Label=\"Übersicht\" LargeImageSource=\"Images\/invoice.png\" \r\n Click=\"BtnRechnungsuebersicht_Click\"><\/RibbonButton>\r\n <RibbonButton x:Name=\"btnRechnungHinzufuegen\" Label=\"Neue Rechnung\" \r\n LargeImageSource=\"Images\/invoice_add.png\" Click=\"BtnRechnungHinzufuegen_Click\"><\/RibbonButton>\r\n <\/RibbonGroup>\r\n <\/RibbonTab>\r\n <\/Ribbon>\r\n<\/Grid><\/pre>\n
![\"Ribbon](\"..\/fileadmin\/_temp_\/2020_03\/pic_222_006.png\")
<\/p>\n<Page x:Class=\"Kundendetails\" ...>\r\n <Page.Resources>...<\/Page.Resources>\r\n <Grid>\r\n ...<\/pre>\n
<Label Content=\"ID:\" Grid.Column=\"0\" \/>\r\n <TextBox x:Name=\"txtID\" Grid.Column=\"1\" HorizontalAlignment=\"Left\" Text=\"{Binding Kunde.ID, Mode=TwoWay}\" Width=\"50\" IsEnabled=\"False\" BorderBrush=\"Transparent\" \/><\/pre>\n <Label Content=\"ID:\" Grid.Column=\"0\" \/>\r\n <TextBox x:Name=\"txtID\" Grid.Column=\"1\" HorizontalAlignment=\"Left\" Text=\"{Binding Kunde.ID, Mode=TwoWay}\" Width=\"50\" IsEnabled=\"False\" BorderBrush=\"Transparent\" \/>\r\n <Label Content=\"Anrede:\" Grid.Column=\"0\" Grid.Row=\"1\" \/>\r\n <ComboBox x:Name=\"cboAnredeID\" Grid.Row=\"1\" Grid.Column=\"1\" Width=\"100\"\r\n ItemsSource=\"{Binding Anreden}\"\r\n SelectedItem=\"{Binding Kunde.Anrede, ValidatesOnDataErrors=True}\"\r\n SelectedValuePath=\"ID\" SelectionChanged=\"Anrede_SelectionChanged\">\r\n <ComboBox.ItemTemplate>\r\n <DataTemplate>\r\n <TextBlock>\r\n <TextBlock.Text>\r\n <MultiBinding StringFormat=\"{}{0}\">\r\n <Binding Path=\"Bezeichnung\" \/>\r\n <\/MultiBinding>\r\n <\/TextBlock.Text>\r\n <\/TextBlock>\r\n <\/DataTemplate>\r\n <\/ComboBox.ItemTemplate>\r\n <\/ComboBox>\r\n <Label Content=\"Vorname:\" Grid.Column=\"0\" Grid.Row=\"2\" \/>\r\n <TextBox x:Name=\"txtVorname\" Grid.Column=\"1\" Grid.Row=\"2\" Width=\"200\" Text=\"{Binding Kunde.Vorname, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <Label Content=\"Nachname:\" Grid.Row=\"3\" \/>\r\n <TextBox x:Name=\"txtNachname\" Grid.Column=\"1\" Grid.Row=\"3\" Width=\"200\" Text=\"{Binding Kunde.Nachname, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <Label Content=\"Firma:\" Grid.Row=\"4\" \/>\r\n <TextBox x:Name=\"txtFirma\" Grid.Column=\"1\" Grid.Row=\"4\" Width=\"200\" \r\n Text=\"{Binding Kunde.Firma, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <Label Content=\"Straße:\" Grid.Row=\"5\" \/>\r\n <TextBox x:Name=\"txtStrasse\" Grid.Column=\"1\" Grid.Row=\"5\" Width=\"200\" \r\n Text=\"{Binding Kunde.Strasse, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <Label Content=\"PLZ:\" Grid.Row=\"6\" \/>\r\n <TextBox x:Name=\"txtPLZ\" Grid.Column=\"1\" Grid.Row=\"6\" Width=\"50\" \r\n Text=\"{Binding Kunde.PLZ, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <Label Content=\"Ort:\" Grid.Row=\"7\" \/>\r\n <TextBox x:Name=\"txtOrt\" Grid.Column=\"1\" Grid.Row=\"7\" Width=\"200\" Text=\"{Binding Kunde.Ort, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <Label Content=\"Land:\" Grid.Row=\"8\" \/>\r\n <TextBox x:Name=\"txtLand\" Grid.Column=\"1\" Grid.Row=\"8\" Width=\"200\" Text=\"{Binding Kunde.Land, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <Label Content=\"E-Mail:\" Grid.Row=\"9\" \/>\r\n <TextBox x:Name=\"txtEMail\" Grid.Column=\"1\" Grid.Row=\"9\" Width=\"200\" Text=\"{Binding Kunde.EMail, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <StackPanel Orientation=\"Horizontal\" Grid.Row=\"10\" Grid.ColumnSpan=\"4\" >\r\n <Button x:Name=\"btnSpeichern\" Click=\"btnSpeichern_Click\" Content=\"Speichern\">\r\n <Button.Style>\r\n <Style TargetType=\"{x:Type Button}\" BasedOn=\"{StaticResource {x:Type Button}}\">\r\n <Style.Triggers>\r\n <DataTrigger Binding=\"{Binding ElementName=cboAnrede, Path=(Validation.HasError)}\" Value=\"True\">\r\n <Setter Property=\"IsEnabled\" Value=\"False\"><\/Setter>\r\n <\/DataTrigger>\r\n ...\r\n <\/Style.Triggers>\r\n <\/Style>\r\n <\/Button.Style>\r\n <\/Button>\r\n <Button x:Name=\"btnVerwerfen\" Click=\"btnVerwerfen_Click\" Content=\"Verwerfen\"><\/Button>\r\n <\/StackPanel>\r\n <\/Grid>\r\n<\/Page><\/pre>\nPrivate Sub <\/span>BtnKundeHinzufuegen_Click(sender As Object<\/span>, e As <\/span>RoutedEventArgs)\r\n Dim <\/span>pge As <\/span>Kundendetails\r\n pge = New<\/span> Kundendetails(Me.WorkZone)\r\n WorkZone.Content = pge\r\nEnd Sub<\/span><\/pre>\n<Frame x:Name=\"WorkZone\" Grid.Row=\"1\" NavigationUI-Visibility=\"Hidden\" Navigated=\"WorkZone_Navigated\"><\/Frame><\/pre>\n
![\"Die](\"..\/fileadmin\/_temp_\/2020_03\/pic_222_008.png\")
<\/p>\nClass<\/span> Kundendetails\r\n Private <\/span>_kunde As <\/span>Kunde\r\n Private <\/span>_anreden As <\/span>List(Of Anrede)\r\n Private <\/span>dbContext As <\/span>RechnungsverwaltungContext<\/pre>\n Private <\/span>_frame As <\/span>Frame<\/pre>\n Public <\/span>Property Kunde As <\/span>Kunde\r\n Get\r\n Return _kunde\r\n End Get\r\n Set(value As <\/span>Kunde)\r\n _kunde = value\r\n End Set<\/span>\r\n End Property<\/pre>\n
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Visual Basic Entwickler<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 200 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t