[Lazarus-es] Sobre propiedad Anchors

Abraham abraham.montano en gmail.com
Jue Abr 28 23:43:28 CEST 2011


Hola José.

Gracias pro tu respuesta pero ya encontré mi solución.

 Contenedor.AnchorSide[akTop].Side:=asrTop;
 Contenedor.AnchorSide[akTop].Control:=NuevoParent;
 Contenedor.AnchorSide[akLeft].Side:=asrLeft;
 Contenedor.AnchorSide[akLeft].Control:=NuevoParent;
 Contenedor.AnchorSide[akRight].Side:=asrRight;
 Contenedor.AnchorSide[akRight].Control:=NuevoParent;
 Contenedor.AnchorSide[akBottom].Side:=asrBottom;
 Contenedor.AnchorSide[akBottom].Control:=NuevoParent;
 Contenedor.Parent:= NuevoParent;

Lo que estaba haciendo es pasar un TGroupbox a un nuevo contenedor y al
momento que ya esta en el nuevo contenedor asignar la propiedad Anchors para
que cuando ese contenedor sea redimencionado el TGroupbox también cambie de
tamaño según el Parent.

Saludos.

-------------------
Abraham Montaño
abraham.montano en gmail.com
Chiclayo - Perú
Tel: 074-214324
Cel: 074-979622851
RPM: #014990
---------------------



El 28 de abril de 2011 23:04, José Mejuto <joshyfun en gmail.com> escribió:

> Hello Abraham,
>
> Thursday, April 28, 2011, 8:16:19 PM, you wrote:
>
> A> tengo un problema con la propiedad Anchors en runtime, como puedo
> establecer
> A> los Anchors de un control en runtime.
> A> estoy intentando con lo siguiente y no me funciona:
> A> Control.Anchors:=[akTop,akLeftm akRight, akBottom];
> A> y no tengo resultado alguno :S
> A> Espero puedan ayudarme.
>
> Si no describes el resultado que quieres obtener... :-?
>
> --
> Best regards,
>  José
>
>
> _______________________________________________
> Lazarus-es mailing list
> Lazarus-es en lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20110428/426fea89/attachment-0002.html>


More information about the Lazarus-es mailing list