بسم الله الرحمن الرحيم

باذن الله ساشرح لكم طريقة عمل كلا من:
1-Radio Button
2- Check Box
فكرة الدرس :

(بحث عن موظفين بطريقتين الاولى بـRadioButton والثانية بــCheckBox وفي كل طريقة نتطرق البحث ايضا بطريقتين مرة البحث بالرقم ومرة اخرى البحث بالاسم ،واسال الله ان يوفقني فيه).

اولاً قبل البدء في العمل احب ان اذكر اخواني اعضاء المنتدى ان الشرح سوف يكون على جدول Employees
الموجود داخل المستخدم HR لانني وجدت في هذا الجدول حقول كثيرة يمكن الشرح فيها .
ومن هنا تقدر تفعل المستخدم HR كما ذكره الاخ ابو صالح

بسم الله نبدأ الدرس

اول شئ نسوي مع بعض Data Block عن طريق الـWizard ، يعني راح تروح لشاشة الــNavigator F3 وتسوي اضافة لـ DataBlock اختار جميع الاعمدة في الجدول الى ان تنهي من انشائه . بعد ماخلصت من انشائه ، تروح لشاشة الـNavigator وتسوي DataBlock ثانية بس هذه المرة عن طريق الـManually وراح يكون في الـDataBlock الثانية كل الـItems اللي راح نسويها مع بعض .
الحين تروح لشاشة LayOut F2 ،وراح تسوي Item من نوع CheckBox يعني زي كذا



بعد كذا تروح لخصائص الــCheckBox F4 وتغير فيه شوي ،مو كثير يعني راح نغير اهم شئ زي كذا



وبنفس طريقة انشاء الـCheckBox الاول تسويلك واحد ثاني ، وكمان ياريت لو تسوي كمان اثنين TextItems كل واحد بجنب CheckBox وكمان واحد PushButton وتكتب عليه مثلا SearchByBox يعني زي كذا الشكل النهائي : ( مو الشكل النهائي للدرس )


لاحظوا يا اخواني اعضاء المنتدى ان حنا الى الحين ماكتبنا أي كود ، فانا جالس اقول شكلهم الاعضاء يقولون طيب وين الاكواد .بقولكم الحين حنا اول شئ بنصمم الشكل وبعدين نكتب لكل Item نبغاه الكود الخاص به .
طيب بعد ماسوينا الحاجات الخاصة بالــCheckBox
نسويلنا الحين الحاجات الخاصة بــRadioButton ، طبعا الفكرة نفسها بس حنا هنا بنسوي البحث بطريقتين مختلفتين الاولى عن طريق الـ RadioButton والثانية عن طريق CheckBox .

تروح لشاشة الـLayOut F2 وتختار خاصية الـRadioButton وتسويلك منها اثنين لان هنا ممكن يكون البحث مرة بالرقم والمرة الثانية بالاسم، وتسويل برظو اثنينTextItem نفس الاول كل واحد بجنب RadioButton ، يعني بكذا راح يكون عندنا اربع TextItem شوف كيف راح يكون الشكل :



لو تلاحظون في شاشة الــNavigator انه تكون عندنا RadioGroup وهو يشمل الــRadioButton حقنا اللي حنا سويناهم الحين الاثنين .
بعد كذا نروح لخصائص الـRadioButton (مو خصائص الـRadioGrpup )عشان نغير شوي من خصائصه الشكل التالي:



طبعا نسوي نفس الطريقة هذه للـRadioButton الثاني اللي تحته وتسميه R2 واسمه في العرض (SearhByName)
، ايه بعد لاتنسون تسوون زرPushButton عشان يشغلنا البحث ،وتكتبون فيه SearchByRadio ، نشوف الصورة كيف صارت الحين



الى هنا نكون خلصنا من تصميم الواجهة ، نجي الحين لكتابة الاكواد لكل Trigger مناسب .

تم تعديل 6 أكتوبر 200421 سنة بواسطة ألماس

الحين راح نسوي اول Trigger اللي راح يكون تابع للـ RadioGroup ويكون
(WHEN-RADIO-CHANGED) هذه هي الصورة


والحين نكتب في داخل هذا الكود التالي :

if :RADIO_GROUP6=1 then
set_item_property('t1',displayed,property_true);
set_item_property('t1',enabled,property_true);
set_item_property('t2',enabled,property_false);
elsif :RADIO_GROUP6=2 then
set_item_property('t2',displayed,property_true);
set_item_property('t2',enabled,property_true);

set_item_property('t1',enabled,property_false);
 end if;

