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


 
الرئيسيةالرئيسية  أحدث الصورأحدث الصور  دخولدخول  التسجيلالتسجيل  
آيـــــات الشفاء في القرآن الكريم إن هذه الآيات تجتمع في كل آية فيها كلمة شفاء و تقرأ بترتيب المصحف فقد قال العلماء أن في هذا استعانة بكلام الله على الشفاء و خصوصا بالنسبة للأمراض التي لا تقدر عليها أسباب البشر...وهـــم:- الآية 14 من سورة التوبة: قَاتِلُوهُمْ يُعَذِّبْهُمُ اللّهُ بِأَيْدِيكُمْ وَيُخْزِهِمْ وَيَنصُرْكُمْ عَلَيْهِمْ وَيَشْفِ صُدُورَ قَوْمٍ مُّؤْمِنِينَ... صدق الله العظيم الآية 57 في سورة يونس : يَا أَيُّهَا النَّاسُ قَدْ جَاءتْكُم مَّوْعِظَةٌ مِّن رَّبِّكُمْ وَشفَاء لِّمَا فِي الصُّدُورِ وَهُدًى وَرَحْمَةٌ لِّلْمُؤْمِنِينَ... صدق الله العظيم الآية 69 من سورة النحل : وَاللّهُ خَلَقَكُمْ ثُمَّ يَتَوَفَّاكُمْ وَمِنكُم مَّن يُرَدُّ إِلَى أَرْذَلِ الْعُمُرِ لِكَيْ لاَ يَعْلَمَ بَعْدَ عِلْمٍ شَيْئًا إِنَّ اللّهَ عَلِيمٌ قَدِيرٌ... صدق الله العظيم الآية 82 من سورة الإسراء : وَنُنَزِّلُ مِنَ الْقُرْآنِ مَا هُوَ شِفَاء وَرَحْمَةٌ لِّلْمُؤْمِنِينَ وَلاَ يَزِيدُ الظَّالِمِينَ إَلاَّ خَسَارًا... صدق الله العظيم الآية 80 من سورة الشعراء : وَإِذَا مَرِضْتُ فَهُوَ يَشْفِينِ... صدق الله العظيم الآية 44 من سورة فصلت : وَلَوْ جَعَلْنَاهُ قُرْآنًا أَعْجَمِيًّا لَّقَالُوا لَوْلَا فُصِّلَتْ آيَاتُهُ أَأَعْجَمِيٌّ وَعَرَبِيٌّ قُلْ هُوَ لِلَّذِينَ آمَنُوا هُدًى وَشفَاء وَالَّذِينَ لَا يُؤْمِنُونَ فِي آذَانِهِمْ وَقْرٌ وَهُوَ عَلَيْهِمْ عَمًى أُوْلَئِكَ يُنَادَوْنَ مِن مَّكَانٍ بَعِيدٍ...||

