استفسار عن Button

[me_mohamed_rashad]

السلام عليكم ورحمة الله
لو سمحتم يا اخوه انا عامل مشروع صغير كده وعايز اعمل زرار لما ادوس عليه يقوم بارسال القيمة الموجوده فى ايتم من النوع display الى ايتم اخر فى نفس البلوك ولكن فى كانفاس مختلف ومن النوع text item
ملحوظه الايتم اللي هيستقبل القيمه اللي هيا ارقام عايزه يبقا عباره عن حصاله يعني يقوم بجمع كل قيمه تاتى ليه مع ما سبقها اي يعمل total يا رب تكونو فهمتوا منى

[mustafagamiel]

السلام عليكم

فرضا ال display item اسمه a وال text item الاي هو حصالة اسمه b يبقى تعمل كده

:b:=nvl(:b,0)+a;

بسي لاحظ مع كل ضغطة زر سيزيد الحصالة انت ممكن تعمل كده بعد السطر السابق تصفر ال display item كي لايزيد مع الضغط اي تجعل قيمة a:=0;

موفق

[me_mohamed_rashad]

السلام عليكم ورحمة الله
ربنا يجازيك كل خير الكود جميل زيك بالظبط
بس لو سمحت ممكن توضحلى الفقرة التانية بتاعت التصفير دي
وحاجه تانيه اذا سمحت انا عامل button يعمل clear_form انا ايز اخليه يعمل clear لكانفس واحد مش لكل الفورم زي ما بيحصل ينفع ولا لا
للعلم انا عامل بلوك عليه اتنين كانفاس وانا عايز اعمل clear لكل واحد منهم لوحدو يعني زرار لكل واحد يعمل clear منفصل عن التانى
مرة تانية شكرا للرد والمعلومة الجميلة

[mustafagamiel]

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

التصفير المفروض تعمله علشان لو ضغت على الز اكثر من مرة سيقوم بالجمع تاني كي تتجنب ذلك هتصفر قيمة الديسبلاي ايتم وهكذا
بالنسبة لعمل CLEAR
لو الكانفس على بلوك كامل اعمل كلير للبلوك اما لوكانت مجموعة من الايتم ممكن تجعل كل ايتم = NULL; وهكذا
موفق

[me_mohamed_rashad]

السلام عليكم ورحمة الله
اخ مصطفى الله يكرمك بجد الف الف شكر
وانا فهمت فكرة انى اصفر الديسبلاى ايتم بس مش عارف اكتب ايه فى button يعني اكتبها ازاى يا ريت لو تسمح توضح اكتر
ثانيا فى النقطة بتاعة ال Clear اعمل كل ايتم = Null يعني اكتب مثلا فى الزرار بتاع ال clear وليكن ايتم اسمه A اكتب a=null كده ولا ايه ؟؟
ومرة تانية شكرا على الرد

تم تعديل 9 أكتوبر 2009 بواسطة me_mohamed_rashad

[jadquraan]

عزيزي اولا لا يوجد clear للكانفس لكن يوجد clear_form و clear_block

وانا فهمت من كلامك انك بدك تمسح كانفس وتخلي الثانية لانه فيها قيم انت عامله بشكل مؤقت على شان تعمل عليها عمليات معينه

في طريقة افضل من عمل ايتم واخفائه وحفظ البيانات فيه بشكل مؤقت وهي عمل parameter

لو تروح للـ object nevigator
رح تلاحظ وجود مجموعة اسمها parameters
انقر عليها واضف عنصر وسميه مثلا test

الآن في كود اضافة القيمة اللي انت عامله اكتب

:parameters.test:=:parameters.test + nvl(:your_item,0);

في هذه الحالة لو قمت بمسح الفورم لن تذهب القيم التي قمت بحفظها وتستطيع ارجاعها ما دام الفورم شغال ولم تيم اغلاقه

[me_mohamed_rashad]

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

الآن في كود اضافة القيمة اللي انت عامله اكتب


SQL كود
:parameters.test:=:parameters.test + nvl(:your_item,0);


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

[jadquraan]

مثال على المطلوب في المرفقات

test.rar

[me_mohamed_rashad]

السلام عليكم ورحمة الله
يا أخى والله انا محرج منك بس الفورمه اللي انتى اديتهالى من غير اكواد ومش لاقى بداخلها اكواد ولا كود حتى انه بيجيلى error بيقول مفيش اكواد
انا عارف انى اطلت عليك بس انا جربت اعمل parameter زي ما انت قلت وسميته test وروحت كتبت داخل الزرار اللي المفروض هيعمل نقل للقيمه اللي بداخل ايتم على كانفاس واسم الايتم ده وليكن A الي ايتم تانى نوعه تيكست وعلي كانفاس تانى في نفس البلوك وليكن اسمه B
كتبت في هذا الزرار الكود اللى حضرتك كتبته ,وهو ::

parameter.test:=:parameter.test + nvl(:B,0:

للعلم لما جيت اكتب parameterS.test جبلى error فا جربت اكتب parameter.test مجبليش errors

[jadquraan]

اولا هو صحيح تكتب

:parameter.test

اولا الملف اللي بعثتلك اياه ملف مضغوط فك الضغط وستجد المثال ان شاء الله
طبعا المثال على اوراكل 10g

نفرض ان لديك العنصر a على الفورم وتريد عند النقر على زر حفظ هذه القيمة على البراميتر بالإضافة الى القيمة السابقة له

ستقوم بإضافة parameter ول تفرض ان اسمه test

الكود على الزر يسكون

:parameter.test=nvl(:parameter.test,0)+ nvl(:a,0);

اما اذا اردت حفظ القيمة في البراميتر ولم تكن هذه القيمة عبارة عن رقم

اكتب

parameter.test=:a;

[jadquraan]

هذا هو نفس المثال على 6i

test2.rar

[me_mohamed_rashad]

السلام عليكم ورحمة الله
جزاك الله كل خير يا اخ جاد
الموضوع اشتغل مرتين وبعد كده لا للاسف على العموم انت فتحتلى افكار جملة ومعلومات رائعة ولكن انا مضطر استخدم فكرة جعل item= null لو عندك معلومات عن كيفية استخدامها يا ريت تقولهالى
وعندى استفسار كمان ليه انا كل ما ادوس على زرار ال clear بيذهب ل item فى كانفاس تانى ويقف عليه انا عايزه لما اعمل clear يفضل فى نفس ال canvas
وكذلك ايضا لما بعمل run بجد انه بيذهب لهذا الكانفاس هل هناك حل؟؟