Marcia

I have used your code of valid combo method, but when I click on the list box appear the message "This can only be used within a method".

The difference is that my list box BoundColumn = 2 and the field that I am using as filter is numeric.


>Is not possible to filter records on listbox? I am trying but the filter does not work properly.
>
>Yes, it is possible to filter records in a listbox. You said that your RowSourceType was 6-Fields, but you did not give us any other information.
>
>This example gives you an idea of you can set it up :
>
>

>DEFINE CLASS form1 AS form
>	DoCreate = .T.
>	Caption = "Form1"
>	Name = "Form1"
>
>	ADD OBJECT list1 AS listbox WITH ;
>		BoundColumn = 1, ;
>		ColumnCount = 2, ;
>		ColumnWidths = "150", ;
>		RowSourceType = 6, ;
>		RowSource = "customer.company,country", ;
>		Height = 121, ;
>		Left = 75, ;
>		Top = 87, ;
>		Width = 258, ;
>		Name = "List1"
>
>
>	ADD OBJECT combo1 AS combobox WITH ;
>		RowSourceType = 6, ;
>		RowSource = "country.country", ;
>		Height = 24, ;
>		Left = 76, ;
>		Top = 25, ;
>		Width = 220, ;
>		Name = "Combo1"
>
>
>	PROCEDURE combo1.Valid
>		LOCAL lcFilter
>		SELECT Customer
>		lcFilter = [country = '] + ALLTRIM( this.Value  ) + [']
>		SET FILTER TO &lcFilter
>		GO TOP
>		Thisform.List1.Requery()
>	ENDPROC
>
>
>ENDDEFINE
>