Dynamische Titelleiste

Infos zum aktuellen Datensatz in der Titelleiste anzeigen: Gruppe und Album

Immer wenn man zu einem Datensatz geht oder wechselt, tritt das Formularereignis "Beim Anzeigen" (engl.: Current) ein. In diesem Moment soll die Gruppe und das Album an die Titelleiste übergeben werden

Gehen Sie dazu wie folgt vor:

1. Wechseln Sie beim Formular frmAlben in die Entwurfsansicht.
2. Wählen Sie unter Eigenschaften des Formulars Ereignis\Beim Anzeigen\Ereignisprozedur und starten Sie den VB-Editor
3. Tragen Sie in das vorbereitete Gerüst der Ereignisprozedur folgenden Code ein:
   Private Sub Form_Current()
   Me.Caption = Me.Interpret & " - " & Me.Album
   End Sub
4. Probieren Sie aus, ob der Code funktioniert!

Erläuterungen

Me bezieht sich auf das aktuelle Objekt - hier das Formular frmAlben.

Mit Me.Caption wird die Titelleiste des Formulars angesprochen.

Die Titelleiste bekommt die Werte der Felder Interpret und Album des Formulars zugewiesen.

Durch & " - " wird das Einfügen von Leerzeichen und eines Bindestriches erreicht, denn in den Feldern gibt es ja keine Leerzeichen nach Wörtern.

Anzeige von Gruppe und Titel auf dem Formular frmTitel

Beachten Sie bitte: Die Gruppe und das Album stehen auf dem Formular frmAlben, also können sie nicht mit dem Schlüsselwort Me referenziert werden. Auch wäre es sinnlos, die Anzeige der Titelleiste bei jedem Titel vorzunehmen, denn die Titel gehören ja alle zum selben Album.

Gehen Sie dazu wie folgt vor:

1. Wechseln Sie beim Formular frmTitel in die Entwurfsansicht.
2. Wählen Sie unter Eigenschaften des Formulars Ereignis\Beim Öffnen\Ereignisprozedur und starten Sie den VB-Editor
3. Tragen Sie in das vorbereitete Gerüst der Ereignisprozedur folgenden Code ein:
   Private Sub Form_Open(Cancel As Integer)
   Me.Caption = Forms("frmAlben").Controls("Interpret") & " - " & Forms("frmAlben").Controls("Album")
   End Sub
4. Probieren Sie aus, ob der Code funktioniert!