تويت
السلام عليكم
عندي مجموعة من الاصورات
كيف اجعل قرائتها تلقائية .... اي واحدة تلو الاخرى
ولكم جزيل الشكر
عندي مجموعة من الاصورات
كيف اجعل قرائتها تلقائية .... اي واحدة تلو الاخرى
ولكم جزيل الشكر
-
-
تختلف الطرق لعمل ذلك فعلى سبيل المثال " باستخدام الميديا بلير فقط مع زر أو أى أوبجيكت آخر غير الزر "
يوضع هذا الكود للزر :
حيث أعنى بالكود الأعلى هو مجموعة أسماء الصوتيات المراد تشغيلهاكود:sounds={"001","002","003","004"}; a=1 MediaPlayer.Load("Plugin1", "AutoPlay\\Audio\\qq\\"..sounds[a]..".mp3");
السطر الثانى هو إعطاء متغير إفتراضى على سبيل المثال a وقلنا أنة يساوى 1
السطر الثالث هو لتحميل ملف صوتى فى الميديا بلير من المجموعة التى طرحنا إسمها بالأعلى وبما أن المتغير a =1 إذن الصوت الذى سيتم تحميلة وتشغيلة فى الميديا بلير سيكون هو أول إسم .
بالنسبة لخصائص الميديا بلير فى الحدث "On Play" يكون الكود كالتالى :
بمعنى أن أثناء تشغيل الميديا سيكون المتغير a يساوى المتغير الأصلى بإضافة 1 إلية .كود:a=a+1
بالنسبة لخصائص الميديا بلير فى الحدث "On Finish" يكون الكود كالتالى :
حيث تم وضع شرط لمعرفة قيمة المتغير الإفتراضى a فإذا كان أقل من أو يساوى العدد الذى قمنا بوضعة فى مجموعة الصوتيات التى قمنا بعملها فطالما كان أقل من 4 وهو العدد الذى طرحتة أنا فى المجموعة فسيقوم الميديا بلير بالعمل على الإنتقال إلى الصوت التالى فى المجموعة وإذا كان المتغير غير هذا الشرط بالزيادة عن 4 فسيعمل على إيقاف الميديا بلير عن التشغيل أو أى أمر آخر يمكن وضعة حسب مشروعك .كود:if a<=4 then MediaPlayer.Load("Plugin1", "AutoPlay\\Audio\\qq\\"..sounds[a]..".mp3"); else MediaPlayer.Stop("Plugin1"); end
طبعا المسار للصوتيات يتم تبديلة كما تريد فعلى سبيل المثال كما هو موضح بالكود قمت بوضع الصوتيات داخل مجلد 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]تعليق
-
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .تعليق
تعليق