+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ (/showthread.php?tid=813)
عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ - AL-MOB4RM3G - 14-04-2009
السلام عليكم ورحمة الله
اخواني كيف ممكن اعرض تيكست من عدة حقول من نفس الجدول في نفس السطر للمكون DBLookupListBox1 بارك الله فيكم؟
لتوضيح اكثر:
في قاعدة البيانات عندي 3 حقول يخزن فيه الإسم,, لكن لماذا 3 ؟
نعم لأانه في الأول سيخذن الإسم الأول,, في الثاني الإسم الثاني وفي الثالث الإسم الثالث للمستخدم,,
يعني مثلا,, المستخدم التالي,,
احمد محمد البوستاني
يخزن اسمه لهذا الشكل,,
احمد في الحقل 1
محمد في الحقل 2
البوستاني في الحقل 3 ,,
هذه ليست مشكلة,, لكن المشكلة عندما سأعرضها,, اود ان اعرض الإسم الكامل
ولهذا السبب اود ان ادمج الإسمآء بطريقة معيّنة,,
ان شاء الله السؤآل واضح ؟
بارك الله فيكم وجزاكم خيرا,, والسلام عليكم ورحمة الله وبركاته
عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ - gigi - 14-04-2009
edit1.text:=table1.field[0].value+' '+table1.field[1].value+....
اعذرني لاني اكتب من خلال الهاتف
عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ - AL-MOB4RM3G - 14-04-2009
gigi كتب :edit1.text:=table1.field[0].value+' '+table1.field[1].value+....
اعذرني لاني اكتب من خلال الهاتف
نعم اخي الكريم جزاك الله خير الجزاء,,
جربت هذا الكود اخي الكريم
PHP كود :
procedure TForm1.Button2Click(Sender: TObject);
var
a,b : string;
begin
a:= adoquery1.FieldByName('name').AsString;
b:= adoquery1.FieldByName('age').AsString;
edit3.Text := a+ ' ' + b ;
end;
وهو شغّال لكن هو يجلب المعلومات الى edit وهذا ليس ما اود ان افعله بظبت,,
اود انه من خلال listbox او مكون يشبهه مثلا DBLookupListBox1 الى آخره,,
ان احدد الطالب ويكون هذا من خلال عرض الإسم كاملا,,
يعني لتوضيح,,
عندي الآن المكون DBLookupListBox1
اذا ضبط الإحدادات التالية,,
ListSource=DataSource1
ListField=name
KeyField=name
في هذه الحالة يعرض كل الطلّاب الذين في الخانة name ,,
الذي اود ان اعمله انا,, هو ان ارض كل الطلّاب الذين في الخانة name + ان اضفيف على ال name خانة ثانية,, مثلا aftername
فيصبح بشكل التالي,,
name + lastname في كل سطر في المكون DBLookupListBox1
يعني بمعنى آخر,,
احمد محمد
وو الى آخره
ان شاء الله الآمر واضح الآن,,
وأشكرك كثيرا على محاولتك اخي الكريم,,
بارك الله فيكم جميعا والسلام عليكم ورحمة الله وبركاته
عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ - gigi - 14-04-2009
اعمل حقل حسابي ناتج من حقول الاسماء الثلاثة ومن تم اسند هذا الحقل الى dblistbox
عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ - AL-MOB4RM3G - 14-04-2009
gigi كتب :اعمل حقل حسابي ناتج من حقول الاسماء الثلاثة ومن تم اسند هذا الحقل الى dblistbox
نعم اخي الكريم,, هذا حلّ ممكن,, لكن هل هو الحلّ الوحيد؟
ماذا لو كان هناك 1000 طالب او اسم او اكثر ؟
في هذه الحالة سيتم تكرار الإسم كثيرا وهذا يزيد من حجم قاعدة البيانات,,
لا اعلم ان كانت الزيادة كبيرة في الحجم,, لهذا استبعت هذا الحلّ,,
لكن ان لم يكن هناك حلّ آخر,, سأضطر حينها لإستخدامها,,
بارك الله فيك اخي على كل حال وأشكرك شكرا كثيرا,,
ان كان لديك اقتراح آخر لا يزيد من حجم القاعدة فأنا ارحب به كثيرا
بارك الله فيكم جميعا والسلام عليكم ورحمة الله
عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ - chehrour - 17-04-2009
في الخاصية ListField تكتب Field1;Field2;Field3
عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ - AL-MOB4RM3G - 17-04-2009
chehrour كتب :في الخاصية ListField تكتب Field1;Field2;Field3
نعم بارك لله فيك اخي الكريم,, هذا ما كنت ابحث عنه,,
اشكرك كثير وأشكر كل الإخوة جزاكم الله خير الجزاء,,
بارك الله فيكم جميعا
عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ - المبرمج - 18-04-2009
الإخوة الكريم جزاكم الله خيرًا على إثراء هذا المنتدى، و للإفادة و الاستفادة أود إضافة مشاركتي، فأقول:
لو أني فهمت السؤال جيدًا فأقترح على الأخ AL-MOB4RM3G استخدام المكون ListBox و كتابة الكود التالي في Button:
PHP كود :
procedure TForm1.Button1Click(Sender: TObject);
var i : integer;
begin
Table1.First;
ListBox1.Clear;
For i := 1 To Table1.RecordCount Do
begin
ListBox1.Items.Add(Table1Nom.Text+' '+Table1Prenom.Text);
Table1.Next;
end;
end;
فالحل المقدم من قبل المشارك Gigi يمكن إستخدام DbGrid بدلاً من DBLookupListBox.
و الله أعلم.
عرض الكلام من عدة حقول في المكون DBLookupListBox1 او ما شبه ذلك ؟ - AL-MOB4RM3G - 18-04-2009
نعم بارك الله فيك اخي المبرمج,,
اسمك مثل اسمي تقريبا,, اخي الكريم ,, الحلّ الذي وضعته,, ممكن استخدامه وبدون مشاكل تقريبا,, لكن
ماذا لو كان عدد البيانات كبيرة ؟ حينها سيأخذ وقت لتنفيذ هذا الكود والله تعلى اعلم,,
هذا الذي اعلمه,, ان كنت مخطئ,, صححّوني :eek: