ورود

View Full Version : مبتدی: جستجو در پارادوکس



armandis hkha
شنبه 08 مرداد 1390, 04:48 صبح
سلام
ببخشید در بانک اطاعتی پارادکس اگر بخواهیم از فیلد دوم برای جستجو استفاده کنیم باید از چه دستوری استفاده کرد . من خودم از این دستور استفاده کردم ولی جواب نداد ایراد من کجاست؟



procedure TForm1.Button6Click(Sender: TObject);
var str:string[40];
begin
str:=edit1.Text;
table1.IndexFieldNames:='Family';
table1.SetKey;
table1.FieldByName('Family').AsString:=str;
table1.GotoNearest;

end;

ehp_kz6597
شنبه 08 مرداد 1390, 06:39 صبح
سلام
به نظرم locate بتونه جواب سوال شما باشه
متد locate ، مکان نما رو به اولین سطری که با شرایط مورد نظر شما یکی باشه منتقل می کنه .


Locate(const KeyFields: String; const KeyValues: Variant; Options: TLocateOptions): Boolean;

برای مثال در ساده ترین حالت، یه جدول داریم به اسم tblname و قراره تو فیلد name از اون جدول ، ali رو پیدا کنه




tblname.locate('name','ali',[]);