طلب كود للقراءة المتالية من اليست بوكس

[محمد بن أحمد أبو حذيفة]

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


الكود للقراءة من ليست بوكس واحدة هو

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("MediaPlayer", sFile);
MediaPlayer.Play("MediaPlayer");
elseif nNext == nCount then
ListBox.SelectItem("ListBox1", 1);
sFile = ListBox.GetItemData("ListBox1", 1);
MediaPlayer.Load("MediaPlayer", sFile);
MediaPlayer.Play("MediaPlayer");
end
end



لكن اذا كان عندي عدد من اليست بوكس كيف يصبح الكود

[عبود عبود]

وما هو دور الليست بوكس فى كل عملية وكم عدد الليست بوكس وما هى محتويات كل منهم ؟

[محمد بن أحمد أبو حذيفة]

وما هو دور الليست بوكس فى كل عملية وكم عدد الليست بوكس وما هى محتويات كل منهم ؟


دور اليست بوكس هو عرض ملفات mp3

عددها غير محدد

[عبود عبود]

قم بتغيير إسم الليست بوكس فى الكود السابق بما يطابق إسم الليست بوكس الجديد " كرر هذه الأكواد مع كل ليست بوكس مع تغيير إسم الليست بوكس فى الكود "

:abc_152:

[محمد بن أحمد أبو حذيفة]

قم بتغيير إسم الليست بوكس فى الكود السابق بما يطابق إسم الليست بوكس الجديد " كرر هذه الأكواد مع كل ليست بوكس مع تغيير إسم الليست بوكس فى الكود "

:abc_152:

نعم هذا ما افعله لكن لا يوجد كود بديل

[عبود عبود]

ضعه فى الجلوبال فانكشن على هيئة وظيفة ثم إستدعى الوظيفة فى كل ليست بوكس

[محمد بن أحمد أبو حذيفة]

لكن كيف
لان هذا الكود يوضع في الميديا

[عبد الهادي بهاب]

يوجد طريق مختصر للتوضيح اكثر و بصفة دقيقة
لو رفعت ملفا مفتوحا
على الاقل الصفحة المطلوبة

[عبود عبود]

فى الجلوبال فانكشن ضع :

--
function media(sSelect,med)
nCount = ListBox.GetCount(sSelect);
tSelected = ListBox.GetSelected(sSelect);
if tSelected then
nNext = tSelected[1];
if nNext < nCount then
nNext = nNext+1;
ListBox.SelectItem(sSelect, nNext);
sFile = ListBox.GetItemData(sSelect, nNext);
MediaPlayer.Load(med, sFile);
MediaPlayer.Play(med);
elseif nNext == nCount then
ListBox.SelectItem(sSelect, 1);
sFile = ListBox.GetItemData(sSelect, 1);
MediaPlayer.Load(med, sFile);
MediaPlayer.Play(med);
end
end
end


عند الإستدعاء فى الميديا بلير

--
media("إسم مشغل الميديا","إسم الليست بوكس")

[محمد بن أحمد أبو حذيفة]

بارك الله فيك اخي عبود الكود يعمل بشكل جيد