إعـــــــلان

**ميزو فوكس ميزو فوكس** · 31-05-2015, 12:13 AM

المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة

موفق أخي الكريم

في حال توفر محاولة جادة لن نبخل

اتفضل ملف المشروع لتاكيد المصدايقه في العمل

http://www.gulfup.com/?ZKzRfY

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

الملفات المرفقة

cod.rar (3.4 كيلوبايت, 20 مشاهدات)

**ميزو فوكس ميزو فوكس** · 31-05-2015, 12:17 AM

كل محاولاتي بتفشل حد يساعدني و يدلني ابداء منين لو سمحتوا

**عبود عبود عبود عبود** · 31-05-2015, 01:05 AM

غدا إن شاء الله تبدأ المشاركة

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-05-2015, 01:06 AM

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

أخي الكريم في المشاركة 13 أرفقت ملف مفتوحا سأكلمك على ضوء هذا الملف
كوني لم أطلع على الملف الذي أرسلته مؤخرا
-------------------------------------------------------------------------------
أولا ليست لدي الان امكانية رفع ملف مفتوح لكن سأحاول معك بطريقة مختلفة
لماذا ؟ لأن تكرار الايات ثم الانتقال الى سورة أخرى اذ لم نوقف التكرار الأول
سيحدث تداخل بين السور كأن تسمع مثلا سورة الفاتحة من الاية 2 الى 4 لتجد نفسك تنتقل
الى سورة أخرى من 2 الى 4 و بالتالي ما فائدة التكرار الذي هو أساسا للحفظ و بصورة مرتبة
--------- اذا عند اكتمال التكرار المحدد و بالايات المحددة يتم الانتقال للسورة الموالية من بدايتها و هكذا ....
و تعطي للمستخدم فرصة التحكم في التكرار عند الاية الأولى فقط من كل سورة غير ذلك سيبقى يستمع
للسورة كاملة الى غاية بداية سورة ثانية -------------------------------------------------------

اذ اتفقنا افتح الملف المرسل في المشاركة 13

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-05-2015, 01:19 AM

01 - احذف كل الأزرار
02 - و أضف xButton1 و xButton2
03 - ضف ثلاث أنبوتات يمكن اخفائها فيما بعد هم : Input1 و أكتب فيها 0 و Input2 و أكتب فيها 0 و Input3 لا تكتب فيها شيء
02 - مجلدات السور تكون مرقمة من 1 , 2, 3, و ليس 001 , 002 , 003 أي أرقام عادية
03 - الايات تكون داخل هاته المجلدات كذلك مرقمة من 1 , 2, 3, الخ مثلا سورة الكوثر هي المجلد 108 الايات بداخله 1 , 2 , 3
04 - نأتي الان إلى اليست بوكس تكون بهذا الشكل على أن تكمل السور و الترتيب مهم
ولاحظ مكتوب اسم السور و يقابلها رقم المجلد فقط

----------------------------------------------------------------------------

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-05-2015, 01:22 AM

الأكواد :
---- في ListBox1 في الحدث on select
أكتب :

كود PHP:


xButton.SetEnabled("xButton1", false);

MediaPlayer.Stop("media_player");

f=ListBox.GetCount("ListBox1");

n= ListBox.GetSelected("ListBox1");

v = ListBox.GetItemData("ListBox1", n[1]);

------------------------------------------------------------------------------------------

MediaPlayer.Load("media_player", "AutoPlay\\Audio\\"..v.."\\"..bidaya..".mp3");

MediaPlayer.Play("media_player");

Input.SetText("Input1", bidaya);

Input.SetText("Input3",n[1] );

--------------------------------------------------

ListBox.SetEnabled("ListBox1", false);

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-05-2015, 01:26 AM

---- في ComboBox1 المخصصة لبداية الاية
أكتب :

كود PHP:


MediaPlayer.Stop("media_player");



v = ComboBox.GetSelected(this);

bidaya = String.ToNumber(ComboBox.GetItemText(this,v));

---------------------------------------------------------------------------

ComboBox.SetEnabled(this, false);

xButton.SetEnabled("xButton1", true);

--- في ComboBox3 و المخصصة الى الاية

أكتب

كود PHP:


MediaPlayer.Stop("media_player");



mm = ComboBox.GetSelected(this);

nihaya = String.ToNumber(ComboBox.GetItemText(this,mm));

----------------------------

ComboBox.SetEnabled(this, false);

xButton.SetEnabled("xButton1", true);

في ComboBox2 و المخصصة لعدد التكرار أكتب

كود PHP:


MediaPlayer.Stop("media_player");



c1 = ComboBox.GetSelected("ComboBox2");

b1 = ComboBox.GetItemText("ComboBox2", c1);

tikrar = String.ToNumber(b1); 

Input.SetText("Input2", tikrar); 

------------------------------

ComboBox.SetEnabled(this, false);

xButton.SetEnabled("xButton1", true);

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-05-2015, 01:30 AM

---- كنا قد أضفنا في مشروعنا xButton1 هذا الزر أكتب له كعنوان " توقيف و تحديد التكرار "

وازرع فيه الكود :

كود PHP:


MediaPlayer.Stop("media_player");

