المشاركة الأصلية بواسطة ثامر أبو بلقيس
مشاهدة المشاركة
كود:
Application.Sleep(1000);
---- ááÞÑÇÁÉ ÈÇáÊßÑÇÑ ----
ListBox.DeleteItem("ListBox4", 1);
k = ListBox.GetItemText("ListBox4", 1);
MediaPlayer.Load("Plugin4", k);
-----------------------------------------
if ListBox.GetCount("ListBox4")==0 then
ComboBox.ResetContent("ComboBox1");
ComboBox.ResetContent("ComboBox2");
ComboBox.SetSelected("ComboBox3", 1);
ListBox.DeselectItem("ListBox1",LB_ALLITEMS );
Label.SetText("Label1", "");
Label.SetText("Label2", "");
Label.SetText("Label3", "");
belkiss=belkiss+1
ListBox.SelectItem("ListBox1", belkiss);
ListBox.DeleteItem("ListBox4", LB_ALLITEMS);
Label.SetText("Label1", "");
Label.SetText("Label2", "");
Label.SetText("Label3", "");
MediaPlayer.Stop("Plugin2");
if hh ~= nil then
for i = 1,1 do
for i = 1,#hh do
result = ListBox.AddItem("ListBox4","AutoPlay\\Docs\\"..v.."\\"..i..".mp3", "");
end
end
k = ListBox.GetItemText("ListBox4", 1);
if k~= nil then
MediaPlayer.Load("Plugin4", k);
MediaPlayer.Play("Plugin4");
end
end
end
5
داخل مجلد السورة تكون الايات مجزأة اية اية
ومرقمة من1
الى اخر اية
بالنسبة لى لن استطع ان اقدم للادارة المصحف كاملا
اريد مثلا من سورة الناس الى اخر سورة القارعة
هم يريدون ان يتعلموا التجربة والفكرة بحيث يكون هناك مجال لتعليم باقى المحفظين على مثل ما تعلمته منك الى الان او يزيد

تعليق