الحالة
موضوع مغلق

أبو عفيف

عضو مشارك
التسجيل
6/8/06
المشاركات
27
الإعجابات
35
#1




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



وهذه صور منها:







حجم الموسوعة 1,6 قيقا ومرفوعة على اسرع موقع ويدعم استكمال التحميل وهو الميديا فير
وهذا رابط التحميل



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

lost_soul

الوسـام الذهبي
التسجيل
24/2/08
المشاركات
2,084
الإعجابات
152
#2
بارك الله فيك اخي الكريم


اضافة طيبة منك

تحياتي ؛
 

ضيف البوابة

مشرف عام
التسجيل
17/7/09
المشاركات
5,491
الإعجابات
5,305
الإقامة
المنصورة
#3
مبدع.............. متألق............مميز............ محترف.......... رااااااااااااااااااااااااااااااااااااااااااائع
 

أبو عفيف

عضو مشارك
التسجيل
6/8/06
المشاركات
27
الإعجابات
35
#4
شكرا جزيلا والله يجزاكم الخير
 

معاوية سلطان

عضو مميز
التسجيل
19/3/09
المشاركات
282
الإعجابات
30
الإقامة
الجزائر
#5
بارك الله فيك اخي الكريم
 
أبو أدهم

أبو أدهم

الوسـام الماسـي
التسجيل
12/4/08
المشاركات
6,477
الإعجابات
2,036
العمر
64
الإقامة
الإسكندرية_ جمهورية مصر العربية
#6
جزاك الله خيرًا يا أبا عفيف

هدية مقبولة بإذن الله تعالى
 

نسر الظلام

عضو مشارك
التسجيل
3/5/08
المشاركات
78
الإعجابات
3
#7
جزاك الله خيراً وارجو منك ان تستمر فى مثل هذه الروائع ونشرها في المنتديات المختلفة وان شاء الله عداد حسناتك يفضل شغال .... جزاك الله خيراً وما قصرت كل التقدير والإحترام .. الحمد لله الذي جعل من هذه الأمة من يعمل لها ...
 

ktawet

عضو محترف
التسجيل
24/2/07
المشاركات
580
الإعجابات
6
#8
جزاك الله خير . والله يسعدك في الدنيا والآخرة . وغفر الله لك ولوالديك ولمن تحب ..اللهم آمين
أسأل الله العظيم ان يجعلها في ميزان حسناتك
 

أبو عفيف

عضو مشارك
التسجيل
6/8/06
المشاركات
27
الإعجابات
35
#9
جزاكم الله كل خير
 

تقي الدين الالماني

عضو جديد
التسجيل
30/10/09
المشاركات
23
الإعجابات
1
#10
موضوع مميز بارك الله فيك يا اخي ودمت في خدمة الدين والمسلمين
 

أبو عفيف

عضو مشارك
التسجيل
6/8/06
المشاركات
27
الإعجابات
35
#11
الله يبارك في عمرك
 

أبو عفيف

عضو مشارك
التسجيل
6/8/06
المشاركات
27
الإعجابات
35
#12
اتمنى تثبيت الموضوع وشكرا
 

أبو عفيف

عضو مشارك
التسجيل
6/8/06
المشاركات
27
الإعجابات
35
#13
اتمنى رفعها على اكثر من سيرفر
 

HGFDHU2

عضو جديد
التسجيل
4/1/10
المشاركات
8
الإعجابات
0
#14
جزاك الله خيرا وجعلها في ميزان حسناتك
 

AboMo3aZ

VIP
التسجيل
4/2/09
المشاركات
6,040
الإعجابات
3,425
الإقامة
مصر
الجنس
Male
#15
بارك الله فيك وجعله في ميزان حسناتك ميزان جميع المسلمين
 

محمد حامد

عضو ذهبي
التسجيل
7/2/07
المشاركات
779
الإعجابات
48
#16
مشكور اخي الفاضل لكن للاسف الجزء الرابع معطوب نرجو اعادة رفعه و لك الشكر
 

chronoservices

عضو جديد
التسجيل
3/12/10
المشاركات
2
الإعجابات
0
#17
ممكن مساعدة في كيفية عمل أسطوانة للقرآن الكريم

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



و اله لا يضيع أجر المحسنين
 

ابو منصر العمودى

