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



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

الحمد لله أنا حالياً أتعامل مع الـ 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

ابحث فى ال help عن

GET_LIST_ELEMENT_VALUE
 (list_name   VARCHAR2, 
  list_index  NUMBER);

أخي الكريم ، أنا أستخدم الكود بنجاح فقط أحدد إسم الليستة ومن ثم أدخل رقم الـ 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 المحددة حالياً للمتخدم ، ومن ثم بعد ذلك إيجاد أي شيء آخر أريدة من القائمة .





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

شكراً للجميع

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

السلام عليكم
ازيك اخى 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;

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

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

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

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

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

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

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

شكراً