Hi all,
I'm just having a problem with a subclassed textbox. The box appears by 'AddObject' in a label. Everything works fine, as long as I fill the textbox and leave it with the enter key. However, when clicking any other focusable object on the form a messagebox appears telling that 'read' couldn't be executed on memory-adress.
Label DblClick Event:
With This.Parent
If Type ('.Textbox1') <> "O"
.AddObject ("textbox1","TTextbox")
EndIf
.Refresh
EndWith
Textbox LostFocus Event:
loObject = This.MasterObject
If Type ('loObject') = "O" And loObject.BaseClass = "Label"
loObject.Caption = This.Value
This.Parent.RemoveObject (This.Name)
* Release This && first version
EndIf
<- at this point the error-message appears
What's wrong? Any help appreciated
Best Regards
-Tom
Debugging is twice as hard as writing the code in the first place.
Therefore, if you write the code as cleverly as possible, you are,
by definition, not smart enough to debug it.
Oh, and BTW: 010101100100011001010000011110000101001001101111011000110110101101110011