Hallo zusammen,
in meiner Anwendung benötige ich ein Formular mehrfach, da es dem Benutzer ermöglicht werden soll, mehrere Datensätze parallel zu bearbeiten. Usprünglich wurde die Anwendung mit Acc2003 entwickelt.
Die Verwaltung der Form-Instanzen erfolgt über ein Objekt, dass eine Collection hält, der mit col.add Form-Objekt, Form.Tag (als Key) Formularinstanzen hinzugefügt bzw. mit col.remove Form.Tag wieder entnommen werden. Das klappt so hervorragend. Diese Anwendung
läuft ohne Änderungen auch unter Acc2010 Win7 64Bit.
Nun entwickele ich für einen anderen Kunden eine Anwendung auf dieser Plattform, in der ich diese Feature ebenfalls brauche. Den Code habe ich nahezu eins zu eins aus der bestehenden Anwendung übernommen. Allerdings verhält sich die neue Anwendung komplett
anders. Wenn ich zwei Instanzen der Formulars erzeuge und will die zuletzt erzeugte schließen, wird die die erste geschlossen, quasi die, die der Collection zuerst hinzugefügt wurde.
Code:
Public Sub OpenFormTermin(ByVal lTermin As Long)
Dim frm As Form_frmTermin
Set frm = New Form_frmTermin
...
frm.Tag = "Termin" & CStr(frm.Termin.T_ID)
frm.Visible = True
...
m_colFormTermine.add frm, frm.Tag
...
End Sub
Public Sub CloseFormTermin(ByVal sTag As String)
...
m_colFormTermine.Remove sTag
...
End Sub
Im Formular gibt es eine Ereignisprozedur für die "Schließen"-Schaltfläche, die dann die Objekt-Prozedur aufruft:
myTerminformulare.CloseFormTermin Me.Tag
Wobei "MyTerminformulare" ein global gültiges Objekt ist.
Falls jemand eine Idee hat, warum sich die Collection in diesem Fall so anders verhält als bislang, bin ich für jeden Hinweis dankbar.
Viele Grüße,
Michael Schörner