منتديات اهل الحق :: منتديات الإبداع و التصميم :: منتدى لغات البرمجة
 

 [VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩

اذهب الى الأسفل 
كاتب الموضوعرسالة





التقييم : 3
نقاط : 357336
تاريخ التسجيل : 01/01/1970

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Empty
مُساهمةموضوع: [VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩   [VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ I_icon_minitimeالخميس ديسمبر 06, 2012 11:37 am
السلام عليكم و رحمة الله

۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩

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

نموذج لمشغل راديو بسيط

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Maradiojh2

تستطيع تحميل هذا النموذج من هنا

على Egoshare

هذا ليس درسا في الفيوجوال بيسك و انما هو فقط تطبيق لتصميم برنامج يشغل الراديوات المفضلة

ادوات العمل
۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩

برنامج Visual Basic الاصدار السادس
كوب كبير من القهوة [VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Biggrin

۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩

يمكنك تحميل الاصدار المحمول ل Visual Basic 6 من هنا

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Basicvyx7

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

هنا رابط الاصدار الكامل باللغة الانجليزية قام بوضعه لكم الاخ حسام الدين 1

سيريال النسخة هو 000000000 اصفار فقط ...

طريقة التنصيب مشروحة بالصور في الموضوع الاتي

شرح بالصور لمراحل تنصيب Visual Basic6 ۩۩ بالاضافة الى رابط تحميل البرنامج كاملا ۩۩

۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩

بداية تصميم البرنامج
۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩

1- افتح برنامج Visual Basic

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Exevbpb4

2- اختر Standard EXE ثم اضغط على Open

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Choixqx7

3- اضغط على الزر رقم 1 كما في الصورة (Command Button) لانشاء زر جديد
اذهب الى صفحة العمل و قم بانشاء زر بالمقاسات التي تريدها
(قم بالضغط على الز الايسر للفأرة و استمر في الضغط
حرك الفأرة حتى تحصل على المقاس الذي تريده ...
يمكن تغير حجم الزر و تغيير موضعه في صفحة العمل)

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb2ia4

4 - لا حظ معي ان Command1 مكتوبة على الزر
يمكن تغيرها بكتابة اسم الاذاعة التي تريد
و ذلك بكتابة اسم الراديو في الخانة 2 كما في الصورة (Caption)

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb3un4

5- لاحظ معي ان اسم الزر هو Command1 في الخانة رقم 3
(انصح المبتدئين بعدم تغيير اسم الزر لتفتادي الاخطاء ...
فقط غير ما هو مكتوب فوق الزر أي Caption)

6- كرر نفس المراحل 1 2 3 4 لانشاء ازرار جديدة بعدد الاذاعات التي تريد
ان تضعها في البرنامج (لاحظ ان اسماء الازرار هي كالتالي Command1 ثم
Command2 ثم Command3 )

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb4gw0

7- الان سنضيف مشغل الصوتيات Windows Media Player الى المشروع ... اضغط
على مكان فارغ في شريط الادوات بالزر الايسر للفأرة ثم اضغط على
Components كما في الصورة ...

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb5cv6

8- ستفتح لك نافذة جديدة بها لائحة اختر في اسفل الائحة Windows Media player ثم اضغط على Ok

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vbmediamq0

9- لا حظ معي ظهور ايقونة الميديا البلاير على شريط الادوات

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb7mi4

اضغط على ايقونة الميديا ثم اذهي الى صفحة العمل و قم بانشاء مشغل الصوتيات بالحجم الذي تريده

10- لاحظ معي اسم الميديا الذي اضفت WindowsMediaPlayer1 (لا تقم بتعديله اتركه كما هو)

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb10sa0

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




كود:
Private Sub Command1_Click()

End Sub

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb8uq9

12- انقل السطرين الاتين و ضعها بين السطرين الاولين




كود:
WindowsMediaPlayer1.Controls.Stop
WindowsMediaPlayer1.URL = "http://www.radiosawa.com/livestreams/radiosawanafr.asx"

13- سيصبح الكود على الشكل التالي




كود:
Private Sub Command1_Click()

WindowsMediaPlayer1.Controls.Stop
WindowsMediaPlayer1.URL = "http://www.radiosawa.com/livestreams/radiosawanafr.asx"

End Sub

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb9br0

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

15- الان و قبل تكرار نفس العملية بالنسبة للازرار المتبقية نجرب هل التطبيق يعمل بشكل جيد

في اعلى صفحة العمل اضغط على الزر 4 ( المثلث الازرق) لتشغيل البرنامج الذي قمت بتصميمه

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb11yr7

ستفتح لك نافذة البرنامج الذي صممته

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb15rz6

اضغط على زر الاذاعة ... اذا تتبعت جميع المراحل بدون أي خطأ من المفروض ان تستمع الى الراديو انطلاقا من برنامجك (مبروك عليك)

16- الان اضغط على الزر رقم 5 لايقاف تشغيل البرنامج (المربع الازرق) لاتمام اضافة الاكواد الى الازرار المتبقية

17- كرر نفس المراحل 11 و 12 و 13 على الازار المتبقية ( اقصد اضافة الكود الخاص بكل زر)
للتذكير انقر مرتين متتاليتن على الزر الثاني و انقل السطرين بين السطرين الذين حصلت عليهما جراء النقر على الزر
غير رابط الاذاعة برابط اذاعتك المفضلة

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Endey3

18- اضف زرا جديدا يمكن من ايقاف البرنامج (أعطه اسم خروج أو و اضغط
عليه مرتيم ثم اضف الكود الاتي ما بين السطرين End Exit )

19- اختبر برنامجك الان بتكرار المرحلة 15 و 16

20- قم الان بحفظ المشروع في مكان تختاره على قرصك الصلب

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb13iq4

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Vb14wm1

الان ساشرح طريقة انشاء الملف التنفيذي

اذا كنت تستعمل الاصدار الكامل من 6 Visual Basic فالامر بسيط جدا

أضغط على File ثم Make Project1.exe

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Makeexebt2

قم باختيار اسم الملف التنفيذي الناتج و مكان حفظه

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Saveexeqr9

و انتضر قليلا حتى يتم انشاء الملف التنفيذي

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Exedonedo5

مبروك عليك الملف التنفيذي لبرنامجك

۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩۩

الان ساشرح كيفية الحصول على روابط الاذاعات
عند فتح موقع الراديو غالبا ان الراديو يفتح بالميديا بلاير
اضغط على File ثم Propreties

[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩ Radioadresseqv6

بالاضافة الى طرق اخرى ساضعها قريبا ان شاء الله

قريبا شرح لكيفية عمل برنامج يشغل الاذاعات التي تعمل على Real Player


اتمنى ان ينال هذا الموضوع رضاكم
الرجوع الى أعلى الصفحة اذهب الى الأسفل
 
[VB6] صمم بنفسك برنامج تشغيل اذاعاتك المفضلة ۩۩ للمبتدئين و المحترفين ۩۩
الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1
 مواضيع مماثلة
-
»  للمبتدئين و المحترفين درس اختراق المنتدى و استخراج كلمة مرور الادمن بسهولة فيديواااا
» شرح برنامج المفضلة المصورة SV Bookmark
»  شرح برنامج نقل القنوات وإضافة المفضلة Dreamset 2.27
» Thumbs up صمم بنفسك برنامج لتنسيق المواضيع
» اصنع برنامجيين بنفسك دون استخدام اي برنامج

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتديات اهل الحق :: منتديات الإبداع و التصميم :: منتدى لغات البرمجة-
انتقل الى: