|
Member
Beiträge: 9
| Überraschung!!
Hallo Peter,
beim Ergänzen der Formulare durch ein paar Ereignisprozeduren hatte ich plötzlich in allen Kombiformularen wieder leere Rahmen. Zusammen mit meinem Sohn als Diskussionspartner haben wir die eigentliche Ursache gefunden, es ist - reproduzierbar - die OnCurrent-Routine, die ich Dir in einem der Posts geschickt habe. Im speziellen ist es dort das Findfirst, das ich auf das Hauptformular absetze, während Access noch die anderen UFOs zeichnet.
Dieses Findfirst unterbricht/stoppt den restlichen Formularaufbau.
Ich habe nun in einer Kopie des Problemformulars "frmWatchlist_Kennzahlen" die kleinen UFOs wieder vom Header ins Hauptfenster bewegt, und das große UFO, was in seinem OnCurrent das Findfirst absetzt, gelöscht und (samt des problematischen Codes) wieder eingefügt. Es ist nun aus Sicht von Access das letzte Element der UFO-Liste. Somit findet das Findfirst erst dann statt, wenn die anderen UFOs bereits aktiv sind
Ergebnis: das Formular tut nun was es soll, ohne eine Zeile Code zu ändern.
Hier nochmal die problematische OnCurrent-Routine:
Private Sub Form_Current()
Dim p As Object
'Dieses Formular ist ein Unterformular, finde das HFO. Wenns kein Parent gibt, keine sync
On Error GoTo ende
Set p = Me.Parent
' ISIN der ausgewählten Zeile ans Hauptformular schicken und dort ein Findfirst machen
p.Recordset.FindFirst "depISIN = '" & Me!depISIN & "'"
ende:
End Sub
Sobald man die Zeile mit dem Findfirst auskommentiert, werden alle Fenster gezeichnet, aber es fehlt der Sync mit dem Hauptformular.
In der vorbereiteten Beispieldatenbank habe ich beide Formulare: Identische UFOs, identischer Code, aber eine andere Reihenfolge/Sequenznummer der UFOs. Einmal funktionierts und einmal nicht.
Ich habe bisher übrigens noch keine Info von Dir, wo ich die Beispieldb mit den beiden Formularen abladen soll. Da ich - obwohl so eingestellt - auch keine Mail bekomme, wenn es einen Reply auf mein Thema gibt gehe ich davon aus, dass Ihr Probleme mit der Mail habt.
Gruß
BBMonster | |
|
UFOs werden als leerer Rahmen dargestellt