French B4J MainForm Resize

[CR95]

Je voudrais agrandir la taille de ma form initiale.
Quand j'accède à la Sub B4XPage_Created d'une nouvelle page, j'utilise la commande

Main.MainForm_Resize(LDisplay, HDisplay)

avec les nouvelles largeur et Hauteur
mais rien ne se passe (rien ne plante non plus)
Je précise que j'exécute cette commande dans une nouvelle B4XPage par rapport à MainPage.
Une idée ?

 

[klaus]

Désolé, mais je ne comprend pas le problème.
Que veux-tu faire exactement ?
Dans B4XPages, tu dois oublier Main !
Que veux-tu faire dans Main.MainForm_Resize(LDisplay, HDisplay) ?
Que représentent LDisplay, HDisplay ?
As-tu un petit projet montrant le problème, que tu pourrais nous soumettre ?
Ce serait plus simple pour t'aider.

 

[zed]

Tu veux que quand tu changes de page, les dimensions de ton Form soit différent du MainForm ?

 

[CR95]

Désolé pour le retard mis à vous répondre.
Pour simplifier, je repars du programme "ThreePagesExample" : dans la troisième et dernière page, je voudrais passer la taille de l'écran (au départ 600x600) à une taille plus grande. J'utilise donc Main.MainForm_Resize(900,900) au début de cette dernière page mais ça ne change pas la taille de la form.

 

[zed]

Dans la page 3 (ou la page que tu veux modifier) , dans Private Sub B4XPage_Appear ajoutes :

Private Sub B4XPage_Appear
    Dim form As Form = B4XPages.GetNativeParent(Me) ' <-- récupère la fenêtre (Form) qui contient la page B4XPages actuelle
    form.WindowWidth = 1080dip
    form.WindowHeight = 768dip
    '....
    ' le reste du code
End sub