ComboBox.SetEnabled("ComboBox1", true);

ComboBox.SetEnabled("ComboBox2", true);

ComboBox.SetEnabled("ComboBox3", true);

xButton.SetEnabled("xButton1", false);

ListBox.SetEnabled("ListBox1", true);

--- و كنا كذلك قد أضفنا xButton2 هذا الزر هو لـ " للايقاف"
اكتب فيه

كود PHP:


MediaPlayer.Pause("media_player");

xButton.SetEnabled("xButton1", true);

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-05-2015, 01:32 AM

اضغط على عنصر MediaPlayer و لاحظ في الحدث on play
أكتب

كود PHP:


y=String.ToNumber(Input.GetText("Input1"));

w=String.ToNumber(Input.GetText("Input2"));



if w==0 and y ==1 then

xButton.SetEnabled("xButton1", true);

else

xButton.SetEnabled("xButton1", false);

end



ComboBox.SetEnabled("ComboBox1", false);

ComboBox.SetEnabled("ComboBox2", false);

ComboBox.SetEnabled("ComboBox3", false);

و في نفس العنصر لكن في الحدث on finish
أكتب :

كود PHP:


----------------------------------------------------------------------------

y=String.ToNumber(Input.GetText("Input1"));

w=String.ToNumber(Input.GetText("Input2"));

z=String.ToNumber(Input.GetText("Input3"));



 -------------------------------------------

 MediaPlayer.Load("media_player", "AutoPlay\\Audio\\"..v.."\\"..(y+1)..".mp3");

 Input.SetText("Input1", y+1);

---------------

if y == nihaya then

Input.SetText("Input1", bidaya);

 MediaPlayer.Load("media_player", "AutoPlay\\Audio\\"..v.."\\"..bidaya..".mp3");

 k=w-1

 Input.SetText("Input2", k);

end

---------------

if k==0 then

 Input.SetText("Input2", 0);

 bidaya=1

ListBox.SelectItem("ListBox1", z+1);

hh = File.Find(_SourceFolder.."\\AutoPlay\\Audio\\"..v.."\\", "*.mp3", false, false, nil, nil);

nihaya=#hh



end

-----------------------------------------------------------------

tt = File.Find(_SourceFolder.."\\AutoPlay\\Audio\\"..v.."\\", "*.mp3", false, false, nil, nil);

-------------------------------------------------------------------

if y >= #tt  then

Input.SetText("Input2", 0);

ListBox.SelectItem("ListBox1", z+1);

end

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-05-2015, 01:35 AM

و أخيرا في حدث الصفحة on show

أكتب

كود PHP:


bidaya=1

تلك طاقتي عاين مشروعك عدله أو طوره المهم اعتبرها منطلق
لعملك و الله يوفقك

**ميزو فوكس ميزو فوكس** · 31-05-2015, 02:26 AM

المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة

و أخيرا في حدث الصفحة on show

أكتب

كود PHP:


bidaya=1

تلك طاقتي عاين مشروعك عدله أو طوره المهم اعتبرها منطلق
لعملك و الله يوفقك

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

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

http://arabsh.com/files/0c3e4d4966f5...�ده-rar.html

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-05-2015, 02:58 AM

أرسلت لك المحاولة على أمل أن تطورها و تصحح الأخطاء
ريثما تقرأ مشاركات الزملاء ... فقط اعتبرها محاولة لا غير
-------------- لأن الأحسن و الأدق في أعمال مثل هذه هو حساب أزمنة نهاية الايات لكل سورة
على كل موفق إن شاء الله

**ميزو فوكس ميزو فوكس** · 31-05-2015, 02:46 PM

المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة

أرسلت لك المحاولة على أمل أن تطورها و تصحح الأخطاء
ريثما تقرأ مشاركات الزملاء ... فقط اعتبرها محاولة لا غير
-------------- لأن الأحسن و الأدق في أعمال مثل هذه هو حساب أزمنة نهاية الايات لكل سورة
على كل موفق إن شاء الله

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

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-05-2015, 03:00 PM

لا تيأس و لا تستعجل لأن البرمجة هاته بالذات المتعلقة
بالقرآن الكريم لا تتطلب الاستعجال حتى لا تكون هناك أخطاء بل
أكاد أجزم أن الخوف من الوقوع في أخطاء هو السبب الرئيسي الذي يجعل
السادة المبرمجين تخوفهم مقبول .... بإذن الله ستنجح في اختياراتك المفيدة

**ميزو فوكس ميزو فوكس** · 31-05-2015, 03:08 PM

المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة

لا تيأس و لا تستعجل لأن البرمجة هاته بالذات المتعلقة
بالقرآن الكريم لا تتطلب الاستعجال حتى لا تكون هناك أخطاء بل
أكاد أجزم أن الخوف من الوقوع في أخطاء هو السبب الرئيسي الذي يجعل
السادة المبرمجين تخوفهم مقبول .... بإذن الله ستنجح في اختياراتك المفيدة

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

إعـــــــلان

برجاء مشاركة الجميع في انتاج اكبر مصحف معلم للقرآن الكريم كاملا

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

مواضيع تهمك