Bonjour à tous.
J'ai adapté la solution de Claude Leloup (positionner-formulaire-par-rapport-controle-autre-formulaire/) pour positionner un formulaire continu à côté d'un controle que l'on ouvre sur le clic de ce controle, et faire en sorte qu'il tienne dans l'écran.
Cela fonctionne pour le haut, la gauche et la droite car la largeur est fixe mais pas pour le bas car la dimension du formulaire varie en fonction du nombre d'enregistrement.
Sur clic du controle du formulaire1, j'exécute la fonction
Le problème c'est que au moment où j'ouvre le formulaire, je ne connais pas sa taille
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 PositionForm(formulaire-continu, controle-du-formulaire1)
donc impossible de renseigner à l'avance pControl.Height ou lRect.bottom
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 ' Si déborde en bas => affiche le formulaire au dessus du contrôle If lRect.Top + lRect.Bottom > lScrHeight Then lRect.Top = lRect.Top - TwipsToPixelY(pControl.Height) - lRect.Bottom End If
Je vous remercie d'avance pour vos suggestions.
Partager