Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Reference to thisform not working ?
Message
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Database:
Visual FoxPro
Miscellaneous
Thread ID:
00960020
Message ID:
00960130
Views:
10
Figures. I wonder how much extra typing I've done the past 7 or 8 years....geeze.

>I am sure i have used this in the past without problems
>
>
>>I doubt this is part of your problem...but I notice below that you have something like this:
>>
>>WITH THISFORM
>> WITH .pgf1.page4
>> ENDWITH
>>ENDWITH
>>
>>....I'm not sure about this, but I don't think you can put With's inside With's like that....it might be causing some strange behavior???
>>
>>
>>>It's part of the container (named .o1 in the form)
>>>Weird!
>>>
>>>
>>>>Interesting.....
>>>>Where is the save() method located? Is it on thisform or is it somewhere else?
>>>>
>>>>>I changed my save method to this:
>>>>>
>>>>>
>>>>>        ....
>>>>>	x=_vfp.ActiveForm
>>>>>	x.oLINKSCT.DATA.UpdateFromCursor()   && THISFORM.oLINKSCT.DATA.UpdateFromCursor()
>>>>>        .....
>>>>>
>>>>>
>>>>>and this works, but WHY does the otherone not work??
>>>>>Peter
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>>
>>>>>>...
>>>>>>thisform.oLINKSCT=CREATEOBJECT("business","LINKS","curLINKSCT",.t.)
>>>>>>...
>>>>>>
>>>>>>
>>>>>>
>>>>>>
>>>>>>and that works in all other instances :-)
>>>>>>besides I see _vfp.activeform.oLINKSCT in the debugger
>>>>>>
>>>>>>Peter
>>>>>>
>>>>>>
>>>>>>>>I add a container object to a page in a pageframe on a screen like this:
>>>>>>>>
>>>>>>>>
>>>>>>>>WITH THISFORM
>>>>>>>>	IF .UseInternal
>>>>>>>>		.pgf1.ACTIVEPAGE=4
>>>>>>>>		WITH .pgf1.page4
>>>>>>>>			IF pemstatus(THISFORM.pgf1.page4,"o1",5)
>>>>>>>>				THISFORM.pgf1.page4.REMOVEOBJECT("o1") 			
>>>>>>>>                        ENDIF
>>>>>>>>			.NEWOBJECT("o1","cntCarrierPage","modules\vCPR3b")<----------------------
>>>>>>>>
>>>>>>>>			.o1.VISIBLE=.T.
>>>>>>>>		ENDWITH
>>>>>>>>	ELSE
>>>>>>>>
>>>>>>>>
>>>>>>>>one of the objects in the container is a save button which invokes the containers save method:
>>>>>>>>
>>>>>>>>...
>>>>>>>>	THISFORM.oLINKSCT.DATA.UpdateFromCursor()
>>>>>>>>
>>>>>>>>....
>>>>>>>>
>>>>>>>>
>>>>>>>>
>>>>>>>>this code erros saying not contained in a form object.
>>>>>>>>I can't figure out why. THISFORM.oLINKSCT is an business object created in the load method of the form.
>>>>>>>>
>>>>>>>>what am I doing wrong???
>>>>>>>>
>>>>>>>>Thanks
>>>>>>>>
>>>>>>>>Peter
>>>>>>>
>>>>>>>
>>>>>>>What does your code look like in the load() method of the form where the object is being created?
ICQ 10556 (ya), 254117
Previous
Reply
Map
View

Click here to load this message in the networking platform