انا عامل list Item للـــــــــ Country تمام وبملا List Item عن طريق الكود التالى
فى
الحدث : WHEN-NEW-FORM-INSTANCE

PROCEDURE ADD_LIST_ITEM IS
 LIST_COUNTRY ITEM;
LIST_TOWN_CITY ITEM;
BEGIN LIST_COUNTRY:=FIND_ITEM('CUSTOMERS.COUNTRY');
IF NOT ID_NULL(LIST_COUNTRY) THEN 
   CLEAR_LIST(LIST_COUNTRY);
END IF;
ADD_LIST_ELEMENT(LIST_COUNTRY,1,'Egypt','Egypt');
ADD_LIST_ELEMENT(LIST_COUNTRY,2,'Qatar','Qatar');
ADD_LIST_ELEMENT(LIST_COUNTRY,3,'Saudi Arabia','Saudi Arabia');
ADD_LIST_ELEMENT(LIST_COUNTRY,4,'Emirates','Emirates');
ADD_LIST_ELEMENT(LIST_COUNTRY,5,'Kuwait','Kuwait');
ADD_LIST_ELEMENT(LIST_COUNTRY,6,'Jordan','Jordan');	
ADD_LIST_ELEMENT(LIST_COUNTRY,7,'Other','Other');

LIST_TOWN_CITY:=FIND_ITEM('CUSTOMERS.TOWN_CITY');
IF NOT ID_NULL(LIST_TOWN_CITY) THEN 
  CLEAR_LIST(LIST_TOWN_CITY);
END IF;

END;

وشغال كويس جدا بس مش هى دى المشكلة

انا عامل list Item تانى City عاوز لما اختار Egypt مثلا يعمل يضيف ليا فىCity القاهرة والاسكندرية والزقازيق ولما اختار قطر فى country يضيف فى City السد و الدفنة ومشيرب

وكان الكود كالتالى
فى الحدث : WHEN-LIST-CHANGED
ودة طبعا للــCounty Item

DECLARE
LIST_TOWN_CITY ITEM;
BEGIN
LIST_TOWN_CITY:=FIND_ITEM('CUSTOMERS.TOWN_CITY');

IF NOT ID_NULL(LIST_TOWN_CITY) THEN 
	CLEAR_LIST(LIST_TOWN_CITY);

	IF :CUSTOMERS.COUNTRY='Egypt' THEN
		ADD_LIST_ELEMENT(LIST_TOWN_CITY,1,'Cairo','Cairo');
		ADD_LIST_ELEMENT(LIST_TOWN_CITY,2,'Alex','Alex');
		ADD_LIST_ELEMENT(LIST_TOWN_CITY,3,'Zagazig','Zagazig');

  ELSIF :CUSTOMERS.COUNTRY='Qatar' THEN
		ADD_LIST_ELEMENT(LIST_TOWN_CITY,1,'ElSad','ElSad');
		ADD_LIST_ELEMENT(LIST_TOWN_CITY,2,'Old Salata','Old Salata');
		ADD_LIST_ELEMENT(LIST_TOWN_CITY,3,'Meshaarab','Meshaarab');	

	ELSE
		CLEAR_LIST(LIST_TOWN_CITY);
		
	END IF;
	END IF;

END;

المشكلة بقى لما بختار Egypt بيملا City Item عادى ولما بختار Qatar مش بيفرغ List بيملى List مع العناصر بتاعت Egypt
وكمان لما اختار ايجيب تانى يمل عناصر ايجبت تانى يعنى مش بيفضى الــList مع انى كاتب Clear_list
اسف على على الاطالة وارجو المساعدة
والله المستعان

السلام عليكم
انظر هنا
http://www.araboug.org/ib/index.php?showtopic=37582

وفقك الله