الوسـام الماسـي
التسجيل
25/7/07
المشاركات
21,088
الإعجابات
11,171
#18
رد: أغلى هديه "الموسوعة القرآنية بصوت ستة قراء صوت وصوره" من تصميمي

شكرالك اخى الكريم وبارك الله فيك
 

chronoservices

عضو جديد
التسجيل
3/12/10
المشاركات
2
الإعجابات
0
#19
رد: أغلى هديه "الموسوعة القرآنية بصوت ستة قراء صوت وصوره" من تصميمي

http://www.geek4arab.com/vb/showthread.php?t=264&page=8


لقد فعلت كل هذه المراحل ولكن لايعمل الصوت ماه الخطأ

الكود الي وضعته في liste box لسور القرأنية:


--كيفية الحصول على الكود السابق
-- إيجاد النص المكتوب في الكومبو بوكس
nSelect = ComboBox.GetText("ComboBox1");
-- إيجاد السور المحددة في اللست بوكس
Sura_Selected = ListBox.GetSelected("ListBox1");
--إيجاد الداتا للسورة المحددة
result = ListBox.GetItemData("ListBox1", Sura_Selected[1]);

-- ألآن نبدأ في الكود
if nSelect == "إختر المقرئ"then
--عرض رسالة خطأ إختر المقرئ من فضلك
Dialog.Message("","إختر المقرئ من فضلك");

elseif nSelect == "محمود خليل الحصري" then
-- تشغيل السورة الموافقة للداتا في مجلد الشيخ الحصري
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\hossari\\"..result..".mp3");
--تشغيل صفحة الويب الموافقة للسورة المختارة
Web.LoadURL("Web1", "AutoPlay\\Docs\\"..result..".htm");

-- نقوم بنفس ما قمنا به مع الشيخ الحصري للشيوخ الآخرين
elseif nSelect == "عبدالباسط عبدالصمد" then
-- تشغيل السورة الموافقة للداتا في مجلد الشيخ
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\basset\\"..result..".mp3");
--تشغيل صفحة الويب الموافقة للسورة المختارة
Web.LoadURL("Web1", "AutoPlay\\Docs\\"..result..".htm");

elseif nSelect == "محمد صديق المنشاوي"then
-- تشغيل السورة الموافقة للداتا في مجلد الشيخ
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\menshawi\\"..result..".mp3");
--تشغيل صفحة الويب الموافقة للسورة المختارة
Web.LoadURL("Web1", "AutoPlay\\Docs\\"..result..".htm");

-- وهكذا
end

الكود الموضوع في WMP plugin


-- السورة الموالية في اللست بوكس
nItemsInListBox = ListBox.GetCount("ListBox1");

if nItemsInListBox ~= 0 then
-- إيجاد العنصر والسورة المحددة
tSelected = ListBox.GetSelected("ListBox1");
sJustFinishFile = ListBox.GetItemData("ListBox1", tSelected[1]);
nFileIndex = ListBox.FindItem("ListBox1", -1, 1, sJustFinishFile);
nNextFileIndex = nFileIndex+1;

if nFileIndex == nItemsInListBox or nFileIndex > nItemsInListBox then
--nNextFileIndex > nItemsInListBox or -- this will select the 1st song of the PlayList when
-- the last file is finished
ListBox.SelectItem("ListBox1", 1);
sFileName = ListBox.GetItemData("ListBox1", 1);
else
-- تشغيل السورة الموالية
sFileName = ListBox.GetItemText("ListBox1", nNextFileIndex);
result = ListBox.GetItemData("ListBox1", nNextFileIndex);
ListBox.SelectItem("ListBox1", nNextFileIndex);
nSelect = ComboBox.GetText("ComboBox1");
if nSelect == "محمود خليل الحصري"then
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\hossari\\"..result..".mp3");
elseif result == "عبدالباسط عبدالصمد" then
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\basset\\"..result..".mp3");
elseif result == "محمد صديق المنشاوي" then
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\menshawi\\"..result..".mp3");
-- ويمكنك وضع المزيد من المقرئين هنا بنفس الطريقة
end
Web.LoadURL("Web1", "Autoplay\\Docs\\"..result..".htm");
end
end
 

القول المأثور

الوسـام الذهبي
التسجيل
1/7/09
المشاركات
1,878
الإعجابات
171
#20
رد: أغلى هديه "الموسوعة القرآنية بصوت ستة قراء صوت وصوره" من تصميمي

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

أعلى