Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Dockable form and browse
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Troubleshooting
Title:
Dockable form and browse
Environment versions
Visual FoxPro:
VFP 9
Miscellaneous
Thread ID:
01025212
Message ID:
01025212
Views:
54
When I have a form that is Dockable but not docked, the browse command makes the form blink but does not browse the table. Is this a bug?
PUBLIC o
o = CREATEOBJECT("myform")
o.show()

DEFINE CLASS myForm AS FORM

	ADD OBJECT cmdButton1 AS CommandButton WITH top = 10, caption = "Not Dockable"
	ADD OBJECT cmdButton2 AS CommandButton WITH top = 30, caption = "Dockable"
	ADD OBJECT cmdButton3 AS CommandButton WITH top = 50, caption = "Docked"

   PROCEDURE cmdButton1.Click
      SELECT TEST
      thisform.Dockable= 0
      BROWSE
   ENDPROC
   
   PROCEDURE cmdButton2.Click
      SELECT TEST
      thisform.Dockable= 1 
      thisform.Dock(-1)
      BROWSE 
   ENDPROC

   PROCEDURE cmdButton3.Click
      SELECT TEST
      thisform.Dockable= 1 
      thisform.Dock(1)
      BROWSE
   ENDPROC


	PROCEDURE Init
		CREATE CURSOR TEST(TEST C(10))
	ENDPROC

	PROCEDURE Destroy
		USE IN SELECT("TEST")
	ENDPROC
ENDDEFINE
Next
Reply
Map
View

Click here to load this message in the networking platform