1

Konu: FORMA ARAMA YAPMA

Forma kullandığım dosyada ara yaptırmak istiyorum.
İndexlenmiş bir dosyada ara yaparken arama satırına her 1 harf eklediğimde alt satırda kayıtların bu harflere göre ilgili kayıtlarlara göre sıralanmasını sağlayan kod örneği nasıl olabilir ?

Teşekkürler.

2

Re: FORMA ARAMA YAPMA

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

3

Re: FORMA ARAMA YAPMA

VFP 6.0 DA ÇALIŞIRMI ?

4

Re: FORMA ARAMA YAPMA

onders yazdı:

VFP 6.0 DA ÇALIŞIRMI ?


evet - ama deneyip soruları tazelemenin sana da faydası olacağını düşünüyorum ....

VFP9 SP2

5

Re: FORMA ARAMA YAPMA

ben de çetin gibi vfp9'a geçmeni şiddetle tavsiye ederim. çok fark var aralarında. sadece intellisense bile yeterli bir sebep.

Haksızlıklar karşısında susanlar, dilsiz şeytanlardır!
www.metinemre.com

6

Re: FORMA ARAMA YAPMA

Ben şunu kullanıyorum. "Dosyanda çok fazla kayıt yoksa";
forma bir grid,bir textbox ve buton koy

formun init event inde

Public Flt
Flt = ""

formundaki textbox interactivechange  event ine;

select dosya
set filter to  Flt $ aranacakalan
thisform.grid.refresh

Formun unload eventine
Release Flt