<\/p>\n
Autor: André Minhorst, Duisburg<\/p>\n
<\/b><\/p>\n
Access stellt dem Entwickler eine Menge Steuerelemente zur Verfügung, die in der Standardkonfiguration ein einheitliches, Microsoft Windows-konformes Aussehen der Benutzeroberfläche gewährleisten. Manchen mag die graue Zweckmäßigkeit der Standard-Steuerelemente irgendwann langweilen. Das führt im ersten Schritt meist zu Variationen der verwendeten Schriftarten, Hintergrund- und Schriftfarben usw. Ein jähes Ende steht all diesen Bemühungen jedoch bevor, wenn es an die Schaltflächen geht: Microsoft Access sieht keine Möglichkeit vor, das Aussehen der Schaltflächen zu verändern. Im vorliegenden Beitrag erfahren Sie, wie Sie dennoch zu individuell gestalteten Schaltflächen kommen.<\/b><\/p>\n
Einen ersten überblick über die unterschiedlichen Möglichkeiten, eine Schaltfläche im Aussehen zu verändern, bietet das Register Format des Eigenschaftsfensters einer Schaltfläche in der Entwurfsansicht (siehe Bild 1).<\/p>\n
![](\"..\/fileadmin\/_temp_\/{92E5510C-45CA-4146-83D7-4AA943F82B1C}\/pic001.png\")
<\/p>\n
<\/b><\/p>\n
Bild 1: Eigenschaften einer Schaltfläche<\/span><\/b><\/p>\n Hier fehlen einige Eigenschaften, die Sie von anderen Steuerelementen her kennen. Dazu gehören z.B. Hintergrundart und -farbe, Spezialeffekt, Rahmenart, -farbe und -breite. Wären diese Eigenschaften vorhanden, könnten Sie die Schaltflächen genauso wie alle anderen Steuerelemente anpassen.<\/p>\n Nun müssen Sie sich allerdings mit einigen Alternativen vertraut machen. Die erste Alternative befindet sich direkt im oberen Bereich des Eigenschaftsfensters: die Verwendung eines Bildes statt einer Beschriftung.<\/p>\n Als weitere Alternative kommt die Verwendung weiterer Steuerelemente infrage, die zur Initiierung einer Prozedur verwendet werden können: Das sind immerhin alle Steuerelemente, die über Aktionen verfügen, die auf Mausklicks reagieren.<\/p>\n Leider verfügen aber nicht alle anderen Steuerelemente über die notwendigen Eigenschaften herkömmlicher Schaltflächen.<\/p>\n Im vorliegenden Heft finden Sie die Musterlösung Projektverwaltung. Die Benutzeroberfläche der Musterlösung zeigt einen alternativen Vorschlag zur Gestaltung von Formularen und Steuerelementen. Die Beispiele der folgenden Abschnitte zielen auf die Realisierung des dort verwendeten Designs der Schaltflächen ab (siehe Bild 2). <\/p>\n Um eine Schaltfläche mit einer anderen Hintergrundfarbe als üblich zu erhalten, könnten Sie beispielsweise eine Grafikdatei in die Schaltfläche einbinden.<\/p>\n Dazu müssen Sie allerdings zunächst einmal die Grafikdatei erstellen, die den gewünschten Schriftzug in der entsprechenden Farbe enthält. Nachdem Sie das erfolgreich ausgeführt haben, können Sie die Datei in die Schaltfläche einbinden. Dazu klicken Sie auf die Eigenschaft Bild und anschließend auf die nun erscheinende Schaltfläche mit den drei Punkten.<\/p>\n <\/b><\/p>\n Bild 2: Alternative Steuerelementgestaltung in der Projektverwaltung-Musterlösung<\/span><\/b><\/p>\n <\/b><\/p>\n Bild 3: Eine Schaltfläche mit Bild<\/span><\/b><\/p>\n Dadurch öffnen Sie den Dialog Bildauswahl-Editor. Sie können hier entweder eines der vorhandenen Bilder auswählen oder mit der Schaltfläche Durchsuchen einen Dialog zur Auswahl weiterer Dateien aufrufen.<\/p>\n Mit diesem Dialog wählen Sie die gewünschte Abbildung aus und bestätigen die Eingabe. Das Resultat kann nicht ganz befriedigen: Die Abbildung zeigt zwar das gewünschte Ergebnis, aber der Rand der Schaltfläche erscheint immer noch im unerwünschten Hellgrau (siehe Bild 3).<\/p>\n Ein weiterer Nachteil ist, dass Sie auf die beschriebene Art und Weise für jede Schaltfläche eine neue Grafik erstellen müssen.<\/p>\n Eine weitere Alternative ist die Verwendung eines anderen Steuerelements, das ebenfalls beim Klicken oder Doppelklicken mit der Maus eine entsprechende Prozedur auslösen kann.<\/p>\n Da die Anforderung eine Schaltfläche mit einer Schrift auf einer anderen Hintergrundfarbe als Dunkelgrau beinhaltet, kommen hier am ehesten die beiden Elemente zur Darstellung von Text in Frage: Textfelder und Bezeichnungsfelder.<\/p>\n Die Verwendung von Textfeldern erscheint zunächst sinnvoll, da sie im Gegensatz zu Bezeichnungsfeldern auch über die Tabulatortaste erreichbar sind und den Fokus erhalten können.<\/p>\n Sie haben allerdings den Nachteil, dass sie beim Erhalt des Focus sofort die blinkende Einfügemarke anzeigen. Auch das Deaktivieren hilft hier nicht weiter, denn ein deaktiviertes Textfeld reagiert auch nicht auf einen Mausklick.<\/p>\n <\/p>\n Bezeichnungsfelder haben den bereits erwähnten Nachteil, dass sie nicht über die Tabulatortaste ausgewählt werden können. Dies macht eine Verwendung ohne Maus unmöglich.<\/p>\n Außerdem verändern Sie bei Betätigung nicht das Aussehen wie bei herkömmlichen Schaltflächen – diese sind im Normalzustand erhöht und bei gedrückter Maustaste vertieft dargestellt (siehe Bild 4).<\/p>\n <\/b><\/p>\n Bild 4: Bezeichnungsfelder als Schaltflächen<\/span><\/b><\/p>\n Dieses Verhalten lässt sich mit Bezeichnungsfeldern allerdings simulieren: Sie müssen dazu lediglich zwei Ereignisprozeduren für die Ereigniseigenschaften Bei Maustaste ab und Bei Maustaste auf anlegen (s. Quellcode 1 und Quellcode 2). <\/p>\n Quellcode 1<\/b><\/p>\n Quellcode 2<\/b><\/p>\n Die Prozeduren sorgen dafür, dass die Eigenschaft Spezialeffekt beim Herunterdrücken der Maustaste den Wert 2 und beim Loslassen der Maustaste den Wert 1 erhält. Dadurch erreichen Sie fast den gleichen optischen Effekt wie beim Klicken auf eine herkömmliche Schaltfläche.<\/b><\/p>\n Da es aber nicht möglich ist, den Fokus auf ein Bezeichnungsfeld zu verschieben, können Sie diesen Lösungsansatz vergessen – außer, Sie verwenden doch wieder eine herkömmliche Schaltfläche, wie das folgende Kapitel beschreibt.<\/p>\n Wenn Sie eine herkömmliche Schaltfläche und das soeben erstellte Bezeichnungsfeld kombinieren, erhalten Sie eine fast voll funktionsfähige Schaltfläche mit attraktivem Design.<\/p>\n Legen Sie einfach eine Schaltfläche mit identischer Größe über das Bezeichnungsfeld. Stellen Sie die Eigenschaft Transparent der Schaltfläche auf Ja ein. Auf diese Weise machen Sie die Schaltfläche zwar unsichtbar, aber sie bleibt dennoch voll funktionsfähig.<\/p>\n Sie müssen nun lediglich die beiden Funktionen des Bezeichnungsfeldes für die entsprechenden Ereigniseigenschaften der Schaltfläche hinterlegen (s. Quellcode 1 und 2).<\/p>\n Damit auch das Betätigen einer Taste zum Auslösen der Schaltfläche führt, legen Sie die beiden Funktionen auch noch für die Eigenschaften Bei Taste ab und Bei Taste auf an.<\/p>\n Die einzige fehlende Funktionalität ist die Anzeige des Fokuserhalts und -besitzes. Herkömmliche Schaltflächen zeigen einen gestrichelten Rahmen um die Schrift herum an, wenn Sie den Fokus haben.<\/p>\n Wenn Sie unbedingt denselben gestrichelten Rahmen rund um die Schrift positionieren möchten, bleibt Ihnen wohl doch nicht der Weg erspart, mit Grafiken zu arbeiten.<\/p>\n Wenn Sie allerdings auch mit einer Alternative einverstanden sind, versuchen Sie es einmal wie im folgenden Abschnitt beschrieben.<\/p>\n Quellcode 3<\/b><\/p>\n Quellcode 4<\/b><\/p>\n Quellcode 5<\/b><\/p>\n Legen Sie für die Ereigniseigenschaften Bei Fokuserhalt und Bei Fokusverlust die Prozeduren aus Quellcode 3 und Quellcode 4 an.<\/p>\n Die beiden Prozeduren sorgen dafür, dass die Beschriftung des Bezeichnungsfeldes bei Fokuserhalt unterstrichen und bei Fokusverlust wieder normal angezeigt wird.<\/p>\n Hierbei gibt es nur ein kleines Problem: Wenn die Schaltfläche über die Tabulator-Taste den Fokus erhält, löst das Loslassen der Tabulator-Taste bereits die Bei Taste auf-Ereigniseigenschaft aus, wodurch das Bezeichnungsfeld erhöht angezeigt wird.<\/p>\n Dies entspricht ja noch dem gewünschten Ablauf. Verlässt man dann die Schaltfläche durch erneute Benutzung der Tabulator-Taste, passiert Folgendes: Das Drücken der Tabulatortaste löst die Bei Maus ab-Ereigniseigenschaft aus, wodurch das Bezeichnungsfeld vertieft angezeigt wird.<\/p>\n Das Bei Taste auf-Ereignis, welches das Bezeichnungsfeld wieder normal angezeigt hätte, bleibt allerdings aus, da die Schaltfläche beim Loslassen der Tabulatortaste bereits wieder den Fokus verloren hat.<\/p>\n Dem können Sie entgegenwirken, indem Sie beim Bei Taste ab-Ereignis überprüfen, ob es sich bei der Taste um die Tabulatortaste handelt. In dem Fall soll der Spezialeffekt des Bezeichnungsfeldes nicht auf den Wert 2 geändert werden.<\/p>\n Das erreichen Sie durch änderung der Ereignisprozedur über Quellcode 5.<\/p>\n Die Geschmäcker sind ja bekanntlich verschieden, aber möglicherweise gefällt Ihnen die Variante mit der unterstrichenen Schrift im Stil eines Hyperlinks ja sogar besser als die gestrichelte Umrandung.<\/p>\n Zum Vergleich finden Sie in Bild 5 und Abb. 6 noch einmal die Unterschiede zwischen der Standardschaltfläche von Access und der neu erstellten Schaltfläche.<\/p>\n <\/b><\/p>\n Bild 5: Die drei Zustände einer herkömmlichen Schaltfläche …<\/span><\/b><\/p>\n <\/b><\/p>\n Bild 6: … und diejenigen der neuen Schaltfläche.<\/span><\/b><\/p>\n In Quellcode 6 finden Sie eine Zusammenfassung der Ereignisprozeduren, die Sie zur einwandfreien Funktion der neuen Schaltfläche benötigen.<\/p>\n Der Wunsch nach einem alternativen Schaltflächendesign erfordert nicht unbedingt die Zuhilfenahme weiterer OCX-Steuerelemente oder die Erstellung von Abbildungen.<\/p>\n Mit ein wenig Mehraufwand lassen sich Schaltflächen mit attraktivem Design auch mit den Bordmitteln von Access realisieren.<\/p>\n Wenn Sie in Zukunft auch in Ihre Anwendungen alternative Schaltflächendesigns aufnehmen möchten, sollten Sie allerdings eines beachten: Eine Software ist in den seltensten Fällen direkt im ersten Anlauf frei von Fehlern und auch deren Funktionsumfang wird vermutlich an der einen oder anderen Stelle noch geändert oder ergänzt. Sparen Sie sich die optische Optimierung daher für den Moment auf, an dem Sie die eigentliche Anwendung für fehlerfrei halten. Dann macht es umso mehr Spaß, dem Produkt noch den optischen Feinschliff zu geben.<\/p>\n Die im vorliegenden Beitrag vorgestellte Anpassung des Schaltflächendesigns ist natürlich nur eine von zahllosen Möglichkeiten. Sie können beispielsweise auch die Schriftfarbe der Schaltfläche ändern, wenn diese den Fokus erhält. Oder Sie erstellen einfach Schaltflächen im Hyperlink-Design, wie Sie es von Internetseiten her kennen. Denn: Wer sagt überhaupt, dass eine Schaltfläche beim Klicken unbedingt vertieft statt – wie im normalen Zustand – erhöht dargestellt werden muss<\/p>\n Quellcode 6<\/b><\/p>\n Lassen Sie Ihrer Phantasie freien Lauf und überraschen Sie die Benutzer Ihrer Anwendung einfach mit einem neuen Design (falls es ein Corporate Design in Ihrer Firma oder der Firma des zukünftigen Anwenders gibt, haben Sie ja bereits einen Anhaltspunkt)!<\/p>\n","protected":false},"excerpt":{"rendered":" Access stellt dem Entwickler eine Menge Steuerelemente zur Verfügung, die in der Standardkonfiguration ein einheitliches, Microsoft Windows-konformes Aussehen der Benutzeroberfläche gewährleisten. Manchen mag die graue Zweckmäßigkeit der Standard-Steuerelemente irgendwann langweilen. Das führt im ersten Schritt meist zu Variationen der verwendeten Schriftarten, Hintergrund- und Schriftfarben und so weiter. Ein jähes Ende steht all diesen Benühungen jedoch bevor, wenn es an die Schaltflächen geht: Microsoft Access sieht keine Möglichkeit vor, das Aussehen der Schaltflächen zu verändern. Im vorliegenden Beitrag erfahren Sie, wie Sie dennoch zu individuell gestalteten Schaltflächen kommen.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[66022002,662002,44000028,44000023],"tags":[],"class_list":["post-55000054","post","type-post","status-publish","format-standard","hentry","category-66022002","category-662002","category-Ergonomie_und_Benutzeroberflaeche","category-Mit_Formularen_arbeiten"],"yoast_head":"\nHinweis<\/h3>\n
![](\"..\/fileadmin\/_temp_\/{92E5510C-45CA-4146-83D7-4AA943F82B1C}\/pic002.png\")
<\/p>\n![](\"..\/fileadmin\/_temp_\/{92E5510C-45CA-4146-83D7-4AA943F82B1C}\/pic003.png\")
<\/p>\nTextfelder als Schaltfläche<\/h2>\n
Bezeichnungsfelder alsSchaltflächen<\/h2>\n
![](\"..\/fileadmin\/_temp_\/{92E5510C-45CA-4146-83D7-4AA943F82B1C}\/pic004.png\")
<\/p>\nPrivate Sub lblTest_MouseDown(Button As _ Integer, Shift As Integer, X As _ Single, Y As Single)\r\n Me.lblTest.SpecialEffect = 2\r\nEnd Sub<\/pre>\n
Private Sub lblTest_MouseUp(Button As _ Integer, Shift As Integer, X As _ Single, Y As Single)\r\n Me.lblTest.SpecialEffect = 1\r\nEnd Sub<\/pre>\n
![](\"..\/fileadmin\/_temp_\/{92E5510C-45CA-4146-83D7-4AA943F82B1C}\/pic005.png\")
<\/p>\nPrivate Sub cmdTest_GotFocus()\r\n Me.lblTest.FontUnderline = True\r\nEnd Sub<\/pre>\n
Private Sub cmdTest_LostFocus()\r\n Me.lblTest.FontUnderline = False\r\nEnd Sub<\/pre>\n
Private Sub cmdTest_KeyDown(KeyCode As _ Integer, Shift As Integer)\r\n If KeyCode <> vbKeyTab Then\r\n Me.lblTest.SpecialEffect = 2\r\n End If\r\nEnd Sub<\/pre>\n
![](\"..\/fileadmin\/_temp_\/{92E5510C-45CA-4146-83D7-4AA943F82B1C}\/pic006.png\")
<\/p>\n![](\"..\/fileadmin\/_temp_\/{92E5510C-45CA-4146-83D7-4AA943F82B1C}\/pic007.png\")
<\/p>\nPrivate Sub cmdTest_Click()\r\n ''Aktion,die durch die Schaltfläche ausgelöst wird\r\nEnd Sub\r\nPrivate Sub cmdTest_KeyDown(KeyCode As Integer, Shift As Integer)\r\n If KeyCode <> vbKeyTab Then '' Wenn keine Tabulatortaste: \r\n Me.lblTest.SpecialEffect = 2 '' Bezeichnungsfeld vertieft\r\n End If '' darstellen\r\nEnd Sub\r\nPrivate Sub cmdTest_KeyUp(KeyCode As Integer, Shift As Integer)\r\n Me.lblTest.SpecialEffect = 1 '' Beim Loslassen der Taste: \r\nEnd Sub '' Bezeichnungsfeld erhöht darstellen\r\nPrivate Sub cmdTest_GotFocus()\r\n Me.lblTest.FontUnderline = True '' Bei Fokuserhalt:\r\nEnd Sub '' Text des Bezeichnungsfeldes unterstreichen\r\nPrivate Sub cmdTest_LostFocus()\r\n Me.lblTest.FontUnderline = False '' Bei Fokusverlust:\r\nEnd Sub '' Text des Bezeichnungsfeldes normal\r\nPrivate Sub cmdTest_MouseDown(Button As Integer, Shift As Integer, X As Single, _ Y As Single)\r\n Me.lblTest.SpecialEffect = 2 '' Bei Maustaste gedrückt:\r\nEnd Sub '' Bezeichnungsfeld vertieft darstellen\r\nPrivate Sub cmdTest_MouseUp(Button As Integer, Shift As Integer, X As Single, _ Y As Single) \r\n Me.lblTest.SpecialEffect = 1 '' Bei Maustaste losgelassen:\r\nEnd Sub '' Bezeichnungsfeld erhöht darstellen<\/pre>\n