Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Three control Monty - now you see it, now you don't
Message
From
23/03/2002 10:12:50
 
 
To
23/03/2002 09:52:33
Hilmar Zonneveld
Independent Consultant
Cochabamba, Bolivia
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00636435
Message ID:
00636438
Views:
20
Thanks for the reply Hilmar. Changing sparse does no correct the problem. I am using code like this:
If pemstatus(oCol,'Text1',5)
	If Not pemstatus(oCol,'btext1',5)
		oCol.AddObject('bText1',lcTextClass)
		For i = 1 To Amembers(laProp,oCol.Text1)	&& Get all properties
			If pemstatus(oCol.Text1,laProp(i),0) And laProp(i) # 'NAME'
				Store Eval('ocol.Text1.'+laProp(i)) To ('ocol.bText1.'+laProp(i))
			Endif
			Store oCol.Text1.Width To oCol.bText1.Width
			Store oCol.Text1.Height To oCol.bText1.Height
			oCol.Sparse=.T.
		Endfor
		oCol.CurrentControl = 'bText1'
	Endif
	oCol.RemoveObject('Text1')
ENDIF 
I am doing this because I am trying to allow dynamic grid configurations based upon desired behaviors. For instance If grid sorting is required I would load the grid with the appropriate controls at runtime, but if sorting is not required the normal control will suffice.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform