السلام عليكم
عندي خانة في قاعدة البيانات إما 1 أو 0، للذكر 1 وللأنثى 0
أريد أن أغير الكمبوبوكس إما ذكر أو أنثى على حسب قيمة الخانة في قاعدة البيانات ما هي الطريقة المثلى
كيف يمكن ذلك؟
وعليكم السلام ورحمة الله
ماهو المكون الذي تستخدمه
هل هو TComboBox ام TDBComboBox
ام مكون اخر لشركة اخرى فلكل مكون طريقة خاصة به
بعض المكونات مثل StyleControl مثلا تقدم حلول على طبق من ذهب
(27-01-2021, 08:01 PM)Delphi4Us كتب : [ -> ]وعليكم السلام ورحمة الله
ماهو المكون الذي تستخدمه
هل هو TComboBox ام TDBComboBox
ام مكون اخر لشركة اخرى فلكل مكون طريقة خاصة به
بعض المكونات مثل StyleControl مثلا تقدم حلول على طبق من ذهب
أريد أفضلهم إن كان من الأفضل إستخدام TComboBox سأستخدمه وإن كان TDBComboBox هو الأفضل أحسن
أريد نصيحتكم مع كيفية الجلب من قاعدة البيانات
تضع بالكمبوبوكس ذكر وأنثى
وعند الحفظ تستخدم شئ مثل
كود :
ADOTable1.Edit;
if ComboBox1.ItemIndex = 0
then ADOTable1.FieldByName('MyFiled').Value:=0
else
ADOTable1.FieldByName('MyFiled').Value:=1;
ADOTable1.Post;
اذا كان المستخدم قد اختار ذكر فاجعل قيمة الحقل صفر والا فواحد تم حفظ
او تختصر الكود الى
كود :
ADOTable1.Edit;
ADOTable1.FieldByName('MyFiled').Value:=ComboBox1.ItemIndex;
ADOTable1.Post;
وطبعا في حدث التحميل للنموذج وعند استقبال قيمة الحقل تكون مثل
كود :
ComboBox1.ItemIndex:=ADOTable1.FieldByName('MyFiled').Value;
(28-01-2021, 02:19 AM)Delphi4Us كتب : [ -> ]وطبعا في حدث التحميل للنموذج وعند استقبال قيمة الحقل تكون مثل
كود :
ComboBox1.ItemIndex:=ADOTable1.FieldByName('MyFiled').Value;
تم حل المشكل جزاك الله خيرا