Visible-Eigenschaft einer Schaltfläche im Unterformular bei Current-Ereignis

Mal das Formular in der Entwurfsansicht öffnen und in den Eigenschaften der Schaltfläche nachschauen, ob dort unter "Beim Klicken" ein Ereignis eingetragen ist.

Ingo

Wir verwenden einen Übersetzungsdienst, um unsere Benutzer zu unterstützen. Bitte entschuldigen Sie grammatikalische Fehler.
<br />

Ja, jedes Steuerelement verfügt über eine Fore Color-Eigenschaft, die die Farbe der Schriftart steuert. Außerdem ein Schriftname und eine Schriftgrößeneigenschaft. Ich denke jedoch, dass Sie sich auf die VCR-Symbole auf den anderen Schaltflächen beziehen. Es sieht so aus, als würden Sie das Standardbild verwenden, das vom Befehlsschaltflächen-Assistenten angeboten wird. Ich denke, diese Bitmap-Symbole sind statisch. Wenn das Ändern der Eigenschaften dieser Schaltflächen sie nicht ändert, besteht eine andere Lösung darin, zu versuchen, andere Symbole zu finden. Wenn Sie nach "VCR-Schaltflächensymbolen" suchen, sollten Sie kostenlose Download-Symbole finden.

Sie können dann Ihre vorhandenen Schaltflächen transparent machen und sie über den heruntergeladenen Bildern platzieren. Oder Sie können die Bilder auf dem Formular platzieren und den Code im On Click-Ereignis in das On Click-Ereignis des Bildes umwandeln.

UdoBraxas wrote:

An den von Dir vorgeschlagenen Weg hatte ich auch gedacht. Nur - ich

finde im Eigenschaftsfenster die entsprechenden Eigenschaften nicht.

Kann es sein, dass diese nur angezeigt werden, wenn ich beide

Formulare auf eine Art "Oberformular" ziehe?

Wenn ich zwei zunächst völlig gleichberechtigte, unabhängige

Formulare habe und diese als Haupt- und Unterformular "verlinken"

will, werden mir die Eigenschaften im Eigenschafts-Fenster nicht

angezeigt. Oder mach ich da was falsch? Egal wo ich den Rahmen

anklicke - die Eigenschaften zeigen sich nicht.

Da du von "UFO, Parent" etc. schriebst, nahm ich an, dass du

wirklich eine Haupt- und Unterformular-Konstruktion hättest.

D.h. ein Formular, in dem sich ein Unterformular-Steuerelement

befindet, in dem ein zweites Formular angezeigt wird.

Die beschriebenen Eigenschaften gibt es nur für dieses

Unterformular-Steuerelement, das du bei den

Steuerelementen finden kannst. Eine einfache Methode

zur Erzeugung eines echten Unterformulares ist:

- ein Formular in Entwurfsansicht öffnen

- je nach Access-Version im Datenbankfenster oder

Navibereich ein anderes Formular mit der Maus schnappen

und auf die Entwurfsansicht des ersten Formulares ziehen

und fallenlassen

- wenn die Verknüpfungsfelder gleich heißen, werden sie

dabei sogar meistens gleich von Access in die schon

erwähnten Verknüpfungseigenschaften eingesetzt

Wenn du die beiden Formulare nicht unbedingt getrennt geöffnet

brauchst, dann verwende diese Haupt/Unterformular-Konstruktion,

denn sie bietet den großen Vorteil der automatischen

Synchronisation ohne eine Zeile Code.

Servus

Karl

*******

Access-FAQ: http://www.donkarl.com

Stell ich mir problematisch vor, weil das Formular zudem noch ein Unterformular besitzt. Wenn der User vom Haupt- in das Unterformular wechselt oder zurück, wird das Ereignis "Beim Verlassen" ausgeführt. Das wäre aber nicht optimal, wenn auch gleich das
Requery dann ausgeführt werden würde.

Ich denke, es wäre wirklich am einfachsten, wenn ich die Navigationsschaltfläche ersetzte und meine eigenen erstelle, die ich dann individuell steuern kann. Ich mache es ungern, aber eine bessere Lösung sehe ich nicht...

Ich gehe davon aus, dass du die Namen deiner Steuerelemente kennst. Dann kannst du folgendes im Ereignis "Nach Aktualisierung" des Bauteil-Steuerelements reinschreiben (für den Fall dass das Steuerelement auch Bauteil heißt):

Private Sub Bauteil_AfterUpdate()  'Zuerst alle unsichtbar:  With Me    !RohrFitting1.Visible=False    !RohrFitting2.Visible=False    !RohrFitting3.Visible=False    '... usw.  End With
  Select Case Me!Bauteil.Value '"Bauteil" = Name des Steuerelements  Case "Rohr"    With Me      !RohrFitting1.Visible=True      !Flansch1.Visible=True      !Bund1.Visible=True      !Flansch2.Visible=True      !Bund2.Visible=True    End With  Case "Reduzierstück"    With Me      !RohrFitting1.Visible=True      !Flansch1.Visible=True      !Flansch2.Visible=True    End With  Case "..." 'usw.    End SelectEnd Sub
(Luftcode)

Gruss - Peter