Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
BUG: Form will not release with debugger open
Message
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00855964
Message ID:
00856003
Views:
19
Aha! If you have something like _vfp.ActiveForm.SomeBogusProperty, it will hang the release of the form. Now, is this a bug? No other condition that I have found where the debugger "cannot evaluate the expression" hangs up execution.

>Mark,
>
>Are you suspended? What have you got in the Watch window?
>
>>I am reporting this bug here for confirmation before posting in the VFP Bug list.
>>
>>Problem: Form will not release when the debugger is open.
>>
>>System: Win 2k SP4 with VFP8 SP1
>>
>>Repro Code:
>>ACTIVATE WINDOW debug
>>PUBLIC loForm
>>loForm = CREATEOBJECT('_Form')
>>loForm.Show()
>>
>>DEFINE CLASS _form AS form
>>
>>	top = 0
>>	left = 0
>>	height = 300
>>	width = 300
>>	
>>	ADD OBJECT cmdClose AS _commandbutton WITH ;
>>		top = 100, ;
>>		left = 100, ;
>>		height = 27, ;
>>		width = 120, ;
>>		caption = [Click Me to Test]
>>
>>	PROCEDURE QueryUnload
>>		*!* some clean up code here
>>		IF NOT THIS._PreQueryUnloadHook()
>>			RETURN .f.
>>		ENDIF
>>		THIS.Release()
>>	ENDPROC
>>	PROCEDURE _PreQueryUnloadHook
>>		RETURN .t.
>>	ENDPROC
>>ENDDEFINE
>>DEFINE CLASS _commandbutton AS CommandButton
>>
>>	PROCEDURE Click
>>		THIS.OnClick()
>>	ENDPROC
>>	PROCEDURE OnClick
>>		THISFORM.QueryUnload()
>>	ENDPROC
>>
>>ENDDEFINE
Mark McCasland
Midlothian, TX USA
Previous
Reply
Map
View

Click here to load this message in the networking platform