تختلف الطرق لعمل ذلك فعلى سبيل المثال " باستخدام الميديا بلير فقط مع زر أو أى أوبجيكت آخر غير الزر "

يوضع هذا الكود للزر :

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

بالنسبة لخصائص الميديا بلير فى الحدث "On Play" يكون الكود كالتالى :

بمعنى أن أثناء تشغيل الميديا سيكون المتغير a يساوى المتغير الأصلى بإضافة 1 إلية .

بالنسبة لخصائص الميديا بلير فى الحدث "On Finish" يكون الكود كالتالى :

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

طبعا المسار للصوتيات يتم تبديلة كما تريد فعلى سبيل المثال كما هو موضح بالكود قمت بوضع الصوتيات داخل مجلد qq داخل مجلد Audio فى المشروع .

أظن كدا الكود واضـــــــــــح .

تحياتى

لكن كيف تكون قراءة متتالية اي عندما اضغط على عنصر من الليست بوكس يتم قراءة القائمة كاملا من الليست بوكس دون تدخل مني

جزاك الله خيرا اخانا عبود على الإجابة ؛ والشكر لأخينا محمد الذي دفعك للتعريف بنفسك


تحياتي لكما

والله الكود كان عندي وفي أروع ما يكون ...

لاكن للأسف ما أدري وين راح علي ..

لاكن عندي فكرة ينقصها شيء بسيط لم أستطع حله
سأطرحها بعد قليل إن شاء الله تعالى لي ذالك

هذا هو الكود يوضع في الميديا بلاير عند الحدث
on finish

[html]nCount ="";
nNext ="";
sFile ="";
nCount = ListBox.GetCount("ListBox1");
tSelected = ListBox.GetSelected("ListBox1");
if tSelected then
nSelected = tSelected[1];
nNext = nSelected;
if nNext < nCount then
nNext = nNext+1;
ListBox.SelectItem("ListBox1", nNext);
sFile = ListBox.GetItemData("ListBox1", nNext);
--MediaPlayer.Load("Plugin1", sFile);
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\10\\"..sFile..".mp3");
MediaPlayer.Play("media_player");
elseif nNext == nCount then
ListBox.SelectItem("ListBox1", 1);
sFile = ListBox.GetItemData("ListBox1", 1);
--MediaPlayer.Load("Plugin1", sFile);
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\10\\"..sFile..".mp3");
MediaPlayer.Play("media_player");
end
end[/html]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .