P Pelky Active Member Licensed User Longtime User Nov 27, 2021 #1 When I initialize a page ... Code: Copy Page2.Initialize Page3.Initialize B4XPages.AddPage("B4XSetups", Page2) B4XPages.AddPage("B4XTableDays", Page3) when I actually open either one of them them they take the entire screen. I have a background which I don't want to loose. The new open page is resizable so the background can be made to show but I want the page to open at a smaller size. I have looked at using variants but that does not do it. Basically I want it to open page as a smaller window If anyone can assist me with this it would be appreciated.
When I initialize a page ... Code: Copy Page2.Initialize Page3.Initialize B4XPages.AddPage("B4XSetups", Page2) B4XPages.AddPage("B4XTableDays", Page3) when I actually open either one of them them they take the entire screen. I have a background which I don't want to loose. The new open page is resizable so the background can be made to show but I want the page to open at a smaller size. I have looked at using variants but that does not do it. Basically I want it to open page as a smaller window If anyone can assist me with this it would be appreciated.
LucaMs Expert Licensed User Longtime User Nov 27, 2021 #2 Fill Root with that background, put a Pane smaller than the form and load the layout into it. Attachments SmallPage.zip SmallPage.zip 9.4 KB · Views: 284 Upvote 0
Erel B4X founder Staff member Licensed User Longtime User Nov 28, 2021 #3 Add to B4XPage_Created of the new page: Code: Copy Dim f As Form = B4XPages.GetNativeParent(Me) f.WindowWidth = 300 f.WindowHeight = 300 f.Resizable = False Upvote 0
Add to B4XPage_Created of the new page: Code: Copy Dim f As Form = B4XPages.GetNativeParent(Me) f.WindowWidth = 300 f.WindowHeight = 300 f.Resizable = False
P Pelky Active Member Licensed User Longtime User Nov 30, 2021 #4 Erel said: Add to B4XPage_Created of the new page: Code: Copy Dim f As Form = B4XPages.GetNativeParent(Me) f.WindowWidth = 300 f.WindowHeight = 300 f.Resizable = False Click to expand... Such a simple and elegant solution... Once again you have come to my aid and I thank you very much... Upvote 0
Erel said: Add to B4XPage_Created of the new page: Code: Copy Dim f As Form = B4XPages.GetNativeParent(Me) f.WindowWidth = 300 f.WindowHeight = 300 f.Resizable = False Click to expand... Such a simple and elegant solution... Once again you have come to my aid and I thank you very much...
P Pelky Active Member Licensed User Longtime User Nov 30, 2021 #5 LucaMs said: Fill Root with that background, put a Pane smaller than the form and load the layout into it. Click to expand... Problem resolved --- Once again you have come to my aid and I thank you very much... Upvote 0
LucaMs said: Fill Root with that background, put a Pane smaller than the form and load the layout into it. Click to expand... Problem resolved --- Once again you have come to my aid and I thank you very much...
