Returning Ziggy's thread:
@Myself
Run this in release and it works. But realy its not working, run in Debug to find out. This sort od thing can happen all the time if you are not "Dios de Blitz". No change that, it happens all the time if you are me ;(
Type TBase Field FOne:Int =3 '--------------------------------------------- Function Create:TBase () Local Temp:TBase = New TBase Temp.FOne = 1 Return Temp End Function EndType '---------------------------------------------- Type TExtend Extends TBase Field FTwo:Int=4 '--------------------------------------------- Function Create:TExtend () Local Temp:TExtend = New TExtend Temp.FTwo = 2 Return Temp End Function End Type Global mine:TBase = TBase.Create() Print mine.FOne Global newmine:TExtend = TExtend(mine) Print mine.FOne Print newmine.FOne+","+newmine.FTwo mine.FOne:+999 newmine.FOne:+ 1 Print mine.FOne Print newmine.FOne+","+newmine.FTwo
@Myself
Run this in release and it works. But realy its not working, run in Debug to find out. This sort od thing can happen all the time if you are not "Dios de Blitz". No change that, it happens all the time if you are me ;(