Filitreleme yaparken değişken kullanmak.

[ugurabi]

! Merhaba
Local veri dosyasında filitreleme yaparken (dBase) filitre kriterini direk yazmak yerine değişken kullandığımda işlem başarısız oluyor ve çalıştırılamaz bir operasyon hatası veriyor.

Kod: Tümünü seç

........
var
XSERI:String;
begin
Table1.open;
Table1.Last;
XSERI:=Table1SERI.Value;
Table2.open;
Table1.Filtered:='''SERI''=XSERI;           //?????
Table1.Filter:=True;
......
end;
..........

yardım ederseniz sevinirim
Teşekkürler.

[rsimsek]

XSERI değişkeni string ise şöyle olabilir;

Kod: Tümünü seç

...
Table1.Filtered:='SERI=' + XSERI;        
...

[ugurabi]

Aynı konuda değişken olan XSERI Double tipinde bir sayı olursa,
nasıl kod yazmalıyız.?
TEŞERKKÜRLER

[rsimsek]

Tabi ki string e çevireceksin

Kod: Tümünü seç

...
Table1.Filtered:='SERI=' + FloatToStr(XSERI);       
...

[celalatak]

Öncelikle filter ve filtred i ters kullanmışsınız.
Aşağıdaki şekilde kullanmalısınız. değişken sayısal değer taşıyorsa QuotedStr' yi kullanmayacaksınız. (Bu komutun görevi parantez içindeki ifadenin başına ve sonuna tırnak işareti koyması)

Kod: Tümünü seç

 
table1.Filtered:=false;
table1.Filter:= 'SERI='+QuotedStr(XSERI);
table1.Filtered:=true;

[rsimsek]

String alanları tek tırnak içine almak gerekiyor..