Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Resize
Message
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Re: Resize
Environment versions
Visual FoxPro:
VFP 9
Miscellaneous
Thread ID:
01569183
Message ID:
01569262
Views:
46
Update:
I created a form.left_access method and put the code in there and it works

Peter


No the resize works i tried the form.move event. And again it does do nothing
*form.move
LPARAMETERS nLeft, nTop, nWidth, nHeight
IF NOT ISNULL(THISFORM.oChildForm1) AND VARTYPE(THISFORM.oChildForm1.NAME) = 'C'

	THISFORM.oChildForm1.TOP = m.nTop
	THISFORM.oChildForm1.LEFT = m.nLeft + m.nWidth + SYSMETRIC(12) * 2 + 10
	THISFORM.oChildForm1.HEIGHT = m.nHeight



ENDIF
the parent form moves but the childform1 stays put!
Update: as a matter of fact noth seems to get executes in Move
I put a wait window in there and it does not come up when the forma get moved

Peter
>>I have a form in vfp9 and from a button I open another (child) form
>>no in this case I want the child to butt on the right side and the same top and height.
>>that's easy and working
>>
>>but now when I change the height of the parent form I want the child form to change its height
>>\it does not worj in resize (I guess at that time the form's own height has not changed. I tried it in Paint
>>still not working
>
>Putting in Resize() should work just fine (I just tested it). Are you sure This.lPrivOpen is true?
Peter Cortiel
Previous
Reply
Map
View

Click here to load this message in the networking platform