2 tane kontrol gerekiyor: - eventleri altlarına yazdım
1. (Textbox) myform.textAramaHarfleri.InteractiveChange
myform.listArananAdlar.Requery
2. (ListBox) (tercihan myform.init)
myform.listArananAdlar.RowSource= ;
"SELECT ad FROM IndexGerekmedenArananAdlar ;
WHERE IndexGerekmedenArananAdlar.ad=ALLT(myform.textAramaHarfleri.Value) ;
ORDER BY IstediğinIndexeBenzeyenOrder INTO CURS cursList"
myform.listArananAdlar.RowSourceType=3
-planına göre UPPER() - LOWER() gibi casesensetive opsiyonları eklemek gerekir
--- index ile gride bağlarsan
1. (Textbox) myform.textAramaHarfleri.InteractiveChange
SET KEY TO ALLT(This.Value)
GO TOP
myform.mygrid.Refresh
2. (Grid) - Init
myform.mygrid.RecordSource="IndexIleArananAdlar"
VFP9 SP2