اليك اخي الكود الصحيح هوه نفس الكود تبعك بس كان لازم تقوله قبل ما تعبي الليست ايتم انه يمسح محتوياته كما يلي
لكن انا سابدي اليك نصيحه ان تقوم بعمل 2 جدول احدهما للبلاد والاخر للمدن وتربطهم ببعض طبعا ماستر ديتيل وتعبي الليست ايتم من خلالهم.

DECLARE
   LIST_TOWN_CITY ITEM;
BEGIN LIST_TOWN_CITY:=FIND_ITEM('CUSTOMERS.TOWN_CITY');

   IF NOT ID_NULL(LIST_TOWN_CITY) THEN 
       CLEAR_LIST(LIST_TOWN_CITY);
   
       IF :CUSTOMERS.COUNTRY='Egypt' THEN
              CLEAR_LIST(LIST_TOWN_CITY);
           ADD_LIST_ELEMENT(LIST_TOWN_CITY,1,'Cairo','Cairo');
           ADD_LIST_ELEMENT(LIST_TOWN_CITY,2,'Alex','Alex');
           ADD_LIST_ELEMENT(LIST_TOWN_CITY,3,'Zagazig','Zagazig');
     ELSIF :CUSTOMERS.COUNTRY='Qatar' THEN
               CLEAR_LIST(LIST_TOWN_CITY);
           ADD_LIST_ELEMENT(LIST_TOWN_CITY,1,'ElSad','ElSad');
           ADD_LIST_ELEMENT(LIST_TOWN_CITY,2,'Old Salata','Old Salata');
           ADD_LIST_ELEMENT(LIST_TOWN_CITY,3,'Meshaarab','Meshaarab');    
         ELSE
           CLEAR_LIST(LIST_TOWN_CITY);  
       END IF;
   END IF;

END;

تم تعديل 26 أكتوبر 200916 سنة بواسطة elmasry

انا كانت جربتها كدة ومش نفعت برضة بس حجرب تانى
وانا برضة عامل فى فورمة تانية بتمل من الداتا بيز بس انا كانت عاوز دى تمل من الفورمة وبعدين فكرت انها تبقى فى الداتا بيز احسن
ولكن لنا لقيتها مش عاوزة تطلع صح كبرت بقى فى دماغى انى لازم اعملها فى الكود
قولت يعنى الفورم بيلدر حيعندنى
حجرب وارجع ارد عليك
وشكرا جدا على الاهتمام
والله المستعان

اليك اخي العزيز هذه الفورم بها حل المثال تبعك
مع ملاحظه ان الاتنين ليست ايتم بالمثال نون داتا بيز ايتم
NON DATASASE ITEM

list_item_problem.rar

تسلم ايديك يا بشمهندس Gamal على الاهتمام
فعلا انا كاتب الكود صح وكويس جدا لانى جرب حاجات كتير وقولت مش معقول انى مش عارف اعمل دة وان الكود مش بيتنفذ صح
بس السبب ان لازم تكون list item الخصائص الخاصة بــ Database بــNo
وطبعا دة مش حيكون مناسب للمشروع اللى انا بعملة علشان كدة حاخد بنصيحتك واعمل جدول County و city افضل فى الداتا بيز
وانا عملت list فى المشروع دة بتملا من الداتا بيز فى form تانية ويبقى مش حتيجى على الفورمة دى

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

تسلم ايديك يا بشمهندس Gamal على الاهتمام
فعلا انا كاتب الكود صح وكويس جدا لانى جرب حاجات كتير وقولت مش معقول انى مش عارف اعمل دة وان الكود مش بيتنفذ صح
بس السبب ان لازم تكون list item الخصائص الخاصة بــ Database بــNo
وطبعا دة مش حيكون مناسب للمشروع اللى انا بعملة علشان كدة حاخد بنصيحتك واعمل جدول County و city افضل فى الداتا بيز
وانا عملت list فى المشروع دة بتملا من الداتا بيز فى form تانية ويبقى مش حتيجى على الفورمة دى

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

اي خدمه اخي الفاضل والشكر لله عز وجل