الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اخواني اريد انشاء قيد على text itemالرجاء المساعده

بدأه الماكس في 5 مارس 2011 · 11 رد · 1,237 مشاهدة · في قسم Oracle Forms
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمه الله وبركاته

اخواني الاعزاء انا عندي مشروع عن تاجير السيارات وواجهتي مشكله عند رقم اللوحه حيث رقم اللوحه اول ثلاث خانات حروف واربع خانات ارقام مثال(6767ن ا ا)

اريد ان اضع قيد على الtext item بحيث لايسمح للمستخدم ادخال رقم اللوحه بصوره خاطئه

وفي الختام تقبلو تحياتي

اللهم اتنا في الدنيا حسنه وفي الاخره حسنه وقنا عذاب النار

#2

بسم الله الرحمن الرحيم يفندم حل مشكلة حضرتك بسيط إن شاء الله حضرتك تيجى على التكست اللى عايز تعمل عليه قيد وتختار trigger when validate item وتكتب الكود ده

declare

;(v1 number(10

;(v2 varchar2(3

;(v3 number(4

begin

;(v1:=length(:t

if v1<7 then

;('message('you have been entered number of character smaller than wanted

;('message('you have been entered number of character smaller than wanted

elsif v1>7 then

;('message('you have been entered number of character longer than wanted

;('message('you have been entered number of character longer than wanted

else

;(v2:=substr(:t,1,3

;(v3:=substr(:t,4

;('message('you have been entered correct number of character

;('message('you have been entered correct number of character

;end if

exception when others then

;('message('you must enter the first three letter character and the last four letter number

;('message('you must enter the fisrt three letter character and the last four letter number

end;

حيث ان (t) هو اسم text item

بالتوفيق إن شاء الله

#3

الأخ محمد سليم حل مشكلتك سهل إن شاء الله تعملbutton وتسميها search وتضع عليها trigger when-button-pressed وتضع الكود التالى

DECLARE

;(V VARCHAR2(50

BEGIN

;'V:= 'DEPT.deptno = :B.T

;(set_block_property('DEPT',default_where,V

;('go_block('DEPT

;EXECUTE_QUERY

;END

حيث ان T هو TEXT ITEM وB: هو اسم البلوك الموجود عليه TEXT ITEM و DEPT هو اسم البلوك الذى سوف يتم عليه عملية البحث

#4

اخى محمد سليم ممكن تبعتلى اسم البلوك بتاع بيانات الطلاب واسم text item واسم البلوك اللى عليه text item وانا ابعت لحضرتك الكود بالضبط وكل اللى على حضرتك انك هتنسخه فى التريجر وإن شاء الله يشتغل لان حضرتك لازم تغير dept.deptno بما يلائم اسامى البلوك والتكست وبعديين حضرتك لازم تكتب اسم البلوك المراد الانتقال اليه نقطة اسم الحقل المراد الانتقال اليه ثم := اسم البلوك اللى عليه التكست نقطة اسم الايتم المراد الكتابة فيه وليس العكس

تم تعديل هذه المشاركة بواسطة faressara في 12 مارس 2011 في 20:22

#5

الاخ faressara

جزاك الله كل خير ومشكور وماقصرت على المساعده

#6

DECLARE

;(V VARCHAR2(50

BEGIN

;'V:= 'STU.pat_code = :b_1.search_box

;('set_block_property('stu',default_where,V

;('go_block('stu

;EXECUTE_QUERY

باافندم بس كان ليا سوال المفروض دلوقتى ان اسم البلوك stu ايه بقى b_2

تم تعديل هذه المشاركة بواسطة faressara في 13 مارس 2011 في 14:17

#7

امال البلوك stu يبقى انهو بلوك مهو حضرتك الفكره انك واقف على text item اسمه search_box على بلوك اسمه b_1 لما بتحط فيه رقم الطالب وتضغط على ال button بيوديك لبلوك الطلاب

وبيساوى القيمة اللى فى text item برقم الطالب pat_code اللى على البلوك stu ويعمل execute_query

#8

ايه ياخ محمد الكود اشتغل ولا لسه لو مشتغلش انا ممكن ابعت لحضرتك فورمه جاهزه وحضرتك تجربها عندك نفسى الفكره على user scott على الجدول dept

#9

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

MODULE2.rar

تم تعديل هذه المشاركة بواسطة faressara في 13 مارس 2011 في 15:27

#10

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

MODULE2.rar

#11

ابسط طريقة بواسطة format mask

f4 على text box

ضع AAA9999 في خانة Format Mask

تحياتي

#12

الله يجزيك الجنة على تعاونك مع الآخ وانا عندي مشروع قريبا

وبعرضه عليك للمساعدة قدر ماتستطيع والله ما انساك من دعوه صادقة وشكر الك

مواضيع مشابهة