Página 1 de 1

Redimensionando Formularios

Publicado: Lun Ene 08, 2007 12:54 pm
por Pedro Amaro
Estoy haciendo un formulario que permita la redimension de los controles,
siguiendo las indicaciones de F.Gimenez en levante3000 y ahora en
xailer.info.
Hace ya algún tiempo lo use y funcionaba, pero en el caso que estoy ahora
necesito que el formularios sea bsSPLASH o bsNONE, cualquiera de los
dos me sirve, y siempre que lo ejecuto con alguno de los dos formatos me da
el error que adjunto, con el resto de tipos de formularios funciona
perfectamente.
¿Alguna idea?
Adjunto un ejemplo del proyecto.
Saludos


Attached files Error.log (1 KB)Â Turnos.zip (2.4 KB)Â

Redimensionando Formularios

Publicado: Mar Ene 09, 2007 10:34 am
por jfgimenez
Pedro,
> Estoy haciendo un formulario que permita la redimension de los controles,
> siguiendo las indicaciones de F.Gimenez en levante3000 y ahora en
> xailer.info.
> Hace ya algún tiempo lo use y funcionaba, pero en el caso que estoy ahora
> necesito que el formularios sea bsSPLASH o bsNONE, cualquiera de los
> dos me sirve, y siempre que lo ejecuto con alguno de los dos formatos me
> da el error que adjunto, con el resto de tipos de formularios funciona
> perfectamente.
Acabo de probar el ejemplo y a mí no me ha dado ningún error; todo funciona
correctamente. De todos modos, el error que te da tiene toda la pinta de
producirse porque se está lanzando el evento OnSize del formulario antes de
asignar los valores de nOrgXXX. Para evitarlo, simplemente inicializa esas
DATAs en la clase TControl, así:
DATA nOrgLeft INIT 1
DATA nOrgTop INIT 1
DATA nOrgWidth INIT 1
DATA nOrgHeight INIT 1
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info