delphi4arab منتديات دلفي للعرب
استفسار عن استعمال Listbox - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : استفسار عن استعمال Listbox (/showthread.php?tid=139)



استفسار عن استعمال Listbox - selloumi - 13-04-2008

كيف يمكن تنفيذ مكونات listbox l مثلا تحتوي القائمة على كلمة1 و كلمة 2 وكلمة 3 كيف اجعل كلمة1تنفذا امر1 كلمة 2 تنفذامر2 وهكذا وشكرا جزيلا


استفسار عن استعمال Listbox - محمد عبد العزيز - 17-04-2008

الكلمات او الجمل المكتوبة في ListBox تكون في جدول Items
بحث اول كلمة هي
PHP كود :
ListBox1.Items[0] 

لا حظ ان الترقيم يبدأ من الصفر
عدد الكلمات هي Count اي
PHP كود :
ListBox1.Items.Count 

عند اختيار كلمة من القائمة فان رقمها يكون في ItemIndex
PHP كود :
ListBox1.ItemIndex 

والكلمة المختارة هي
PHP كود :
ListBox1.Items[ListBox1.ItemIndex] 
ملاحظة: عندما ل ايتم اختيار كلمة فان فيمة ItemIndex تكون -1

الان تريد ان يتم تنفيذ امر ما حسب الكلمة، هناك اكثر من طريقة
يمكنك مثل استخدام المقارنة
PHP كود :
if ListBox1.ItemIndex<>-1 then if ListBox1.Items[ListBox1.ItemIndex ] = 'kalima1' then Begin
هنا تضع الاوامر التي تنفذ عند اختيار Kalima1
End
; 
كما يمكن استخدام Case وكتابة شيئ مثل
PHP كود :
Case ListBox1.ItemIndex Of
0
: Begin
هنا تضع الاوامر التي تنفذ عند اختيار Kalima1
End
;
1: Begin
End
;
2:Begin
هنا تضع الاوامر التي تنفذ عند اختيار Kalima2
End
;
end; 
والسلام عليكم ورحمة الله



استفسار عن استعمال Listbox - selloumi - 21-04-2008

مشكور أخي العزيز على هذه المعلومة القيمة التي طالما انتظرتها و دمتم في خدمة السائلين و خدمة الموقع و شكرا مرة أخرى.


استفسار عن استعمال Listbox - محمد عبد العزيز - 21-04-2008


لاشكر على واجب اخي، وان كان عندك غموض لا تتردد في السؤال
والسلام عليكم ورحمة الله