مشكلة في الـ List Item

[MMA]

بسم الله الرحمن الرحيم



إخواني الكرام ، تحية طيبة وبعد ،

الحمد لله أنا حالياً أتعامل مع الـ List Item جيداً ولدي المقدرة علي إدراج عنصر وحذف عنصر وتحديد عدد العناضر وإيجاد قيمة وعنوان العنصر .

لكن إخواني ، واجهتني مشكلة ولم أتمكن من حلها وهي كيف أعلم العنصر الذي يقف علية المستخدم !!!!

بمعني أدق ، أنا لدي جدول يدعي Emp :

Emp_ID	   -->   Number ( PK )
Emp_Code   -->  String
Emp_name  -->  String

قمت بجلب كافة البيانات بالقائمة بالطريقة المعتادة كما يلي :

X := X + 1
Add_List_Element('lst_name',X,ID_Name,ID_Serial);

مشكلتي إخواني أنني أرغب عند النقر علي عنص معين يعرف قيمة الـ Index الحالي الذي تم الوقوف علية كما يلي :

ID_Name := Get_List_Element_Label('lst_name',Index);

المطلوب ، كيف أعلم قيمة الـ Index الموضح بالكود السابق ؟؟؟؟؟



شكراً ، وجزاكم الله كل خير ،

Project.zip

[hobaa]

ابحث فى ال help عن

GET_LIST_ELEMENT_VALUE
 (list_name   VARCHAR2, 
  list_index  NUMBER);

[MMA]

أخي الكريم ، أنا أستخدم الكود بنجاح فقط أحدد إسم الليستة ومن ثم أدخل رقم الـ Index وبعد ذلك يجلب لي قيمة الـ Value كما يلي :

-- Value جلب الـ --
:Text_Item1 := GET_LIST_ELEMENT_VALUE('lst_names', 15); 

-- Label جلب عنوان العنصر --
:Text_Item1 := Get_List_Element_Label('lst_names',15);

-- Delete حذف عنصر محدد --
Delete_List_Element('lst_names',15);

لكن أخي لاحظ عند الحذف أو الجلب سواء للقيمة أو للعنوان يجب تحديد قيمة الـ Index نفسها وهذه القيمة بالطبع تكون معرفة من قبل أثناء تحميل البيانات عليها كما يلي :

add_list_element ('lst_names,1,'Ahmed',15);
add_list_element ('lst_names',2,'Usif',20);
add_list_element ('lst_names',3,'Sara',25);
add_list_element ('lst_names',4,'Mahmod',30);
add_list_element ('lst_names',5,'Mostapha',35);
add_list_element ('lst_names',6,'Fady',40);
add_list_element ('lst_names',7,'Ashraf',45);
add_list_element ('lst_names',8,'Mosa',50);

لكن أخي أنا كل الي طالبة معرفة قيمة الـ Index الخاص بـ Item معين داخل قائمة العناصر List_Item بحيث إذا قام المستخدم بالنقر علي أي عنصر من عناصرالقائمة List_Item أعلم أوتوماتيك قيمة الـ Index ومن ثم أجلب ما أنا أريدة !!!

أنظر الي المثال المرفق ولكنه مثال وهمي وليس سليم :

Declare
ID_Index   Number;
ID_Value   Number(20);
ID_Label   VarChar2(50);
Begin
ID_Index := Get_List_Element_Index_Selected('lst_names');
ID_Value := Get_List_Element_Value('lst_names',ID_Index);
ID_Label := Get_List_Element_Label('lst_names',ID_Index);
End;

لاحظ أخي الغرض Get_List_Element_Index_Selected غير صحيح ، وكنني أوضح فية إيجاد قيمة الـ Index المحددة حالياً للمتخدم ، ومن ثم بعد ذلك إيجاد أي شيء آخر أريدة من القائمة .





ياريت أجد حل !!!

شكراً للجميع

[Om MAriam]

ممكن تحديد الغرض من معرفة الIndex لايجاد حل افضل

[mw_wageeh]

السلام عليكم
ازيك اخى mma
حلها بسيط اخى
شوف هذا الكود
واتمنى ان يكون هذا هو ماتريد

for i in 1.. Get_List_Element_Count(list_id) loop
   if Get_List_Element_Value(list_id,i) = :list_item then
      v_label := GET_LIST_ELEMENT_LABEL(list_id,i);
      v_index := i ;
      exit ;    
end if;
end loop;

[MMA]

الأخ الغالي mw_wageeh تحية طيبة وبعد ، الحمد لله أنا بخير ، كيف حالك أنت ،

وكيف أحوال الجميع ، يارب دايماً بخير ،

في الحقيقة أنا كنت أنتظر طريقة مباشرة ، أما هدفي من معرفة الـ Index الذي يقف علية المستخدم كما وضحت أنا أرغب عند إختيار عنصر معين من عناصر القائمة بواسطة المستخدم أجلب قيمة الـ Lable كما أشاء ، بس للأسف لم أجد طريقة مباشرة

علي العموم ، جزاكم الله كل خير وإليكم طريقتي بالمرفق

( بسم الله ، من هنا )

كل عام وأنتم بخير .

وجزاكم الله كل خير ويارب دايماً بالتوفيق ،

شكراً