Xailer & OZ Software

Hola,
A ver si me podeis echar un cable con lo siguiente.
Un formulario tipo bsDIALOG quiero cambiar, en tiempo de ejecución el
tamaño del mismo. Además de cambiar el tamaño de ese diálogo, quiero
cambiar la disposición de algunos controles.
Estas operaciones se pueden hacer de forma fácil con el método SetBounds.
No obstante, me he encontrado con algo que no se superar: un control con
nAlign := alBOTTOM se resiste a autoajustarse.
Os dejo un proyecto donde intento hacer lo que os he comentado. ¿Qué más
me puede faltar?
Saludos y gracias por vuestro tiempo.
José Luis Capel
Aicom Global Systems, S.L.
Valencia - España

Ups...
Faltaba el proyecto
Aquí lo teneis.
"José Luis Capel" <jose.luis@iaicom.com> wrote in
news:[email=Xns97C77757B74DBasalesiaicomcom@82.144.6.50]Xns97C77757B74DBasalesiaicomcom@82.144.6.50[/email]:
> Hola,
>
> A ver si me podeis echar un cable con lo siguiente.
>
> Un formulario tipo bsDIALOG quiero cambiar, en tiempo de ejecución el
> tamaño del mismo. Además de cambiar el tamaño de ese diálogo, quiero
> cambiar la disposición de algunos controles.
>
> Estas operaciones se pueden hacer de forma fácil con el método
> SetBounds.
>
> No obstante, me he encontrado con algo que no se superar: un control
> con nAlign := alBOTTOM se resiste a autoajustarse.
>
> Os dejo un proyecto donde intento hacer lo que os he comentado. ¿Qué
> más me puede faltar?
>
> Saludos y gracias por vuestro tiempo.
> José Luis Capel
> Aicom Global Systems, S.L.
> Valencia - España
>


Attached files pruebas.zip (2.8 KB)Â

Hola,
¿ Alguna sugerencia ?
Saludos,
José Luis Capel
Aicom <aicom@iaicom.com> wrote in news:Xns97C777752A7AEasalesiaicomcom@
82.144.6.50:
> Ups...
>
> Faltaba el proyecto
>
> Aquí lo teneis.
>
>
>
> "José Luis Capel" <jose.luis@iaicom.com> wrote in
> news:[email=Xns97C77757B74DBasalesiaicomcom@82.144.6.50]Xns97C77757B74DBasalesiaicomcom@82.144.6.50[/email]:
>
>> Hola,
>>
>> A ver si me podeis echar un cable con lo siguiente.
>>
>> Un formulario tipo bsDIALOG quiero cambiar, en tiempo de ejecución el
>> tamaño del mismo. Además de cambiar el tamaño de ese diálogo, quiero
>> cambiar la disposición de algunos controles.
>>
>> Estas operaciones se pueden hacer de forma fácil con el método
>> SetBounds.
>>
>> No obstante, me he encontrado con algo que no se superar: un control
>> con nAlign := alBOTTOM se resiste a autoajustarse.
>>
>> Os dejo un proyecto donde intento hacer lo que os he comentado. ¿Qué
>> más me puede faltar?
>>
>> Saludos y gracias por vuestro tiempo.
>> José Luis Capel
>> Aicom Global Systems, S.L.
>> Valencia - España
>>
>
>
> begin 644 pruebas.zip
> Attachment decoded: pruebas.zip
> `
> end
>

José Luis,
Ninguna...
No entiendo el porqué, pero si en lugar de hacer el Form mas pequeño se hace
mayor, SI que funciona el anclaje alBOTTOM
Un Saludo,
Xevi.
"José Luis Capel" <jose.luis@iaicom.com> escribió en el mensaje
news:[email=Xns97C8A871BC4ABjoseluiscapelaicom@82.144.6.50...]Xns97C8A871BC4ABjoseluiscapelaicom@82.144.6.50...[/email]
> Hola,
>
> ¿ Alguna sugerencia ?
>
> Saludos,
> José Luis Capel
>
> Aicom <aicom@iaicom.com> wrote in news:Xns97C777752A7AEasalesiaicomcom@
> 82.144.6.50:
>
>> Ups...
>>
>> Faltaba el proyecto
>>
>> Aquí lo teneis.
>>
>>
>>
>> "José Luis Capel" <jose.luis@iaicom.com> wrote in
>> news:[email=Xns97C77757B74DBasalesiaicomcom@82.144.6.50]Xns97C77757B74DBasalesiaicomcom@82.144.6.50[/email]:
>>
>>> Hola,
>>>
>>> A ver si me podeis echar un cable con lo siguiente.
>>>
>>> Un formulario tipo bsDIALOG quiero cambiar, en tiempo de ejecución el
>>> tamaño del mismo. Además de cambiar el tamaño de ese diálogo, quiero
>>> cambiar la disposición de algunos controles.
>>>
>>> Estas operaciones se pueden hacer de forma fácil con el método
>>> SetBounds.
>>>
>>> No obstante, me he encontrado con algo que no se superar: un control
>>> con nAlign := alBOTTOM se resiste a autoajustarse.
>>>
>>> Os dejo un proyecto donde intento hacer lo que os he comentado. ¿Qué
>>> más me puede faltar?
>>>
>>> Saludos y gracias por vuestro tiempo.
>>> José Luis Capel
>>> Aicom Global Systems, S.L.
>>> Valencia - España
>>>
>>
>>
>> begin 644 pruebas.zip
>> Attachment decoded: pruebas.zip
>> `
>> end
>>
>