شرح الكود :
في البداية وضعنا جملة شرطية بحيث يقوم بفحص قيمة الـRadioButton فاذا كانت قيمتها تساوي 1 اذا اجعل الـTextItem(T1) ظاهراً والخاصية الثانية يمكننا من الوصول للـT1 وفي نفس الوقت يقوم باغلاق الخاصية للـT2
(لاننا هنا اذا اردنا البحث بالرقم فيكون خاصية البحث بالاسم مغلقا والعكس صحيح).واذا كانت قيمة الـRadioButton تساوي 2 فيقوم بعكس العملية السابقة تماماً.
بعد كذا نسوي كود للزر اللي راح يسوي عملية البحث عن طريق الـRadioButton هذا هو :


طبعا ناخذ( Trigger (WHEN-BUTTON-PRESSED
ونكتب فيه الكود التالي:

if :radio_group6=1 then
set_block_property('EMPLOYEES',default_where,'EMPLOYEE_ID='||:t1);
elsif :radio_group6=2 then
set_block_property('EMPLOYEES',default_where,'FIRST_NAME LIKE'||''''||:t2||'''');
end if;
go_block('employees');
clear_block;
execute_query;

شرح الكود :ايضا جملة شرطية يتحقق من قيمة الـRadioGroup فاذا كانت القيمة تساوي 1 اذا يقوم هنا بعملية البحث عن طريق الرقم (ياخذ قيمة الـمتغير T1 ويساويه مع 'EMPLOYEE_ID'
فاذا تساوت القيم فراح يطبع بيانات الموظف اللي رقمه يساوي الرقم اللي انت مدخله عن طرق الرن تايم،،،
في الحالة الثانية اذا كانت الـRadioGroup تساوي القيمة 2 اذا نفذ عملية البحث عن طريق اسم الموظف وهذا انا اشوفه اهم شئ في البحث
'FIRST_NAME LIKE'||''''||:t2||'''' يقوم هنا بمساواة قيمة الـT2 اللي انت مدخله طبعا لازم يكون اسم موجود عشان يرجعلك قيمة بعد مابحث عليه وحصله ، يروح للبلوك employees ويعمل مسح للبلوك وينفذ عملية الاستعلام .وبكذا راح يكون عندك اكواد جاهزة للبحث عن طريق الـ RadioButton.
باقي ماخلصنا باقي عملية البحث عن طريق الـCheckBox طبعا فكرتها نفس الفكرة الاولى مع تغيير بعض خصائص ونكملها تحت!

نسوي الحين Trigger للـCheckBox21 اللي هو SearchByNumber (WHEN-CHECKBOX-CHANGED)

ونكتب فيه الكود التالي:

if :check_box21 =1 then
set_item_property('t3',displayed,property_true);
set_item_property('t4',displayed,property_false);
set_item_property('CHECK_BOX23',enabled,property_false);
elsif :check_box21=2 then
set_item_property('t4',displayed,property_true);
set_item_property('t4',enabled,property_true);
set_item_property('CHECK_BOX23',enabled,property_true);	
end if;

شرح الكود:الجملة الشرطية تحقق من قيمة الـCheckbox21الخاصة بالبحث عن طريق الرقم فاذا كانت تساوي 1(يعني حاطين العلامة صح على المربع ) اذا تقوم بعرض T3 واغلاق الـT4 وايضا اغلاق الـCheckBox23 الخاصة بالبحث عن طريق الاسم.

في الحالة الثانية تقوم التحقق من قيمة الـCheckBox21 فاذا تساوي 2(يعني شالين العلامة صح من المربع) فتقوم بتمكين وعرض الـT4 وتمكين الـCheckBox23 الخاصة بالبحث عن طريق الاسم.

وراح نسوي كمان Trigger للـCehckBox23 ويكون من نفس نوع الـTrigger (WHEN-CHECKBOX-CHANGED) اللي SearchByName

ويكون الكود كالتالي:

if :check_box23=1 then
set_item_property('t3',displayed,property_false);
set_item_property('t4',enabled,property_true);
set_item_property('CHECK_BOX21',enabled,property_false);
elsif :check_box23=2 then
set_item_property('t3',displayed,property_true);
set_item_property('t3',enabled,property_true);
set_item_property('t4',enabled,property_false);
set_item_property('CHECK_BOX21',enabled,property_true);
end if;

شرح الكود :(طبعا نفس الكود السابق ويفرق في تبديل مواقع القيم فقط ).
باقي نسوي Trigger للزر اللي راح يسوي البحث SearhByBox طبعا راح يكون (WHEN-BUTTON-PRESSED)
الكود كاالتالي :

if :check_box21=1 then
set_block_property('EMPLOYEES',default_where,'EMPLOYEE_ID='||:t3);
elsif :CHECK_BOX23=1 then
 set_block_property('EMPLOYEES',default_where,'FIRST_NAME LIKE'||''''||:t4||'''');
end if;	
go_block('employees');
clear_block;
execute_query;

^
^
^

وكمان شرح الكود :

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

طيب اذا كانت عند البحث عن طريق الرقم يعني راح يكون عندنا قيمة CheckBox21 تساوي1 فتقوم بالبحث عن رقم موظف مساواة مع قيمة الـT3 اللي انت مدخلها ،.اما اذا كانت قيمة CeckBox23 تساوي 1 يعني البحث راح يكون عن طريق الاسم ...ويعطيها خاصية البحث .

وهذا هو الشكل النهائي الظاهر في الصورة وباذن سوف ارفق الملف الكامل قريبا حين الانتهاء منه .



وبذلك اكون والحمدلله الذي وفقني بشرح كلا من :

1-RadioButton.
2-Check_Box.

واللي عنده أي سؤال او استفسار سوف اكون باذن الله متجاوبا معه .

ولاتنسونا من صالح دعاؤكم . وخاصة مع قدوم الشهر الكريم

تم تعديل 6 أكتوبر 200421 سنة بواسطة ألماس

مشكور
الحقيقة مجهود كبير

مشكور على هذا الجهد

مشكور وبالتوفيق انشاء الله

السلام عليكم
جزاك الله خير (الاخ الماس)

وياك يا أخ ayman_a

العفو tofeee
mr.mostafa،
John

ولكم الشكر الجزيل

تم تعديل 7 أكتوبر 200421 سنة بواسطة ألماس

اشكر شيادتكم علي حسن الاستضافة وارجوا من سيادتكم المزيد حتي اتمكن من المشاركة الفعلية وجزاكم الله كل الخير.
ةشكراً وارجو ارشادي الي الكتب الخاصة بالديفلوبر 2000 .
elsayed_elganayny
الشكر كل الشكر وكل عام وحضراتكم بخير وسلام وأعاد الله الشهر العظيم باليمن والبركات.

اهنئك على ماقدمت للأمام ايها الأخ العزيز الألماس

كيف اجعل radio button تابع لحقل موجود بالdatabase

مشكور على هذا الجهد يالماس
عندي سؤال افرض عندي ثلاثة radio button المستخدم اختار واحد
اوريد عندما يختار المستخدم احد ال radio button ان اقوم بعدم تفعيل البقية
اي ان هذا ال radio group متاح للاختيار مرة واحدة فقط

ولك جزيل الشكر

اشكر الاخوان
elsayed_elganayny

SalehEzz

mustafa76

على ردودهم الفعالة

الاخ naif224 هنا في الـ RadioButton تقوم انت باختيار

اي واحد منها ثم يقوم الكود بتخزينها في الـ DataBase اذا يكون

مرتبط مع الــDataBase عن طريق الكود الذي انشأته وهو عند WHEN-BUTTON-PRESSED للزر التابع

للـ SearchByRadio وهذا ما فهمته من سؤالك .

واذا كنت تعني في سؤالك شئ اخر ارجو التوضيح اكثر.

ونا في انتظارك...

العضو mustafa76

ردا على سؤالك اخي الكريم

لو لا حظت انني استخدمت نفس الفكرة التي


تتطرقت اليها ولكن الاختلاف يكمن في ان عملت

في المثال على اثنين RadioButton ويمكنك انت

ايضا ان تجعله لاكثر من اثنين ، واهم شئ انك تتاكد من

تغيير خصائص الItem الذي هو RadioButton هنا .

وذلك في

(set_item_property('item_name',enabled,property_<true or false>)

هذا الامر يعمل تفعيل وعدم تفعيل لل radiogroup وليس لل radiobutton
انا اريد ان افعل ولا افعل radiobutton موجود في radiogroup

الاخ mustafa76

بامكانك فعل ذلك الكود على الـ Item المسمى R1 او الـR2 او الـ ......

اذا كان لديك اكثر من RadioButton ، وذلك بان تكتب مكان Item_name اسم

الــItem والذي هو في المثال هناك R1 او R2

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

شكراً لك على الايضاح
نكتب اسم ال groub ثم اسم ال button

radiogroup name.radiobutton name

وجعلك الله ممن يرون وجه في الاخره

ممنون جدا ربنا يذدك

اخي ألماس مشكور جدا ويا ريت تتاكد من الصور لانها لا لا لا تظهر.

شكرا اخي الماس
ولكن
كيف يمكنني ان اشغل مسار فيديو وذلك بتحديد option button ومن ثم الضغط على زر command علما بأنه عند النقر على زر ال command يشغل المسار المحفوظ في ال ption button كل ما اريده هو الكود اللازم كتابته في ال trigger اللازم لتشغيل مسار الملف من option button

الف الف (يعني مليون) شكر لك يااخي ولكن لو تكرمت
ترى الصور مو شغاله الله يخليك ياليت تعدلها
واكون لك منون ...

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