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

نسخة كاملة : ادخال محتوى من جدول في ليست بوكس؟
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
بسم الله الرحمان الرحيم...
اخواني الكرام السلام عليكم ورحمة الله

لي سؤال بخصوص قاعدة بيانات اكسس...
والقاعدة هي مكونة من جدول ... به ثلاثة اعمدة...

وعدد من الخطوط يزيد على حسب الحاجة...
للتوضيح قليلة انظروا الصورة التالية بارك الله بكم ...

[صورة: namesrb2.jpg]

المراد هو...
الأسماء الموجودين بين العلامة الحمراء...
المراد ادخالهم في listbox او dblistbox لا يهم... علماّ ان الأسماء كثر...
يعني ممكن 500 او اكثر...
فكيف السبيل الى ذلك اكرمكم الله ؟

ان شاء الله السؤال واضح..
وان لم يكن كذلك ... اوضح اكثر...
جزاكم الله كل خير..
السلام عليكم

اولا ب dblist box
PHP كود :
DBListBox1.DataSource:=DataSource1;//       المربوطة مع التيبل الدي نريد عرض بيانات منه
 
DBListBox1.DataField:=ADOTable1username.name;//الحقل الدي نريد عرض بيانات منه 
ثانيا DBLookupListBox1
PHP كود :
with DBLookupListBox1 do
 
begin
   DataSource
:=DataSource1;//  المربوطة مع الجدول الدي نريد التخزين به
   
DataField:=ADOTable2username.name;//الحقل الدي نريد التخزين به
   
ListSource:=DataSourc2;//المربوطة مع الجدول الدي نريد عرض بيانته
   
ListField:=ADOTable1username.name;//الحقل الدي نريد ان يره المستخدم
   
KeyField:=ADOTable1username.name;//الحقل الدي نريد تخزين قيمتة عند الاختيار
 
end; 
ثالثا ListBox
PHP كود :
ADOTable1.open;
   
ListBox1.clear;
   while 
not ADOTable1.eof do
   
begin
    ListBox1
.items.Add(ADOTable1username.value);
    
ADOTable1.next;
   
end;
   
ADOTable1.Close; 
و السلام عليكم
السلام عليكم ورحمة الله اخي سنيك...
اخي الكريم...
بارك الله فيك وجزاك الله كل خير...

في الحقيقة اخي شرحك ما فيه اشكال
لكن الله المستعان...

يوجد بعض النقات لم افهمها..
اين اضع هذه الأكود اكرمك الله ؟
وبلتحديد الأولى و الثانية اكرمك الله...

هل في حدث OnCreate ؟ ام اين بارك الله فيك...
وشكرا كثيرا على المستعادة ..

والسلام عليكم ورحمة الله
نعم اخواني الكرام
بارك الله فيكم جميعا...
في القيقو مشي الحال الآن وبدون مشاكل تقريبا...
وبرنامجي على وشك النهاية Rolleyes

الّى انه تم اكتشاف مشكلة كنت كد نسيتها والله المستعان...
يعني الأن الأسمأ الموجودين في قاعدة البيانات تم عرضهم في
DbLookupListBox1 وتمام التمام...

لكن المشكلة هي انني **** عمل filter لهذه الأسماء...
فكما ترون في الصورة يوجد على اليمين عمود اسمه Categorie وبه امام كل
اسم من ال UserName حرف F اي يعني Friend ...

لكن هذا على كثير من الأسما الّى انه ليس على كل الأسماء...
فبعض الأسماء يوجد بجانبها حرف ال R وبعدها يوجد حرف ال B ....

المراد هو اظهار كل الأسماء الذين على جنبهم حرف ال F بارك الله فيكم...

ـــــــــــــــــــــــــــ

للتوضوح اكثر عن طريقة اظهار الأسماء...
استطعت ادخال الأسماء في اليست بوكس بطريقة التالية...
استخدمت
ADOConnection
ADOTable
Datascource
DBLookupListBox

وصلت اول ثلاث مكونات عادي...
اما الرابع وصلت فيه ال
ListSource
و من ثم وصلت ال
ListField و KeyField

وتم عرض الأسماء بهذه الطريقة ولله الحمد...

ـــــــــــــــــــــــــــــــ

امّا بخصوص السؤال فأظنه واضح اعلاه
بارك الله بكم جميعا...

وشكرا مرة ثانية للأخ snake
اخواني الكرام...
بارك الله فيكم جميعا...

ها انا اصارع المشاكل من جديد والله المستعان
ولكن لن استسلم رغم اني اشعر انّي على وشك الإستسلام...

مشكلتي مازالت قائمة ...
ولكن تمكنت من تقدم بسيط قد يفيد..
وقلت اضعه هنا ولعل احد الإخوة يعلم الحلّ...

هو ببساطة...
عند اختيار keyfield لتصبح categorie يتم عمل المراد تقريبا...
يعني هو يعمل فلتر لكل الأسماء الذين لديهم نفس الحرف في Categorie ولكن...

المراد كما تم ذكره سابقاّ...
اظهار الأسماء مع حرف ال F فقت....

بارك الله فيكم...

وإن اردم اي معلومة اخرى فأنا جاهز بإذن الله تعلى...
بارك الله فيكم وجزاكم خيرا...

والسلام عليكم ورحمة الله
PHP كود :
ADOTable1.Filter:='Categorie='+QuotedStr('F');
  
ADOTable1.Filtered := True; 
DeltaAziz كتب :
PHP كود :
ADOTable1.Filter:='Categorie='+QuotedStr('F');
  
ADOTable1.Filtered := True; 

نعم... بارك الله فيكم اخي الكريم عبد العزيز...
هذا هو تماما ما كنت ابحث عنه ولله الحمد
انا الآن فرحان جدا جدا Big Grin بارك الله فيك مرة اخرى...

في الحقيقة لو تعلم كم تعبت من اجل هذه المشكلة...
وسبحان الله...
كانت فقد سطرين من اكواد الدلفي :eek:
ولكن الحمد لله...

بس اخي الكريم..
سؤال لو سمحت....

الكود الذي وضعته انت يكون في حالة وضع الكود من خلال محرر الكودات...
الا يمكن بطريقة وضع نفس الكود في ال object inspector ...
يعني مثلا...

في ال filter لل adotable نضع الكود التالي
PHP كود :
'Categorie='+QuotedStr('F'); 

او ما شابه ذلك...
جربت ولكن قال لي خطأ...

اعلم انه ممكن وضع الكود في حدث OnCreate للفورم..
ولكن هذا سؤال اضافي فقد..

ولكن بارك الله فيك على كل حال...
والمشكلة انحلت الآن ولله الحمد ...

بارك الله فيكم جميعا
والسلام عليكم
PHP كود :
ADOTable1.Filter:='Categorie='+QuotedStr('F'); 
  
ADOTable1.Filtered := True; 
يمكن كتابتها
PHP كود :
ADOTable1.Filter:='Categorie=''F'''; 
  
ADOTable1.Filtered := True; 
استخدمت QuotedStr عمدا لكي اجنبك الوقوع في خطأ عدد ال'''

ان كنت تريد كتابة Filter في محرر الخصائص اكتب
PHP كود :
Categorie='F' 
والسلام عليكم
اها... نعم...
واضح الآن...

شكرا جزيلا اخي عبد العزيز
بارك الله فيك