تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
البوم ملفات صوتية [updated ]
#1
بسم الله الرحمن الرحيم
السلام عليكم و رحمة الله و بركاته

ميزة هذه الفكرة انها من دون قاعدة بيانات فقط الحفظ في الـ mysettings  و اكيد انه في الريجستري لكن ليس مباشر من اكوادنا بل من بيئة التطوير نفسها و هي مربوطة بالمسار فان تغير المسار يتم فقد كل البيانات.

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


2 - التحديث يخص حفظ ماتم اختياره من الادوات و ايضا حفظ آخر لقطة في اداة wmp
يعني اذا نقرت زر الايقاف المؤقت بالاداة فسيتم حفظ المدة المحددة(الصراحة مدري شلون اوضح بالكلامSmile)
لكن واضحة من المثال وهي تخص حدث PlayStateChange

3 - 

الانتقال التلقائي من سورة لاخرى وعند الرغبة بالتوقف انقر زر الايقاف



لقطة لاستخدام البرنامج في موقع mediafire 


4 - التحديث يخص مربع بحث عن رقم السورة واسمها


password:vb4arb

عبارة(برنامج القراء من ملفات محلية)
قابلة للتغير وقت التشغيل بالنقر عليها [دبل كليك]


تم التحديث و الاصلاح بحيث يتم التعامل مع الاخطاء


هذا يشرح أحدث التغييرات
كل خطأ له رسالة قدر الامكان
المثال الاحدث
و السلام عليكم و رحمة الله و بركاته



الملفات المرفقة
.rar   QuranAlbum.rar (الحجم : 114.4 ك ب / التحميلات : 61)
.rar   QuranAlbum.rar (الحجم : 112.64 ك ب / التحميلات : 81)
}}}
#2
حينما نتكلم عن الابداع والتميز  فمن المؤكد أن أول ما يخطر على بال أى 
عضو هنا هو أسم "سعود وبالخط العريض".. 
فقط التحديث الجديد يحتاج لكلمة مرور.
}}}
تم الشكر بواسطة: سعود , asemshahen5 , asemshahen5 , أسعد , أسعد , kebboud
#3
(10-01-21, 12:05 AM)ابو روضة كتب :
حينما نتكلم عن الابداع والتميز  فمن المؤكد أن أول ما يخطر على بال أى 
عضو هنا هو أسم "سعود وبالخط العريض".. 
فقط التحديث الجديد يحتاج لكلمة مرور.

من بعدك اخي الكريم
كلمة المرور كعادة اكثر رواد المنتديات يكون اسم الدومين vb4arb
}}}
تم الشكر بواسطة: ابو روضة , asemshahen5 , asemshahen5 , أسعد , أسعد
#4
ليت يكون المثال قد قدم فائدة لكم جميعا.
كما ارجو ان يجد احد ضالته في امثلتي .
}}}
تم الشكر بواسطة: asemshahen5 , ابو روضة , ابو روضة , أسعد , أسعد
#5
أخى سعود لو سمحت :-
هو انا بجيب السور من أين بالتحديد ؟
لان لدى مجلد به سور القرءان ولما بختاره لا يجلب اى شيئ .
ممكن توضح لو سمحت ؟
}}}
تم الشكر بواسطة: سعود , أسعد , أسعد
#6
(14-01-21, 09:24 AM)ابو روضة كتب :
أخى سعود لو سمحت :-
هو انا بجيب السور من أين بالتحديد ؟
لان لدى مجلد به سور القرءان ولما بختاره لا يجلب اى شيئ .
ممكن توضح لو سمحت ؟

اول شيء يخزن مسار المجلد في الـMysettings في قائمة Myfolder
ضمن زر جديد مكتوب الكود:
PHP كود :
 Dim fbd As New FolderBrowserDialog
        If fbd
.ShowDialog DialogResult.OK Then
            My
.Settings.myfolder.Add(fbd.SelectedPath)
 
           My.Settings.Save()
 
           gd()
 
       End If 
اجراء gd  هو اللي يجلب المجلدات اللي اخترتهم وخزنتهم في Myfolder ضمن Mysettings
PHP كود :
Private Sub gd()
 
       lst.Clear()
 
       lst2.Clear()
 
       ListBox1.Items.Clear()
 
       ComboBox1.Items.Clear()
 
       If My.Settings.myfolder.Count 0 Then
            For Each h 
As String In My.Settings.myfolder
                If h
.Trim <> "" Then
                    ComboBox1
.Items.Add(IO.Path.GetFileName(h))
 
                   lst.Add(h)
 
               End If
 
           Next
        End 
If
 
       Dim t As String My.Settings.Appdes
        If t
.Trim <> "" Then
            lbltitle
.Text t
        End 
If
 
   End Sub 
}}}
تم الشكر بواسطة: ابو روضة , ابو روضة , أسعد
#7
(14-01-21, 09:52 PM)سعود كتب :
اول شيء يخزن مسار المجلد في الـMysettings في قائمة Myfolder
ضمن زر جديد مكتوب الكود:
PHP كود :
 Dim fbd As New FolderBrowserDialog
        If fbd
