Eine Navigationsshell bauen

In diesem Tutorial bauen Sie ein Shell-Formular mit einer WklNavBar links und einem Seiten-Unterformular, das den Rest ausfüllt; beide ordnet ein WklDockLayout an. Die Einträge entwerfen Sie ohne Code, eine Ereignisprozedur tauscht die Seite aus, und ein Badge zeigt eine Anzahl. Das dauert etwa fünfzehn Minuten.

• Microsoft 365 Access oder Access Runtime, in 32 oder 64 Bit, mit der WKL Forms Object Library 1.24 oder höher, installiert und für den aktuellen Windows-Benutzer registriert (Freigegebenes Paket installieren).
• Eine neue Datenbank an einem vertrauenswürdigen Speicherort.
• Jedes WKL-Steuerelement öffnet seinen Designer auf dieselbe Weise: in der Entwurfsansicht im Eigenschaftenblatt (F4), Registerkarte Andere, Zeile Benutzerdefiniert, [...] (Designer eines Steuerelements öffnen).

Führen Sie diese Zeilen nacheinander im Direktbereich (Strg+G) aus:

CurrentDb.Execute "CREATE TABLE tblKunden (KundeID COUNTER PRIMARY KEY, Firma TEXT(50), Ort TEXT(50))"
CurrentDb.Execute "INSERT INTO tblKunden (Firma, Ort) VALUES ('Albers', 'Bonn')"
CurrentDb.Execute "INSERT INTO tblKunden (Firma, Ort) VALUES ('Bauer', 'Köln')"

Markieren Sie tblKunden im Navigationsbereich und wählen Sie Erstellen › Formular; speichern Sie das Formular als frmKunden. Wählen Sie Erstellen › Leeres Formular, setzen Sie ein Bezeichnungsfeld „Willkommen“ darauf und speichern Sie es als frmStart. Das sind die Seiten, die die Shell zeigt.

Erstellen Sie ein Formular in der Entwurfsansicht, setzen Sie Standardansicht auf Einzelnes Formular, Datensatzmarkierer und Navigationsschaltflächen auf Nein, und speichern Sie es als frmShell. Im Detailbereich:

1. Wählen Sie Formularentwurf › Steuerelemente › ActiveX-Steuerelemente, markieren Sie WKL Navigation Bar, klicken Sie auf OK und ziehen Sie das Steuerelement entlang des gesamten linken Rands auf, etwa 6 cm breit. Nennen Sie es navMain.
2. Ziehen Sie über den Rest des Bereichs ein Unterformular-Steuerelement auf, nennen Sie es sfPage und setzen Sie sein Herkunftsobjekt auf Form.frmStart.
3. Fügen Sie auf dieselbe Weise WKL Dock Layout ein, ziehen Sie es über beide auf, nennen Sie es Layout1 und wählen Sie Anordnen › In den Hintergrund.

Lassen Sie die Verankerung von navMain und sfPage auf Oben links. Klicken Sie im Eigenschaftenblatt von Layout1, Registerkarte Andere, in der Zeile Benutzerdefiniert auf [...] und prüfen Sie auf der Seite Bereiche, dass das Layout navMain (Links) und sfPage (Füllen) gefunden hat; klicken Sie auf OK.

Markieren Sie navMain und klicken Sie im Eigenschaftenblatt in der Zeile Benutzerdefiniert auf [...]. Auf der Seite Einträge:

1. Klicken Sie auf Eintrag. Setzen Sie in den Feldern unter der Liste Schlüssel auf start und Beschriftung auf Start, und klicken Sie neben Symbol auf Auswählen …: Geben Sie haus ein und drücken Sie die Eingabetaste. Schalten Sie Beim Öffnen ausgewählt ein.
2. Klicken Sie auf Gruppe und setzen Sie Schlüssel auf data und Beschriftung auf Daten.
3. Klicken Sie bei ausgewählter Gruppe auf Eintrag: Schlüssel customers, Beschriftung Kunden, Symbol people (Suche personen).
4. Klicken Sie erneut auf Eintrag, setzen Sie Schlüssel auf settings, Beschriftung auf Einstellungen und das Symbol auf zahnrad, und wählen Sie unter Platz den Wert Unten am Rand.

Die Vorschau zeigt die Leiste aufgeklappt und als Symbolspalte. Klicken Sie auf OK und speichern Sie das Formular.

Öffnen Sie das Formularmodul (Formularentwurf › Code anzeigen) und fügen Sie hinzu:

Private Sub navMain_Navigate(ByVal Key As String)
    Select Case Key
        Case "start": Me!sfPage.SourceObject = "Form.frmStart"
        Case "customers": Me!sfPage.SourceObject = "Form.frmKunden"
        Case "settings": MsgBox "Einstellungen"
    End Select
End Sub
 
Private Sub Form_Load()
    ' Badges are run-time values: set them whenever the form opens.
    Me!navMain.Object.SetBadge "customers", DCount("*", "tblKunden"), wskInfo
End Sub

Öffnen Sie frmShell in der Formularansicht und probieren Sie aus:

• Klicken Sie auf Kunden: Die Seite zeigt die Kunden; der Eintrag ist markiert.
• Klicken Sie auf die Umschaltfläche (drei Striche) oder drücken Sie Strg+B: Die Leiste wird zur Symbolspalte, und die Seite wird breiter; ein weiteres Mal, und sie klappt wieder auf. Strg+B wirkt auch, während ein Feld der Seite den Fokus hat.
• Ziehen Sie die Trennleiste zwischen Leiste und Seite: Die aufgeklappte Leiste wird breiter.
• Wechseln Sie mit der Tabulatortaste in die Leiste und verwenden Sie die Pfeiltasten und die Eingabetaste.
• Schließen Sie das Formular und öffnen Sie es erneut: Modus und Breite sind so, wie Sie sie verlassen haben.

Eine Shell, deren Seite mit dem gewählten Eintrag wechselt, eine Leiste, die zwischen Beschriftungen und Symbolen umschaltet und die Wahl jedes Benutzers behält, ein Badge mit der Anzahl der Kunden – und außer der Prozedur Navigate und dem Badge kein Code.

• Navigationsleiste aus einer Tabelle füllen: dieselbe Shell ohne die Prozedur Navigate, Einträge und Seiten in einer Tabelle
• Anzahlen an Navigationseinträgen anzeigen
• Auf einer Seite mit ungespeicherten Änderungen bleiben
• Navigationsleiste über der Seite einblenden
• Layout auf einer Navigationsseite verwenden
• Formulare über die Navigationsleiste öffnen
• Überblick WklNavBar