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

انا سويت في زر المسح الكود التالي

go_item('activities.dis_name');
clear_item;
go_item('activities.dis_no');
clear_item;

بس هذا الكود مسح لي كل شي انا ابغى امسح اخر شي تم اضافته الى القائمة




هذا الكود في الزر الاول

begin


if :dis_no is null then

:dis_no:=:actv_no;
:dis_name:=:actv_name;
else

:dis_no:=:dis_no ||','||:actv_no;
:dis_name:=:dis_name ||',' ||:actv_name;
end if;


end;

الزر الاول اسمه add_btn
الزر الاول اسمه rem_btn

تم تعديل 17 مارس 201214 سنة بواسطة Ahmad.Hasan
الرجاء تنسيق الأكواد

السلام عليكم
اخي الكريم هذه الطريقة غير عملية..
إليك طريقة أفضل وقوية أكثر:
1- اعمل جدول جديد لكي يتم تخزين فيه الإصناف مع اضافة عمود جديد وليكن اسمه Item_Flag.
2- يتم عمل فورم يعتمد على بلوكين...وكلاهما يعتمدوا على نفس الجدول...ولكن في البلوك الأول تكون قيمة Item_Flag = 0 والبلوك الثاني تكون قيمته = 1 مع وجود شرط بالقيم على مستوى البلوك في Where Clause...
3- يتم اضافة زر للإدخال وزر للمسح بحيث ان زر الإدخال هو عبارة عن جملة Insert ولكن يتم تمرير قيمة Item_Flag = 1 ومع عمل Execute_Query سينتقل الى البلوك الثاني...وزر المسح سيعمل بشكل عكسي (Update Statement) بحيث يتم تغيير قيمة الـ Item_Flag = 0 ومع عمل Execute_Query سيتم ارجاعه الى البلوك الأول....

أرجو ان تكون الفكرة قد وصلت...

تحياتي.

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

السلام عليكم

يمكنك تنفيذ ما تريد باستخدام

add_list_element
delete_list_element

with the same value in two lists

بس اللي عندي انا text item مش list item فهل ينفع استخدم add_list_element مع text item

السلام عليكم

اخى الكريم استخدم اللست ايتم من نوع التى لست وده يحل المشكلة

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