المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : استفسار عن استعمال Listbox


selloumi
13-04-2008, 07:35 AM
كيف يمكن تنفيذ مكونات listbox l مثلا تحتوي القائمة على كلمة1 و كلمة 2 وكلمة 3 كيف اجعل كلمة1تنفذا امر1 كلمة 2 تنفذامر2 وهكذا وشكرا جزيلا

B.M.AbdelAziZ
17-04-2008, 11:13 AM
الكلمات او الجمل المكتوبة في ListBox تكون في جدول Items
بحث اول كلمة هي
ListBox1.Items[0]

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

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

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

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

Case ListBox1.ItemIndex Of
0: Begin
هنا تضع الاوامر التي تنفذ عند اختيار Kalima1
End;
1: Begin
End;
2:Begin
هنا تضع الاوامر التي تنفذ عند اختيار Kalima2
End;
end;

والسلام عليكم ورحمة الله

selloumi
21-04-2008, 03:08 PM
مشكور أخي العزيز على هذه المعلومة القيمة التي طالما انتظرتها و دمتم في خدمة السائلين و خدمة الموقع و شكرا مرة أخرى.

B.M.AbdelAziZ
21-04-2008, 03:23 PM
لاشكر على واجب اخي، وان كان عندك غموض لا تتردد في السؤال
والسلام عليكم ورحمة الله