د ر خواست راهنمایی

باسلام خدمت اساتید محترم
من تازه با دلفی اشناشدم یه مشکل داشتم لطفا کمکم کنید
یک جدول (دیتا بیس)دارم میخواهم یکی از ستونهای این جدول در زمان اجرا itemsهای یک DBComboBox1 یاComboBox1 باشند.چه کدی برای آن بنویسم.باتشکر

سلام
اين صفحه را ببينيد :

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

NoneForce سلام
به این لینک مراجه کردم چیز زیادی دسگیرم نشد به هر حال ممنون از راهنماییتان.

کد:

---

procedure TForm1.Button1Click(Sender: TObject);
Var i:Longint;
begin
ADOTable1.First;
 for i:=0 To ADOTable1.RecordCount-1 do
  Begin
    ComboBox1.Items.Add(ADOTable1.FieldValues['fNamep']);
    ADOTable1.Next;
  End;
end;

---

سلام

فقط یه نکته رو بگم. به جای fNameP همون اسم فیلد رو بنویس.
به جای ADOTable1 هم خوب دیگه اسم Table خودت.
بجای

کد:

---

    ADOTable1.Next;

---

این رو بزار

کد:

---

    ADOTable1.MoveBy(1);

---

موفق و پیروز باشی.

سلام
فكر كنم جواب كه داديد ربطي به سوال مطرح شده ندارد!
منظور n_helali يه همچين چيزيه :

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

نقل قول:

---

اين صفحه را ببينيد

---

نقل قول:

---

چیز زیادی دسگیرم نشد

---

نقل قول:

---

یک جدول (دیتا بیس)دارم میخواهم یکی از ستونهای این جدول در زمان اجرا itemsهای یک DBComboBox1 یاComboBox1 باشند

---

خوب امتحان این کد ضرر که نداره :D

دیگه من چمیدونم. منتظر خود n_helali میشیم تا خودش بگه. به من چه :D

بای

نقل قول:

---

نوشته شده توسط MasterData [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

کد:

---

procedure TForm1.Button1Click(Sender: TObject);
Var i:Longint;
begin
ADOTable1.First;
 for i:=0 To ADOTable1.RecordCount-1 do
  Begin
    ComboBox1.Items.Add(ADOTable1.FieldValues['fNamep']);
    ADOTable1.Next;
  End;
end;

---

---

با سلام از راهنمایی شما متشکرم .این روش جواب داد.