Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Grid plus Combo
Message
From
13/04/2000 00:00:01
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00359033
Message ID:
00359110
Views:
19
The subject is Grid plus Combo, but the body refers to a Listbox in a Grid. My sample uses a Combobox.

Try this:
*!* Begin Code Sample

CREAT TABLE DATA (foo c(10), BAR c(10))
APPEND BLANK
REPLACE foo WITH [testing]
REPLACE BAR WITH [testing]


PUBLIC x
x = CREAT([oForm1])
x.SHOW

DEFINE CLASS oForm1 AS FORM
	AUTOCENTER = .T.
	ADD OBJECT Grid1 AS oGrid
ENDDEFINE

DEFINE CLASS oGrid AS GRID
	ROWHEIGHT = 24
	ADD OBJECT Column1 AS oColumn
	Column1.CURRENTCONTROL = [Combo1]
	ADD OBJECT Column2 AS COLUMN
ENDDEFINE

DEFINE CLASS oColumn AS COLUMN
	sparce = .F.
	ADD OBJECT Combo1 AS oCombo
ENDDEFINE

DEFINE CLASS oCombo AS COMBOBOX
	ROWSOURCETYPE = 1
	ROWSOURCE = [1,2,3,4,5]
ENDDEFINE

*!* End Code Sample
Dave

>I thought I knew how to do this but apparently I don't...
>
>I have a grid with a listbox in it. When I make a selection in the list box and move out of the cell, the cell goes blank. How do I get it to display my selection?
>
>Rick Liebespach
>1-800-525-7117 x270
>Rick@omniagroup.com
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform