Mouseover Effekt für Microsoft Access

Hallo,

da ich mich durch das Vordiplomprojekt gerade wieder intensiver mit Access auseinandersetze und einige aus meiner Sicht nützliche Module entwickelt habe, wollte ich diese mit euch teilen.

Da alle Access-Anwendungen immer gleich aussehen, dachte ich: Irgendwie muss es doch möglich sein Access optisch ein wenig aufzuwerten. Dazu sind eigene Buttons mit Mouseover-Effekt genau richtig.

Hier könnt ihr ein Modul runterladen, dass euch bei der Erstellung von MouseOver Buttons unterstützt. Download mdl_icon

Wie wird das Modul benutzt?

Als erstes importiert ihr das Modul in euer Projekt.

In den _Load() Teil eures Hauptformulars fügt ihr die folgenden Zeilen ein:

Me.SetFocus
Call init_Icon

Damit initialisiert ihr die Mouseover funktion.

Jetzt könnt ihr in eurem Formular in der Entwurfsansicht Bilder hinzufügen, die später als Buttons dienen sollen. Der Name des Bildes muss dem Dateinamen des JPEG-Bildes entsprechen, welches im Verzeichnis: Ort der DB\res\… abgelegt wird und mit ico_ beginnen.

Bsp.:

Name des Bildcontrols = ico_home, dann wird als Bild DB\res\ico_home.jpg verwendet

Nun müsst ihr nurnoch für jedes Bild eine MouseMove und Click funktion anlegen.

Bsp.:

Private Sub ico_home_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Call button_repaint("ico_home", "over")
End Sub

Private Sub ico_home_Click()

    'Eure Aktionen
    'und dann:
     Call button_repaint("ico_home", "active")
End Sub

Wie euch sicherlich aufgefallen ist wird der button_repaint methode immer der Name und die Aktion als String übergeben.

button_repaint kümmert sich dann um die Anpassung aller Bilder - ihr müsst nur die Bilder bereitstellen. Diese müssen folgendem Shema entsprechen:

Normales Bild: ico_NameDesControls.jpg

MouseOver Bild: ico_NameDesControls_over.jpg

Active Bild: ico_NameDesControls_active.jpg

Ihr könnt das Modul gerne Anpassen und Erweitern - es wäre aber schön, wenn ihr mir eure Verbesserungen auch zukommen lassen könntet.

Viel Spaß mit dem Modul

Posted by admin Posted in: Access No Comments » September 2008