Bonjour à tous,

Je construit une petite DB (rien de compliqué) qui affiche des images sur un formulaire.

Celui-ci, possède 6 images (3 x 2 ) . Vu qu'a l'affichage elles sont petite, je donne l’opportunité à l'utilisateur (lorsqu'il double clique) d'afficher l'image en plus grande taille.

en VBA cela donne:

pour info : VMer_1 est le nom du contrôle contenant l'image (Il y en à 6).
de VMer_1 à VMer_6

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
 
 
Public fg_VMer_1 as Boolean
 
Private Sub VMer_1_DblClick(Cancel As Integer)
    fg_VMer_1 = Not fg_VMer_1
 
    If Not fg_VMer_1 Then
 
        ' Restore la taille et la position originale de la photo
 
        Me.VMer_1.Picture = repertoire & "Vue sur mer.jpg"
        Me.VMer_1.Width = 3402
        Me.VMer_1.Left = 11742
        Me.VMer_1.Top = 1255
        Me.VMer_1.Height = 2268
 
        Me.Detail.Height = 14913
    Else
 
        ' Charge l'image de grande taille 
 
        Me.VMer_1.Picture = repertoire & "grande\Vue sur mer.jpg"
        Me.VMer_1.Left = 165
        Me.VMer_1.Top = 900
        Me.VMer_1.Width = 18702
        Me.VMer_1.Height = 12468
 
        ' Code à écrire pour positionner la nouvelle image "au-dessus" 
        ' de tout le formulaire.
 
        ' DoCmd.RunCommand acCmdBringToFront   cela ne fonctionne uniquement
                                                                   ' en design   
    End If
End Sub
Cela fonctionne. Petit bémol, lorsque l'image est en grande taille, les 5 autres se trouvent "au-dessus" de la grand image.

J'ai déjà essayer de modifier la profondeur de chaque image, aucun résultat.
J'ai également parcouru le forum, tester les différents exemples comme :

https://www.developpez.net/forums/d1...mier-plan-vba/

Rien y fait. Sur google, il parle de ZOrder, mais, cet attribut n'existe pas sur un controle access.

Quelqu'un aurais t'il une idée de génie?
Merci de votre aide
André