.ShowDialog DialogResult.OK Then
            My
.Settings.myfolder.Add(fbd.SelectedPath)
 
           My.Settings.Save()
 
           gd()
 
       End If 
اجراء gd  هو اللي يجلب المجلدات اللي اخترتهم وخزنتهم في Myfolder ضمن Mysettings
PHP كود :
Private Sub gd()
 
       lst.Clear()
 
       lst2.Clear()
 
       ListBox1.Items.Clear()
 
       ComboBox1.Items.Clear()
 
       If My.Settings.myfolder.Count 0 Then
            For Each h 
As String In My.Settings.myfolder
                If h
.Trim <> "" Then
                    ComboBox1
.Items.Add(IO.Path.GetFileName(h))
 
                   lst.Add(h)
 
               End If
 
           Next
        End 
If
 
       Dim t As String My.Settings.Appdes
        If t
.Trim <> "" Then
            lbltitle
.Text t
        End 
If
 
   End Sub 

انا لدى مجلد به كل سور القرءان ولما بختاره من زر جديد يجلب فقط اسم المجلد داخل الكومبوبوكس 
لكنه لا يجلب اى ملف صوتى من داخل المجلد
}}}
تم الشكر بواسطة: سعود , أسعد , أسعد
#8
(14-01-21, 10:31 PM)ابو روضة كتب :
انا لدى مجلد به كل سور القرءان ولما بختاره من زر جديد يجلب فقط اسم المجلد داخل الكومبوبوكس 
لكنه لا يجلب اى ملف صوتى من داخل المجلد


اخي الكريم 
المثال عندي يعمل بشكل جيد ويعمل كما هو مطلوب 
اذا المثال هو نفسه الخاص بي لكنه لا يعمل عندك فلا ادري لماذا و ان كنت عدلت عليه فاتمنى ترفع مثالك اشوف السبب.
و شكرا لك على التفاعل مع الفكرة
}}}
تم الشكر بواسطة: ابو روضة , أسعد
#9
(14-01-21, 11:34 PM)سعود كتب :
اخي الكريم 
المثال عندي يعمل بشكل جيد ويعمل كما هو مطلوب 
اذا المثال هو نفسه الخاص بي لكنه لا يعمل عندك فلا ادري لماذا و ان كنت عدلت عليه فاتمنى ترفع مثالك اشوف السبب.
و شكرا لك على التفاعل مع الفكرة


لا لم أعدل على شيئ أخى...
هو لازم السور تكون بالاسماء اللى حضرتك مخزنها ؟
لو فعلا هو كدة يبقى العيب من المجلد عندى.
}}}
تم الشكر بواسطة: سعود , أسعد
#10
اسماء السور تكون  هكذا بالعادة 001 + الامتداد  يعني كذا:


توجد دالة موجودة ضمن موديول a.vb تقوم بالبحث عن اسم السورة المناسب للرقم 001 و هكذا.
}}}
تم الشكر بواسطة: ابو روضة , أسعد , أسعد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [مثال] اظهارشريط تقدم اثناء نسخ او نقل ملفات asmarsou 0 588 20-12-22, 09:33 PM
آخر رد: asmarsou
Video [مشروع] لعبة إختبر معلوماتك [أسئلة عشوائية]+[قاعدة بيانات xml] + [تأثيرات صوتية] عبدالله الدوسري 12 18,081 30-10-22, 05:52 PM
آخر رد: ibra9009
  [مشروع] لا جديد جلب روابط موقع لملفات صوتية سعود 2 871 23-08-22, 07:31 AM
آخر رد: سعود
  [مشروع] برنامج لدمج عدة ملفات Pdf في ملف واحد BM PDFs Merger asmarsou 0 963 10-07-22, 07:26 PM
آخر رد: asmarsou
Music [مشروع] برنامج لدمج عدة ملفات صوتية في ملف واحد asmarsou 0 821 29-06-22, 09:56 PM
آخر رد: asmarsou
  برنامج تدمير ملفات مجلد معين محدد سعود 0 1,190 02-01-22, 02:58 PM
آخر رد: سعود
  [مشروع] فكرة ادارة بيانات في ملفات نصية سعود 4 2,210 15-12-21, 07:33 AM
آخر رد: سعود
  مثال لحمايه ملفات البرنامج من النسخ alshandodi 4 3,259 30-11-21, 10:34 PM
آخر رد: mohamed-montaser
  [مثال] حفظ ملفات لـ PDF و الوورد والاكسيل داخل قاعدة البيانات( تحديث جديد) جميل علي 18 15,867 21-11-21, 11:39 PM
آخر رد: ibra9009
  [مشروع] [ليس جديد ] برنامج بحث عن ملفات محددة في مجلدات عمومية معرفة سعود 0 1,431 01-02-21, 09:22 PM
آخر رد: سعود

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم