PDA

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


آرشم@30
پنج شنبه 24 فروردین 1385, 09:06 صبح
چگونه میتوان در دیتابیس مثل یک dictionary جستجو کرد من در دلفی از dblookupcombobox استفاده کردم ولی در آنجا فقط میتوان از لیست رکوردی را انتخاب کرد نمیتوان در آن تایپ کرد تا رکورد مورد نظر پیدا شود
متشکرم
mzjahromi
پنج شنبه 24 فروردین 1385, 11:07 صبح
میتونی از یک Edit در کنار DBLookupComboBox استفاده کنی و تو OnChange اون Edit خاصیت فیلتر DataSet رو تغییر بدی.
آرشم@30
شنبه 26 فروردین 1385, 10:36 صبح
متوجه نشدم میشه توضیح بیشتری بدی
متشکرم
mzjahromi
شنبه 26 فروردین 1385, 11:56 صبح
Procedure TForm1.Edit1Change(Sender:Tobject)
Begin
DBLookupCombobox1.ListSource.DataSet.Filtered:=Fal se;
DBLookupCombobox1.ListSource.DataSet.Filter:=DBLoo kupCombobox1.ListField+' like('+QuotedStr(Edit1.Text+'%)');
DBLookupCombobox1.ListSource.DataSet.Filtered:=Tru e;
End;

البته اگر از Ado استفاده میکنی.
اگر هم از BDE استفاده میکنی


Procedure TForm1.Edit1Change(Sender:Tobject)
Begin
DBLookupCombobox1.ListSource.DataSet.Filtered:=Fal se;
DBLookupCombobox1.ListSource.DataSet.Filter:=DBLoo kupCombobox1.ListField+' ='+QuotedStr(Edit1.Text+'*');
DBLookupCombobox1.ListSource.DataSet.Filtered:=Tru e;
End;
babak869
شنبه 26 فروردین 1385, 14:57 عصر
چندین بار در این مورد سوال شده و توضیحات کاملی هم داده شده لطفا قبل از پرسش جستجو نمایید.اگه پیدا نکردید بگو تا یه نمونه اینجا بزارم.
موفق باشید
SH.Daneshvar
یک شنبه 27 فروردین 1385, 17:30 عصر
میتونید از کامپوننت های غیر استاندارد استفاده کنید
اگر خواستید میتونم بصورت مجانی براتون پیداکنم.
mobilebaz
شنبه 05 خرداد 1386, 13:01 عصر
با تشکر
عالی بود