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

عبد الهادي بهاب · 31-01-2016, 11:15 AM

السلام عليكم ورحمة الله وبركاته
للاجابة على سؤاك و افكار اخرى ..............
يمكنك ان تستفيد من الاكواد الموجودة في هذا المشروع
الملف المفتوح :

http://www.mediafire.com/download/6y...8%A7%D9%86.rar

الشرح في هذه المشاركة :

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

السلام عليكم

تتمة لما سبق ............اضع بين يديك مشروع او ملف مفتوح لاسطوانة القران الكريم حسب ما جاء في المشاركات السايقة

جمعت فيها كل ما سبق ....... بحيث عوضت كثرة الازرار بكومبوكس السور يقابله كومبوكس القراء

وضعت من باب التجربة سورة الاخلاص و الفاتحة لكل القراء ووضعت لملف العجمي سور الاخلاص و الفلق و الناس و الفاتحة

حمل الملف المفتوح و حاول فهم الاكواد الموجودة في الكومبوكس و دعنا ندردش حلها و من خلالها تتعلم بعضا من اكواد الاوتوبلاي

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

الملف المفتوح :

http://www.mediafire.com/download/6y...8%A7%D9%86.rar

بعض الامور :
- جعلت كومبوكس السور لا يظهر لذل ام يختر القارئ
- اذا اختار المستخدم الاختيار الاول ( اختر قارئ ) او ( اختر سورة ) لا تظهر الكتابة

كود PHP:


b = ComboBox.GetSelected(this);

t= ComboBox.GetItemData(this, b);

g= ComboBox.GetItemText(this, b);



if t=="0" then

Paragraph.SetText("Paragraph2", "");

else

Paragraph.SetText("Paragraph2", g);

Input.SetText("Input2", t);

Input.SetText("Input3", b);

MediaPlayer.Load("Plugin1", "AutoPlay\\Audio\\"..Input.GetText("Input1").."\\"..t..".mp3"); 



end

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

كود PHP:




b = ComboBox.GetSelected(this);

t= ComboBox.GetItemData(this, b);

g= ComboBox.GetItemText(this, b);







if t=="0" then

Paragraph.SetText("Paragraph1", "");

else

Paragraph.SetText("Paragraph1", g);

Paragraph.SetVisible("Paragraph2", true);

ComboBox.SetVisible("ComboBox2", true);

Image.Load("Image1", "AutoPlay\\Images\\"..t..".jpg");

Input.SetText("Input1",t)

end



if Input.GetText("Input2")~="" then

MediaPlayer.Load("Plugin1", "AutoPlay\\Audio\\"..Input.GetText("Input1").."\\"..Input.GetText("Input2")..".mp3"); 

end

- وضعت في ملف الصور صور المشايخ حسب ترتيبهم في كومبوكس القراء كلما احتر قارئ تتغيرصورته و يتغير اسمه

- بعد نهاية سورة الفاتحة ينتقل القارئ الا لقارءة السورة الموالية

كود PHP:


Input.SetText("Input3", Input.GetText("Input3")+1);

g = ComboBox.GetItemText("ComboBox2", Input.GetText("Input3"));

Paragraph.SetText("Paragraph2", g);

ComboBox.SetSelected("ComboBox2", Input.GetText("Input3"));



MediaPlayer.Load("Plugin1", "AutoPlay\\Audio\\"..Input.GetText("Input1").."\\"..Input.GetText("Input2")..".mp3"); 



if Input.GetText("Input2")=="114" then

MediaPlayer.Stop("Plugin1");

ComboBox.SetSelected("ComboBox2", "2");

end

متابع معكم .....ارجو ان تفهم الاكواد

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

الموضوع الاصلي :
http://sites.ienajah.com/vb2/newreply.p...reply&p=290992

عبد الهادي بهاب · 31-01-2016, 11:17 AM

الكود في كائن الميدت بلاير في on finich

عبد الهادي بهاب · 31-01-2016, 11:21 AM

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

**خادم المسلمين خادم المسلمين** · 31-01-2016, 11:49 AM

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

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-01-2016, 01:38 PM

السلام عليكم ورحمة الله وبركاته
مرحبا بك أخي الكريم أهلا بك ... سعدت
بأول مشاركة لك لأجل هذا الطلب أحسنت وجزاك الله خيرا

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-01-2016, 06:53 PM

السلام عليكم ورحمة الله وبركاته
01 - في حدث الصفحة في on show أكتب

كود PHP:

x=1

02 - توجه لعنصر ListBox1 و في الحدث on Selected

أكتب :

كود PHP:


tbl_selected = ListBox.GetSelected("ListBox1");

result= ListBox.GetItemData("ListBox1", tbl_selected[1]);

MediaPlayer.Load("media_player", result);

x=tbl_selected[1]

03 - توجه لعنصر MediaPlayer و في الحدث on finish
ازرع الأكواد :

كود PHP:


x=x+1

ListBox.SelectItem("ListBox1", x);

if x == ListBox.GetCount("ListBox1")+1 then

ListBox.SelectItem("ListBox1",1);

end

موفق

**ثامر أبو بلقيس ثامر أبو بلقيس** · 31-01-2016, 07:25 PM

ملاحظة :
خلي الليستبوكس بالشكل التالي
في Item text أكتب أسماء السور
في جهة Item data استدعي الملف الصوتي المقابل للسورة
وذلك بالضغط على يمين الماوس في مجال Item data يمكنك تحديد السورة و مسارها
الموجود في مجلد audio

لاحظ هذه الصورة :
[imgl]http://store3.up-00.com/2016-01/145425911225681.bmp[/imgl]
كما تلاحظ أقوم بالضغط على يمين الماوس لأحدد المسار الموافق للسورة

**القواسمي القواسمي** · 01-02-2016, 01:00 PM

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

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

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

**خادم المسلمين خادم المسلمين** · 01-02-2016, 01:03 PM

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

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

لا شكر على واجب
وانصحك ايضا بمتابعة الموضوع ده
http://sites.ienajah.com/vb2/showthread...d=1#post297724

**القواسمي القواسمي** · 01-02-2016, 01:05 PM

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

كود:



tbl_selected = ListBox.GetSelected("ListBox1"); 
result = ListBox.GetItemData("ListBox1", tbl_selected[1]); 
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\"..result..".mp3");

**القواسمي القواسمي** · 01-02-2016, 01:33 PM

شكرا اخي

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

السلام عليكم ورحمة الله وبركاته
مرحبا بك أخي الكريم أهلا بك ... سعدت
بأول مشاركة لك لأجل هذا الطلب أحسنت وجزاك الله خيرا

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

**عبود عبود عبود عبود** · 01-02-2016, 01:35 PM

هل تضع ملفك المفتوح للتعديل علية ؟

**القواسمي القواسمي** · 01-02-2016, 01:54 PM

طبعا يمكنني وضعه
ما تذكيركم ان المشروع التي تم وضعه سابقا غايه في التالق

https://www.4shared.com/rar/LGvqycZlce/Quran__1_.html?

**عبود عبود عبود عبود** · 01-02-2016, 03:05 PM

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

الملف بعد التعديل ووضع كود فى الحدث "On Finish" من أحداث الميديا بلير :

كود:

--
new=tbl_selected[1]+1;
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\"..new..".mp3");
Web.LoadURL("Web1", "Autoplay\\Docs\\"..new..".htm");
ListBox.SelectItem("ListBox1", new);

الملف المفتوح

https://dl.dropboxusercontent.com/u/29881160/Quran.rar

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

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

كيف يمكن اضافة كود " التالي "

كيف يمكن اضافة كود " التالي "

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

مواضيع تهمك