Runtime set height screen

[pauloodwazny]

Hello,
I need to change my screen size (height) according to the number of elements that I want to show.
My first try was this script:


Dim scrAll As DynPicture
Set scrAll = thisProject.DynPictures.Item("mainAlarmActiveDetails")
scrAll.UseTemplateSize = False
scrAll.Height = 2000
scrAll.UpdateAll


So.. the function "UseTemplateSize" is not working in VBA, I don´t know why?

Another chance is to use this script:

Dim scrAll As DynPicture
Set scrAll = thisProject.DynPictures.Item("mainAlarmActiveDetails")
scrAll.Move scrAll.Left + 10, scrAll.Top, scrAll.Width, scrAll.Height + 10
scrAll.UpdateAll


The movement is working but the size change is not.
The main idea is to enable the vertical movement when I have more elements on the screen.
Could somebody help me about resize the screen in runtime?