Änderungen am Entity Data Model<\/h2>\n
Die Entitäten für die Seminare enthalten ein Datumsfeld. Damit dieses beim Speichern in der Datenbank korrekt verarbeitet werden kann, fügen wir der Methode OnModelCreating <\/b>eine Anweisung hinzu, welche den Datentyp für die Eigenschaft Seminartermin <\/b>auf datetime2 <\/b>festlegt:<\/p>\n Im Artikel Seminarverwaltung II: Ribbon und Frame <\/b>(www.datenbankentwickler.net\/272<\/b>) haben wir bereits den Aufbau des Ribbons für diese Anwendung beschrieben. Was noch fehlt, sind die Ereignismethoden, die durch die Schaltflächen btnSeminaruebersicht <\/b>und btnSeminaranlegen <\/b>ausgelöst werden. Mit diesen Schaltflächen wollen wir die noch zu erstellenden Seiten SeminareUebersicht <\/b>und Seminardetails <\/b>aufrufen. Die Methode, die durch die Schaltfläche btnSeminaruebersicht <\/b>ausgelöst werden soll, erstellt eine neue Seite auf Basis des Page<\/b>-Elements SeminareUebersicht <\/b>und übergibt dieser einen Verweis auf das Frame<\/b>-Objekt und auf den Datenbankkontext aus dbContext<\/b>. Dann weist sie der Eigenschaft Content <\/b>des Frame<\/b>-Elements das neue Page<\/b>-Element zu:<\/p>\n Ähnlich sieht der Aufruf für die Schaltfläche btnSeminarAnlegen <\/b>aus:<\/p>\n Bevor wir die Benutzeroberfläche und die Anwendungslogik für das Anlegen neuer Seminare und das Bearbeiten vorhandener Seminare kreieren, benötigen wir noch eine Klasse, welche die Validierungsregeln für die Seminar<\/b>-Elemente enthält. Dafür legen wir eine Klasse namens Seminar.vb <\/b>an, in der wir die Schnittstelle IDataErrorInfo <\/b>implementieren. Diese enthält die beiden Eigenschaften Item <\/b>und Error<\/b>. Für die Eigenschaft Item <\/b>hinterlegen wir die Validierungsregeln, die Eigenschaft Error brauchen wir nicht anzupassen.<\/p>\n Die beiden Felder Titel <\/b>und Inhalt <\/b>dürfen einfach nicht leer sein, was wir durch die Prüfung des Inhalts dieser Felder mit String.IsNullOrEmpty <\/b>prüfen. Der Inhalt des Feldes Preis<\/b> darf nicht leer sein und weder einen negativen noch einen nicht-numerischen Wert enthalten. Das Feld Seminartermin <\/b>darf ebenfalls nicht leer sein und muss ein Datum enthalten:<\/p>\n Damit gehen wir gleich über zu der Seite, mit der wir neue Seminare anlegen und vorhandene Seminare bearbeiten wollen. Im Teil mit den Resources <\/b>für das Page<\/b>-Element definieren wir wieder einige allgemeine Eigenschaften für die Steuerelemente wie Margin <\/b>und Padding<\/b> für die Elemente DatePicker <\/b>und Button<\/b>. Für das Element TextBox <\/b>legen wir außerdem noch einen Wert für das Attribut Validation.ErrorTemplate <\/b>fest, mit dem wir das Aussehen der TextBox<\/b>-Elemente für den Fall definieren, dass der Inhalt nicht erfolgreich validiert werden konnte. Diese Teile finden Sie im Beispielprojekt, wir haben sie an dieser Stelle aus Platzgründen ausgespart:<\/p>\n Ein weiteres Style<\/b>-Element definiert die Regeln, nach denen Button<\/b>-Elemente, die diese Regel aufnehmen, deaktiviert werden sollen. Diese Regeln richten sich nach der Validierung, genauer danach, ob die Validierung für ein bestimmtes Steuerelement fehlgeschlagen ist.<\/p>\n Anschließend folgt die Definition für die RowDefinition<\/b>– und die ColumnDefinition<\/b>-Elemente für das Grid<\/b> dieses Page<\/b>-Elements, die wir hier ebenfalls nicht abbilden.<\/p>\n Interessanter wird es wieder bei der Definition der Steuerelemente der Seite Seminardetails.xaml<\/b>, die wie in Bild 1 aussehen sollen. Hier finden wir zwei Spalten, von denen die erste jeweils das Label<\/b>-Element aufnimmt und die zweite die eigentlichen gebundenen Steuerelemente.<\/p>\n Bild 1: Entwurf der Seite zur Anzeige der Seminardetails<\/span><\/b><\/p>\n Damit die Steuerelemente die Werte des jeweiligen Datensatzes beziehungsweise des jeweiligen Elements des Entity Data Models anzeigen, werden wir im Anschluss das Code behind-Modul mit einer Eigenschaft namens AktuellesSeminar <\/b>füllen, welches wir beim Anlegen eines neuen Seminars oder beim Bearbeiten eines vorhandenen Seminars jeweils mit dem entsprechenden Element füllen.<\/p>\n Für die zu bindende Eigenschaft geben wir daher einen Ausdruck wie {Binding -AktuellesSeminar.ID, Mode=TwoWay} <\/b>an – hier für das Binden an das Feld ID<\/b>. Für die Elemente mit Validierung definieren wir zusätzlich noch das Attribut ValidatesOnDataErrors <\/b>wie in {Binding AktuellesSeminar.Titel, Mode=TwoWay, ValidatesOnDataErrors=True}<\/b>.<\/p>\n Die ID bilden wir in einem TextBox<\/b>-Element ab, das wir mit dem Wert False <\/b>für das Attribut IsEnabled <\/b>für die Eingabe deaktivieren. Die Felder Titel <\/b>und Inhalt <\/b>werden jeweils mit TextBox<\/b>-Elementen dargestellt, die über das Attribut Text <\/b>an diese Felder gebunden sind.<\/p>\n Für das Feld Preis <\/b>legen wir noch zur Anzeige des Wertes als Währung noch ein spezielles Format fest, nämlich StringFormat<\/b>: {Binding -AktuellesSeminar.Preis, Mode=TwoWay, ValidatesOnDataErrors=True, StringFormat=C}<\/b>. <\/p>\n Das Datum zeigen wir mit einem DatePicker<\/b>-Steuerelement an, die im Feld Seminartermin <\/b>enthaltene Uhrzeit liefern wir mit einer separaten TextBox, die wir ebenfalls an das Feld Seminartermin <\/b>binden. Allerdings legen wir hier mit StringFormat=”t” <\/b>fest, dass nur die Uhrzeit angezeigt wird.<\/p>\n Die gebundenen Felder definieren wir insgesamt wie folgt:<\/p>\n Damit fehlen noch die beiden Schaltflächen, die wir in einem StackPanel<\/b>-Element nebeneinander anordnen. Die Schaltfläche btnSpeichern <\/b>soll nur aktiviert werden, wenn die in der weiter oben definierten statischen Ressource EnableOnValidation<\/b> gestellten Bedingungen erfüllt sind.<\/p>\n Deshalb legen wir im Style<\/b>-Element der Schaltfläche mit dem BasedOn <\/b>fest, das die dortigen Bedingungen für den Wert des Attributs Enabled <\/b>geprüft werden sollen. Die beiden Schaltflächen enthalten wiederum jeweils ein StackPanel<\/b>-Element, welches nebeneinander das Icon und den Schaltflächentext beinhaltet:<\/p>\n Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>Protected Overrides Sub OnModelCreating(modelBuilder As <\/span>DbModelBuilder)\r\n MyBase.OnModelCreating(modelBuilder)\r\n ...\r\n modelBuilder.Entity(Of Seminar). Property(Function(s) s.Seminartermin).HasColumnType(\"datetime2\").HasPrecision(0)\r\nEnd Sub<\/span><\/pre>\nAufruf der Seminarübersicht über das Ribbon<\/h2>\n
Private Sub <\/span>btnSeminaruebersicht_Click(sender As Object<\/span>, e As <\/span>RoutedEventArgs)\r\n Dim <\/span>pgeSeminaruebersicht As <\/span>New<\/span> SeminareUebersicht(fra, dbContext)\r\n fra.Content = pgeSeminaruebersicht\r\nEnd Sub<\/span><\/pre>\nAufruf der Seite zum Anlegen eines neuen Seminars über das Ribbon<\/h2>\n
Private Sub <\/span>btnSeminarAnlegen_Click(sender As Object<\/span>, e As <\/span>RoutedEventArgs)\r\n Dim <\/span>pgeSeminardetails As <\/span>New<\/span> Seminardetails(fra, dbContext)\r\n fra.Content = pgeSeminardetails\r\nEnd Sub<\/span><\/pre>\nValidierung der Seminare bei der Eingabe<\/h2>\n
Imports System.ComponentModel\r\nPublic Class<\/span> Seminar\r\n Implements IDataErrorInfo\r\n Default Public ReadOnly Property Item(columnName As String<\/span>) As String<\/span> Implements IDataErrorInfo.Item\r\n Get\r\n Dim <\/span>strErrorMessage As String<\/span> = \"\"\r\n Select Case columnName\r\n Case <\/span>\"Titel\"\r\n If <\/span>(String.IsNullOrEmpty(Titel)) Then<\/span>\r\n strErrorMessage = \"Bitte geben Sie einen Titel ein.\"\r\n End If<\/span>\r\n Case <\/span>\"Inhalt\"\r\n If <\/span>(String.IsNullOrEmpty(Inhalt)) Then<\/span>\r\n strErrorMessage = \"Bitte geben Sie einen Inhalt ein.\"\r\n End If<\/span>\r\n Case <\/span>\"Preis\"\r\n If <\/span>(Preis < 0 Or String.IsNullOrEmpty(Preis)) Then<\/span>\r\n strErrorMessage = \"Bitte geben Sie einen Preis ein.\"\r\n End If<\/span>\r\n Case <\/span>\"Seminartermin\"\r\n If <\/span>(String.IsNullOrEmpty(Seminartermin) Or Not<\/span> IsDate(Seminartermin)) Then<\/span>\r\n strErrorMessage = \"Bitte geben Sie einen Seminartermin ein.\"\r\n End If<\/span>\r\n End Select<\/span>\r\n Return strErrorMessage\r\n End Get\r\n End Property\r\n Public <\/span>ReadOnly Property [Error] As String<\/span> Implements IDataErrorInfo.Error\r\n Get\r\n ''Throw New<\/span> NotImplementedException()\r\n End Get\r\n End Property\r\nEnd Class<\/span><\/pre>\nDetailseite zum Anlegen und Bearbeiten von Seminaren<\/h2>\n
<Page x:Class=\"Seminardetails\"... Title=\"Seminardetails\">\r\n <Page.Resources>\r\n ...<\/pre>\n
<Style x:Key=\"EnableOnValidation\" TargetType=\"{x:Type Button}\">\r\n <Style.Triggers>\r\n <DataTrigger Binding=\"{Binding ElementName=txtTitel, Path=(Validation.HasError)}\" Value=\"True\">\r\n <Setter Property=\"IsEnabled\" Value=\"False\"><\/Setter>\r\n <\/DataTrigger>\r\n <DataTrigger Binding=\"{Binding ElementName=txtInhalt, Path=(Validation.HasError)}\" Value=\"True\">\r\n <Setter Property=\"IsEnabled\" Value=\"False\"><\/Setter>\r\n <\/DataTrigger>\r\n <DataTrigger Binding=\"{Binding ElementName=txtPreis, Path=(Validation.HasError)}\" Value=\"True\">\r\n <Setter Property=\"IsEnabled\" Value=\"False\"><\/Setter>\r\n <\/DataTrigger>\r\n <DataTrigger Binding=\"{Binding ElementName=txtSeminartermin, Path=(Validation.HasError)}\" Value=\"True\">\r\n <Setter Property=\"IsEnabled\" Value=\"False\"><\/Setter>\r\n <\/DataTrigger>\r\n <\/Style.Triggers>\r\n <\/Style>\r\n<\/Page.Resources><\/pre>\nSteuerelemente der Seite Seminardetails.xaml<\/h2>\n
![\"Entwurf](\"..\/fileadmin\/_temp_\/2021_06\/pic_294_001.png\")
<\/p>\n <Grid>\r\n ...\r\n <Label Content=\"ID:\" Grid.Column=\"0\" \/>\r\n <TextBox x:Name=\"txtID\" Grid.Column=\"1\" HorizontalAlignment=\"Left\" Text=\"{Binding -AktuellesSeminar.ID, Mode=TwoWay}\" Width=\"50\" IsEnabled=\"False\" BorderBrush=\"Transparent\" \/> \r\n <Label Content=\"Titel:\" Grid.Column=\"0\" Grid.Row=\"1\" \/>\r\n <TextBox x:Name=\"txtTitel\" Grid.Column=\"1\" Grid.Row=\"1\" HorizontalAlignment=\"Stretch\" -Text=\"{Binding AktuellesSeminar.Titel, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <Label Content=\"Inhalt:\" Grid.Row=\"2\" \/>\r\n <TextBox x:Name=\"txtInhalt\" Grid.Column=\"1\" Grid.Row=\"2\" HorizontalAlignment=\"Stretch\" -Text=\"{Binding AktuellesSeminar.Inhalt, Mode=TwoWay, ValidatesOnDataErrors=True}\" \/>\r\n <Label Content=\"Preis:\" Grid.Row=\"3\" \/>\r\n <TextBox x:Name=\"txtPreis\" Grid.Column=\"1\" Grid.Row=\"3\" Width=\"100\" Text=\"{Binding -AktuellesSeminar.Preis, Mode=TwoWay, ValidatesOnDataErrors=True, StringFormat=C}\" \/>\r\n <Label Content=\"Seminartermin:\" Grid.Row=\"4\" \/>\r\n <DatePicker x:Name=\"dpSeminartermin\" Grid.Column=\"1\" Grid.Row=\"4\" Width=\"140\" -HorizontalAlignment=\"left\" SelectedDate=\"{Binding AktuellesSeminar.Seminartermin, Mode=TwoWay, ValidatesOnDataErrors=True, TargetNullValue=''''}\"><\/DatePicker>\r\n <Label Content=\"Uhrzeit:\" Grid.Row=\"5\" \/>\r\n <TextBox x:Name=\"txtUhrzeit\" Grid.Column=\"1\" Grid.Row=\"5\" Width=\"140\" HorizontalAlignment=\"left\" Text=\"{Binding AktuellesSeminar.Seminartermin, Mode=TwoWay, ValidatesOnDataErrors=True, TargetNullValue='''', StringFormat=''t''}\"><\/TextBox><\/pre>\nSchaltflächen zum Speichern und zum Verwerfen eines Seminars<\/h2>\n
<StackPanel Orientation=\"Horizontal\" Grid.Row=\"6\" Grid.ColumnSpan=\"4\" >\r\n <Button x:Name=\"btnSpeichern\" Click=\"btnSpeichern_Click\">\r\n <Button.Style>\r\n <Style TargetType=\"{x:Type Button}\" BasedOn=\"{StaticResource EnableOnValidation}\">\r\n <Style.Setters>\r\n <Setter Property=\"Margin\" Value=\"2\"><\/Setter>\r\n <\/Style.Setters>\r\n <\/Style>\r\n <\/Button.Style>\r\n <StackPanel Orientation=\"Horizontal\">\r\n <Image Source=\"images\/ok.png\" Width=\"24\" Height=\"24\"><\/Image>\r\n <Label>OK<\/Label>\r\n <\/StackPanel>\r\n <\/Button>\r\n <Button x:Name=\"btnVerwerfen\" Click=\"btnVerwerfen_Click\">\r\n <StackPanel Orientation=\"Horizontal\">\r\n <Image Source=\"images\/delete.png\" Height=\"24\" Width=\"24\"><\/Image>\r\n <Label>Verwerfen<\/Label>\r\n <\/StackPanel>\r\n <\/Button>\r\n <\/StackPanel>\r\n <\/Grid>\r\n<\/Page><\/pre>\nAnwendungslogik in der Datei Seminarverwaltung.xaml.vb<\/h2>\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