Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus-es / 2011-04

Sobre propiedad Anchors

4 messages · 3 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Abraham

Hola Listeros.

tengo un problema con la propiedad Anchors en runtime, como puedo establecer los Anchors de un control en runtime.
estoy intentando con lo siguiente y no me funciona:

Control.Anchors:=[akTop,akLeftm akRight, akBottom];

y no tengo resultado alguno :S

Espero puedan ayudarme.

Salu2

-------------------
Abraham Monta�o
abraham.montano en gmail.com
Chiclayo - Per�
---------------------
------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20110428/0dc0319b/attachment.html>

Reply by email

José Mejuto
to Abraham

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�

Reply by email

Abraham
to José Mejuto

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�:

Show quoted text 24 lines
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.freepascal.org/pipermail/lazarus-es/attachments/20110428/426fea89/attachment.html>

Reply by email

José Antonio Cuello
to Abraham

Y cambiando el align a client, Top o similar (dependiendo de lo que interese) despues de asignarle el nuevo Parent no se conseguir�a lo mismo?
Un saludo

________________________________________________________________________

ARTEX TRADING S.A.
Jos� Antonio Cuello Principal

El jue, 28-04-2011 a las 23:43 +0200, Abraham escribi�:

Show quoted text 76 lines
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 _______________________________________________ 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.freepascal.org/pipermail/lazarus-es/attachments/20110429/95f7b3e0/attachment.html>

Reply by email