Xevi,
Gracias por tu respuesta.

> Ninguna...
>
> No entiendo el porqué, pero si en lugar de hacer el Form mas pequeño
> se hace mayor, SI que funciona el anclaje alBOTTOM
>
Pues por eso he puesto el mensaje... por que no veo una 'lógica' a su
funcionamiento.
Por cierto... ¿vas a ir a la presentación de Xailer en Madrid?
Saludos,
José Luis Capel

José Luis,
Pues en principio no,...
No se a que nivel se va a impartir esta presentación de Xailer personal 1.0.
Se que SIEMPRE se aprende algo, pero como sabes, soy quien, de la península,
está mas lejos de la Capital... y creo tener un nivel mínimo que por ahora
me voy defendiendo, por lo que de momento he decidido no asistir...
Igual cambio de opinión, pero de momento estoy asi, así!!!
Un Saludo,
Xevi.
"José Luis Capel" <jose.luis@iaicom.com> escribió en el mensaje
news:[email=Xns97C8AE99EB714joseluiscapelaicom@82.144.6.50...]Xns97C8AE99EB714joseluiscapelaicom@82.144.6.50...[/email]
> Xevi,
>
> Gracias por tu respuesta.
>
>> Ninguna...
>>
>> No entiendo el porqué, pero si en lugar de hacer el Form mas pequeño
>> se hace mayor, SI que funciona el anclaje alBOTTOM
>>
>
> Pues por eso he puesto el mensaje... por que no veo una 'lógica' a su
> funcionamiento.
>
> Por cierto... ¿vas a ir a la presentación de Xailer en Madrid?
>
> Saludos,
> José Luis Capel

Xevi,
> Pues en principio no,...
> No se a que nivel se va a impartir esta presentación de Xailer personal
> 1.0.
Bueno, aparte de la presentación oficial de la versión personal, queremos
que sean las primeras "jornadas técnicas" sobre Xailer. Intentaremos no
poner el listón muy alto para que los que asistan comprendan las ponencias.
Pero tampoco queremos mantener un nivel inicial, ya que como bien dices, los
actuales usuarios de Xailer ya tienen un cierto nivel y no necesitan que les
expliquemos cómo funciona el IDE. Por otro lado, también hablaremos del
futuro de Xailer, no sólo de las versiones más inmediatas, sino también a
largo plazo (otras plataformas, nuevos sistemas, etc.).
Por cierto, aunque ya hemos puesto una agenda, no está del todo cerrada. Si
proponeis cualquier otro tema lo podemos considerar. Incluso si alguien
quiere colaborar con alguna ponencia sólo tiene que decírnoslo.
> Se que SIEMPRE se aprende algo, pero como sabes, soy quien, de la
> península, está mas lejos de la Capital...
Bueno, más o menos como yo
Si no me equivoco, tu estás cerca del Cabo de Creus y yo del Cabo de Gata;
vamos, dos de las "esquinas" de la península. Y hay incluso a quien le pilla
bastante más lejos, ¿no Pedro?
> y creo tener un nivel mínimo que por ahora me voy defendiendo, por lo que
> de momento he decidido no asistir...
> Igual cambio de opinión, pero de momento estoy asi, así!!!
Ojalá te decidas a venir. Todavía tenemos pendientes ese "par de cañas" que
no nos las llegamos a tomar la última vez que coincidimos
--
Un saludo,
José F. Giménez

José Luis,
el problema es debido a una "optimización" interna en los formularios. Esa
optimización consiste en calcular sólo una vez la posición máxima de los
controles que no tienen alineación, y no cada vez que se redimensiona el
formulario. El hecho de que salgan las barras de scroll viene dado porque el
formulario todavía "cree" que el control TGroupBox sigue estando donde
estaba al principio. Puedes ver el comportamiento normal si cambias
nBorderStyle a bsSIZEABLE y reduces el tamaño del formulario poco a poco.
Para solucionarlo, tienes que llamar a ::SetAutoScroll() después de cambiar
la posición del groupbox y antes de cambiar el tamaño del formulario. No
estoy seguro de cambiar el comportamiento de Xailer para que lo haga
automáticamente porque eso haría muy lento el proceso de alineación de
controles, y casos como el que se te ha dado ocurren muy raramente; y
además, estamos nosotros aquí para dar una solución
--
Un saludo,
José F. Giménez

José,
Gracias por tu respuesta.
> el problema es debido a una "optimización" interna en los formularios.
> Esa optimización consiste en calcular sólo una vez la posición máxima
> de los controles que no tienen alineación, y no cada vez que se
> redimensiona el formulario. El hecho de que salgan las barras de
> scroll viene dado porque el formulario todavía "cree" que el control
> TGroupBox sigue estando donde estaba al principio. Puedes ver el
> comportamiento normal si cambias nBorderStyle a bsSIZEABLE y reduces
> el tamaño del formulario poco a poco.
>
> Para solucionarlo, tienes que llamar a ::SetAutoScroll() después de
> cambiar la posición del groupbox y antes de cambiar el tamaño del
> formulario. No estoy seguro de cambiar el comportamiento de Xailer
> para que lo haga automáticamente porque eso haría muy lento el proceso
> de alineación de controles, y casos como el que se te ha dado ocurren
> muy raramente; y además, estamos nosotros aquí para dar una solución
>
No... no cambies el comportamiento. Como bien dices, de momento esto me
ha ocurrido en un solo punto de la aplicación. Voy a probar lo que me
indicas.
Saludos y gracias,
José Luis Capel