سبحانك لا علم لنا الا ما علمتنا انك انت العليم الحكيم


الاخوة الأعزاء هذا كود متواضع لاظهار ال Lov بدون الضغط على F9
الطريقة :

1- انشاء ال Lov وتحديد الحقل الذي سوف يستقبل القيمة منه
2- نذهب الى ال Lay Out Editor ونقف على الحقل المراد اظهار ال Lov عليه
3- نضغط على الماوس Click يمين
4- ثم نختار Smart Triger
5- نختار منها When_new_item_istance ثم Click dshv
6- نكتب هذا الكود

Declare
a boolean ;
begin a := show_lov ('اسم ال Lov ')
End;

7- ثم عمل Compile
8- ثم الحفظ والخروج
9- عند تنفيذ الForm والوقوف باEnter أو الماوس على الحقل سوف يظهر ال Lov مباشرة

أتمنى أن تكونوا استفدتم

هوه برده فى كود متواضع بيعمل نفس الحكايه اسهل

اعمل Triger على اي item انت عاوزه واكتب فيه
list_values;

ولعمل List Of Values تعمل من Right Click

-- في تريجر WHEN-MOUSE-CLICK

DECLARE
X VARCHAR2(1);
BEGIN X:=:SYSTEM.MOUSE_BUTTON_PRESSED;
IF X='3' THEN
--	EXECUTE_TRIGGER('KEY-LSTVAL');-- NOTE X='1' >>>>>>>>LEFT CLICK
DO_KEY('LIST_VALUES');            --      X='2' >>>>>>>>MIDDLE CLICK       
END IF;
END ;

بالتوفيق

جزاكم الله خيرا

هوه برده فى كود متواضع بيعمل نفس الحكايه اسهل

اعمل Triger على اي item انت عاوزه واكتب فيه
list_values;

طيب احط الكود ده فين مشتغلشي معي

انا لسه كنت اقرأ في موضوع LOV في كتاب للأوراكل ولما دخلت هنا تفجأت بهذا الكود الجيد والجميل

بصراحة في اختصار كثير ومفيد للوقت

انا لسه ماجربتوا وبرضوا اقولك شكرا جزاك الله خير

الف شكر على هذه المعلومات الرائعه

جزاك الله الف خير

معلومه حلوه شكرا