General information
Category:
Coding, syntax & commands
I tested the code in that KBQ and it generates a GPF. The problem goes like that:
There's no need for user defined classes or any complicated situation like the one in the example. The GPF is generated if Visible is set to .t. (even if it was .t. before) for a label that has both AutoSize and WordWrap set to .t.
So, if you never change the Visible property of such label... everything is safe.
Am I right?
Vlad
> PUBLIC x
> x=CREATEOBJECT("Form")
> x.AddObject("mylabel","test")
> x.Visible=.t.
>
> DEFINE CLASS test AS label
> AutoSize = .T.
> WordWrap = .T.
>
>
> PROCEDURE Init
> LOCAL lcTest,lcname
> lcname=THIS.NAME+"A" && Get a unique name
> THIS.PARENT.ADDOBJECT(lcname,'label')
> lcTest=lcname
>
> WITH THIS.PARENT.&lcTest
> .AUTOSIZE=THIS.AUTOSIZE
> .WORDWRAP=THIS.WORDWRAP && Comment this line for success.
> .VISIBLE=.T.
> ENDWITH
> ENDPROC
> ENDDEFINE
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only