format82

جرب هذا الكود ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('select * from emp where name='+QuotedStr(Edit1.Text)); ADOQuery1.Open;

انا اعمل بدلفي 7 سوف تجدها في STANDARD لم اعمل بدلفي 2010 من قبل ليس لدي فكرة غير في خصائص ListBox العادية Multiselect = True Extendselect =False وليس لدي CheckListBoX يمكنك استعمالها بدلا من ListBox العادية انا لا افهم ما غرض من اختيار اكثر من اجابة لن تسطيع …

في الحدث OnKeyPress للمكون اضع هذا الكود If Key=#13 Then Begin PerForm(WM_NEXTDLGCTL,0,0) End;

غير في خصائص ListBox Multiselect = True Extendselect =False

جرب هذا الكود ADOTable1.FieldByName('id').AsInteger:=ADOTable1.RecordCount;

تقوم بعمل جدول جديد وتحفظ فيها جميع الانواع (نقدى - شهرى - اجل,الخ ) واذا كان هنالك بيانات جديدة تقوم بحفها من جديد ثم تضيف ComboBox لجلب البيانات اكتب هذا الكود في onCreate ComboBox1.Clear; ADOTable1.DisableControls; try ADOTable1.Open; ADOTable1.First; while…

يتم التعامل معهم نفس التعامل مع الادوات السابقة لقد قمت بتعديل المثال Pro 1_2.rar

نعم قم باضافة TDBLookupComboBox ثالث ثم قم بربطها مع الحقول المعنية اضغط كلك علي TDBLookupComboBox في DataSource اختر DataSource1 وفي datafield اختر الحقل المراد حفظ البيانات فيها علي ما اذن (itm_nm) وفي listDataSource اختر DataSource مرتبط مع الجدول مراد عرض …

عسي هذا ما تريده انظر لمشاركة الاخ طلال بلال قمت بتعديل المرفق علي حسب ما فهمت Pro 1.rar

قم بربط ADOQuery مع جدول واحد فقط ثم ربطها مع DBComboBox اي يصبح ليك 3 (DBComboBox) و 3 (ADOQuery) لقد قمت بتعديل المثال Pro 1.rar

امسح الكود المكتوب واكتب هذا الكود بدلا منه DBComboBox1.Clear; ADOQuery1.DisableControls; try ADOQuery1.Open; ADOQuery1.First; while not ADOQuery1.Eof do begin DBComboBox1.Items.Add(ADOQuery1.FieldByName('itm_nm').AsString); ADOQuery1.Next; end; finally ADOQue…

قم بتعريف حقل في قاعدة البيانات اختر ترقم تلقائي انظر الملف المرفق عسي هذا ما تريده My Pictures.rar

قم بتعديل الكود مع مثالك DBComboBox1.Clear; ADOQuery1.DisableControls; try ADOQuery1.Open; ADOQuery1.First; while not ADOQuery1.Eof do begin DBComboBox1.Items.Add(DataSource1.DataSet.FieldValues['name']); ADOQuery1.Next; end; finally ADOQuery1.EnableControls; …

مشكور اخي الكريم

ياريت لو توضح اكثر علي حسب فهمي اذا كنت لا تريد حقل الترقيم التلقائي قم بحذفها من الجدول

اترك DataSource فارغا في listSource قم باختيار DataSource المرتبط مع ADOTable وفي listfield و keyfield اختر اسم الحقل التي تريد عرضها

سلام عليك ارفقت ليك مثال عسى هذا ما تريده حفظ صور jpg في اكسس.rar

سلام عليكم لا بوجد رد ارجو المساعدة

شكرا لكم جمعيا علي الرد . حلت المشكلة بارك الله فيكم

شكرا يا اخي بارك الله فيك