نمایش رکوردهای یک فیلد در combo box و انتخاب آنها

[afshinaghasi]

سلام این تیکه برنامه واقعا به دردتون میخوره از این جور کدا کمتر گیر می یاد این کد کاملا حرفه ای هست
ابتدا باید در خاصیت change کامبو باکس این کد را نوشت

while not ADOTable1.Eof do
begin
ComboBox1.Items.Add(ADOTable1.FieldByName('name'). AsString);
ADOTable1.Next;
end;
این هم ادامه همین می نویسی :

ADOQuery1.Active:=false;
ADOQuery1.Parameters.ParamByName('p1').Value:=Comb oBox1.Text;
ADOQuery1.Active:=true;
سپس یک کد SQL برای جستجو مینویسیم درAdoquery قسمت
properties: SQl

select * from table1 where name=:p1;

:5::21::27::31:امیدوارم به دردتون بخوره به امید دیدار بدرود

[SYNDROME]

با سلام


از این جور کدا کمتر گیر می یاد این کد کاملا حرفه ای هست

با احترام
دوست عزیز کار شما خوب است.

ولی همه این کارهای شما را می توان با یک DblookupComboBox به دست آورد.
در ضمن حتی نمونه کد شما را هم در سایت بارها دوستان نوشته اند.موفق باشید

[afshinaghasi]

hi.
من هیچ وقت با اون کار نکردم چون بار اوله که گفتین . ولی قطعه برنامه بالا بیشتر جنبه آموزشی داره و اگر کسی بار اولشه که می خواد این کارو بکنه از اون راه بره خیلی بهتره . در ضمن یاد میگیره که حلقه while حد اقل چی کار میکنه .به هر حال از راهنمایی شما متشکر.ولی حد اقل چه خوب می شد می گفتی که چطور با DblookupComboBox بای کار کرد و یه مثالی میزدی .
الانم هر چی باهاش ور رفتم نشد که نشد .هیچی نمایش نمیده .

[dkhatibi]

Listsource انتخاب کنید. بعد هم KeyField و ListField

[afshinaghasi]

آره میشه:شیطان::چشمک:

[dkhatibi]

البته استفاده از DblookupComboBox قوی تر این اسن. به خصوص که قادر به ارتباط با دو جئول و خواندن فیلد کلید متناظر با هم در دو جدول مجزا می باشد.

[SYNDROME]

با سلام

hi.
ولی حد اقل چه خوب می شد می گفتی که چطور با DblookupComboBox بای کار کرد و یه مثالی میزدی .

البته یک نکته بخصوص اگر بخواهی اول گزینه DBlookUpرا انتخاب کنی از کد زیر استفاده کن.


DBlookupComboBox.KeyValue := ADO.FieldByName('KeyField').Asinteger;

ADOمورد نظر همان ADOاست که DBlookupبه آن وصل است و KeyFieldهم فیلدی است که در خاصیت KeyFieldمربوط به DBlookupComboBox مشخص کرده اید.
موفق باشید

[afshinaghasi]

درود بر همه شما
خداوکیلی دیدین چه بحث باحالی رو مطرح کردم .میخواستم ببینم چه قدر بلدین

[omidsistani]

سلام:لبخندساده:
ممنون از همه دوستان ....فقط یه سوال!!!!! آیا میشه dblookup رو طوری تنظیم کرد که قابلیت تایپ و جستجو هم داشته باشه؟؟؟؟؟:متفکر: