delphi4arab منتديات دلفي للعرب

delphi4arab منتديات دلفي للعرب > منتديات دلفي للعرب التعليمية > سؤال و جواب حول دلفي > استعمال ComboBox والاستغناء عن Edit في الجداول
نسخة كاملة : استعمال ComboBox والاستغناء عن Edit في الجداول
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2

سيل الجليد

16-05-2010, 05:00 PM
السلام عليكم ورحمة الله وبركاته

احتاج الاستغناء عن Edit لتعبأه بيانات في الجدول و استخدام المركبة التالية ComboBox

فرضاً في ComboBox1 مكتوب فيها عدة مدن فرضاً السعودية و الأمارات والجزائر وفرنسا وكندا

وهكذا...

ويكون موجود حقل بأسم ( المدن) يقوم بختيار من ComboBox1 ليظهر له المدن المتاحه فقط

نعرف ان كود ادخال من Edit

PHP كود :
procedure TForm1.Button1Click(Sender: TObject);
begin
    Table1.Append;
    Table1(------).Value := Edit1.Text;
    
    Table1.Post;

    Edit1.Text := '';
    
end; 

اتمنى تكوون الصورة واضحه

تحياتي

imad_soft

16-05-2010, 05:30 PM
السلام عليكم
حسب مافهمت اليك الحل
اربط dbcombobox1 ب datasource: datasource1
datefield: مدن
button double click
table1.post

سيل الجليد

16-05-2010, 05:40 PM
imad_soft

لا ليس ما احتاجه

الي ابغـاه هو combobox في مدن على حسب اختياري

ويوجد حقل في قاعدة البيانات بأسم المدن

عند الاختيار من combobox المدينة نضغط على الزر لأدخاله في قاعدة البيانات

اتمنى تكون وصلت المعلومة

وشكراً جزيلاً لكـ

imad_soft

16-05-2010, 05:57 PM
تريد ان تملا combobox بالمدن

سيل الجليد

16-05-2010, 10:41 PM
imad_soft

نعم

وايضاً عملية ادخالها الى جدول به حقل اسمة (مدن)

هل هذا الكود صحيح لأدخال الى الجدول

PHP كود :
procedure TForm1.Button1Click(Sender: TObject); 
begin 
    Table1.Append; 
    Table1city.Value := combobox1.Text; 
     
    Table1.Post; 

    combobox.Text := ''; 
     
end; 

الكاسر الآخر

17-05-2010, 09:14 AM
إذا كان حقل المدينة في قاعدة البيانات من نوع نصي فهذا الكود صحيح ...
وللضمانة ممكن تكتب
كود :
Table1.FieldByName('City').AsString := ComboBox1.Text;
أو ممكن
كود :
Table1.FieldByName('City').AsString := ComboBox1.Items[ComboBox1.ItemIndex];

سيل الجليد

17-05-2010, 03:20 PM
الكاسر الآخر
شكراً لك

ولاكن ا اكتب المدن في combobox كيف اقوم بذالك
عالماً ان المدن من اختياري
هذا المشروع كمثال، فقط امسحوا الكود الموجود في combobox

imad_soft

17-05-2010, 05:20 PM
لماذا لاتستعمل dbcombobox1 اسهل
املا dbcombobox1
items
ادخل المدن
اربط dbcombobox1 ب datasource: datasource1
datefield: مدن
button double click
table1.post

سيل الجليد

17-05-2010, 05:32 PM
imad_soft

ما فهمت كيف اقوم بجعل الزر يدخل البيانات من dbcombobox1 الى قاعدة البيانات

هل اكتب فقط

table1.post

لانه لم ينفع معي

imad_soft

17-05-2010, 05:43 PM
عادي جدا
املا dbcombobox1 ب المدن
اربط dbcombobox1 ب datasource: datasource1
ثم
datefield: مدن
button
table1.open
table1.post
الصفحات : 1 2
delphi4arab منتديات دلفي للعرب > منتديات دلفي للعرب التعليمية > سؤال و جواب حول دلفي > استعمال ComboBox والاستغناء عن Edit في الجداول