verknüpftes Foto im Endlosformular

Hallo!
Ich habe ein Endlosformular, in welches ich ein Foto des Mitarbeiters anzeigen lasse. Dies geschieht mittels folgendem Code „BEIM ANZEIGEN“ des Formulars:

Private Sub Form_Current()
Dim Pfad As String
Dim Datei As String

Pfad = „V:\P2\Bilder“
Datei = Me![MA_Nr] & „.jpg“
If Dir(Pfad & Datei) „“ Then
Me!Foto.Picture = Pfad & Datei
Else
Me!Foto.Picture = Pfad & „Standardbild.jpg“
End If

End Sub

Im ENDLOSFORMULAR nun sehe ich in allen Zeilen das gleiche Bild (nämlich jenes, welchen Datensatz ich gerade angeklickt habe.

Gibt es eine Möglichkeit, pro Zeile (pro Datensatz) das korrekte Bild anzeigen zu lassen?

Danke für eine Antwort

Hallo,

es gibt es Möglichkeiten, die sind aber tricky und nicht unbedingt empfehlenswert.

Eine Standardlösung gibt es nicht und der Code funktioniert in Endlosformularen prinzipiell nicht wie erwartet.

Beispiel:
http://www.dbwiki.de/upload/AccSampleBildInEndlosFor…

Viele Grüße vom Bodensee
Franz , DF6GL

PS: Feedback erwünscht!

Hallo!
DANKE für deine Antwort. Ich habe mir das Beispiel angeschaut.

Das wäre ein Weg, das alles mittels mehrerer UFOs zu lösen. ABER:

Problematisch sind die Ladezeiten der Bilder. Bei jedem Scrollen im Hauptformular werden alle 6 Bilder neu geladen. Das dauert - besonders im Netzwerk.

Ist also eine mögliche aber für mich wenig praktikable Lösung.

Auf jeden Fall bin ich durch Deinen Beitrag auf ein Problem gestoßen, was ich vorher nicht auf dem Zettel hatte: die Performance im Netzwerk.

Ich denke, ich werde nun das Foto in der Kopfzeile zeigen lassen. Dann sieht man halt immer nur jenes Foto, auf welchem DS ich gerade bin.

DANKE!