Fabio,
What your code suppouse to repro? What did you expect? What was actual result?
>I Ask to me:
>
>With these Anchor Bit Values
>- 16,64,512 and Parent.Height = 0
>- 32,128,256 and Parent.Width = 0
>
>what VFP can do ?
>
>The possible choices are:
>
>a) fire a Exception number: c0000094 (divide by zero) ( not allowed choice )
>b) catch the zero divisor and fire a error for invalid Anchor value ( not a good choice )
>
c) ignore these Bit values if the Parent AxisSize value is zero ( this is the best choice )>d) set the divisor for Relative Anchoring to a minimum value > 0 ( another interesting choice )
>
>On VFP9 Beta it has not been made and therefore result is a)
>
>Repro
>
>=CREATEOBJECT("form1")
>
>DEFINE CLASS form1 AS form
>
> ADD OBJECT label1 AS label
>
> PROCEDURE init
> thisform.Height = 0
> this.Label1.Anchor = 16
> thisform.Height = 1
> ENDPROC
>
>ENDDEFINE
>
--sb--