Discussion :

[nuFox]

Bonjour ...

je me posais une question ...
j'utilise un formulaire qui contient un sous formulaire. Je me demandais s'il était possible de faire en sorte que quand on agrandit la taille du formulaire, le sous formulaire s'agrandisse proportionellement a la taille du formulaire.
Car pour le moment mon sous formulaire reste a une taille.

J'me suis dis qu'il serait possible de recuperer la taille de la fenetre et de definir avec ces valeurs la taille du sous formulaire en mettant ce code d'evenement sur l'evenement "Après redimention"

Ou alors il existe peut etre une fonction spéciale pour "encrer" le sous-formulaire au formulaire.

Merci de votre aide !

[Arkham46]

bjr,

il y a possibilité d'ancrage avec la version 2007
sinon il faut le programmer sur événement de redimensionnement du formulaire

donc il faut préciser la version utilisée

[nuFox]

Bonjour,

je dispose de la version 2003 de microsoft ACCESS. Donc c'est déjà foutu pour l'encrage !

[nuFox]

j'ai essayé par le code, mais j'ai du mal a recuperer les dimentions de mon formulaire principale

[Arkham46]

Fait vite fait pour l'exemple :

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
 
Private Sub Form_Resize()
Static sWidth As Long, sHeight As Long
On Error GoTo Gestion_Erreurs
If sWidth <> 0 Then
    Me.CtrlSousForm.Width = Me.CtrlSousForm.Width + Me.InsideWidth - sWidth
End If
If sHeight <> 0 Then
    Me.CtrlSousForm.Height = Me.CtrlSousForm.Height + Me.InsideHeight - sHeight
End If
sWidth = Me.InsideWidth
sHeight = Me.InsideHeight
Exit Sub
Gestion_Erreurs:
MsgBox "Erreur " & Err.Number & " : " & Err.Description & ", lors du redimensionnement"
End Sub

Le contrôle CtrlSousForm contenant le sous-formulaire s'étend vers droite et vers le bas.

[nuFox]

Merci pour l'exemple ! Je vais aller tester ca ...

Et maintenant je comprend pourquoi je ne savais pas recup les dimentions de mon formulaire ... C'est insideHeight .... Et pas juste Height ... Je comprend maintenant !

En tout cas merci ! Je l'applique et je te tien au courant !

A bientot !

[nuFox]

Merci ca fonctionne tip top !

Juste trois questions ...

Qu'est ce qui change de declarer sWidth et sHeight en static ?

Que contienne sWidth et sHeight ?

Et pourquoi faire Me.CtrlSousForm.Width = Me.CtrlSousForm.Width + Me.InsideWidth - sWidth ? Alors que l'on pourrait genre recuperer la taille du formulaire principale et définir la taille du sous-formulaire avec cette valeur en lui retirant genre quelque pixelle ... ?

En tout cas, merci encore une fois !

[Arkham46]

swidth et sheight sont static pour qu'elles gardent leur valeur entre chaque exécution de la procédure

j'y stocke la taille du formulaire donc sur redimensionnement on y retrouve la taille avant redimensionnement et on fait la différence

on pourrait effectivement mettre une taille directement fonction de la taille du formulaire principale

[nuFox]

Merci pour toutes ces info's
A peut etre bientot !
En tout cas, bon' appétit ^^