arama

[Misafir]

Kod: Tümünü seç

 Table1.SetKey;
 Table1.FieldByName('musterino').Value:=strtoint(Edit27.Text);
  if not table1.GotoKey then
   Showmessage('bulunamadı')
   else
    table1.Edit;

dogru musterino girildiği halde bulmuyor.yanlisi nerde yapiyorum..

teşekkürler.

[selm@n]

Hocam Veritabanınız nedir ?
Hangi Bileşenleri Kullanıyorsunuz..

Bunları yazarsanız daha çabuk cevaplar üretilebilir.

tavsiyem SQL kullanarak sorgulama yapmanızdır. Öreneğin.

Kod: Tümünü seç

Close;
SelectSQL.Clear;
SelectSQL.Add('Select * from MUSTERI Where MUSTERI.MUSNO = '''+edit1.text+'''');
Open;

Kolay Gelsin;

[zengin]

tablede arama işlemi birde bu şekilde denermisiniz

Kod: Tümünü seç

if edit1.Text=''
  then Table1.Filter:=''
  else
Table1.Filter:='[ADI]='+#39+edit1.text+'*'+#39;
Table1.Filtered:=True;

[ALUCARD]

bu konuda biraz arama yaparsan çok sayıda mesaj bulursun

mesela

viewtopic.php?t=4622&highlight=locate