تويت
ComboBox.ResetContent("ComboBox1");
ComboBox.ResetContent("ComboBox2");
----------------------------------------------
ListBox.DeleteItem("ListBox4", LB_ALLITEMS);
MediaPlayer.Stop("Plugin1");
f=ListBox.GetCount(this);
Label.SetText("Label1", "");
Label.SetText("Label2", "");
Label.SetText("Label3", "");
n= ListBox.GetSelected(this);
tt= ListBox.GetItemText("ListBox1", n[1]);
if n ~= nil then
v = ListBox.GetItemData(this, n[1]);
hh = File.Find(_SourceFolder.."\\AutoPlay\\Docs\\"..v.."\\", "*.mp3", false, false, nil, nil);
if hh ~= nil then
for total=1,#hh do
ComboBox.AddItem("ComboBox1", total, _SourceFolder.."\\AutoPlay\\Docs\\"..v.."\\"..total..".mp3");
ComboBox.AddItem("ComboBox2", total, _SourceFolder.."\\AutoPlay\\Docs\\"..v.."\\"..total..".mp3");
end
end
end
ComboBox.SetSelected("ComboBox1", 1);
ComboBox.SetSelected("ComboBox3", 1);
b1= ComboBox.GetSelected(this);
bidaya = ComboBox.GetItemText(this,e_Selection);
index_1 = ComboBox.GetItemData(this,e_Selection);
b1= ComboBox.GetSelected(this);
nihaya = ComboBox.GetItemText(this,e_Selection);
index_2=ComboBox.GetItemData(this,e_Selection);
----------------------
--------------------------------------
Label.SetText("Label1", "");
Label.SetText("Label2", "");
Label.SetText("Label3", "");
ListBox.DeleteItem("ListBox4", LB_ALLITEMS);
MediaPlayer.Stop("Plugin1");
if index_1~= nil and index_2~= nil then
for i = 1,lakhder do
if index_1 == index_2 then
result = ListBox.AddItem("ListBox4", index_1, "");
elseif index_1 ~= index_2 then
for j=bidaya,nihaya do
result = ListBox.AddItem("ListBox4",ComboBox.GetItemData("ComboBox2", j), "");
end
end
end
end
k = ListBox.GetItemText("ListBox4", 1);
if k~= nil then
MediaPlayer.Load("Plugin1", k);
MediaPlayer.Play("Plugin1");
end
--------------------------------
b4= ComboBox.GetSelected(this);
lakhder = ComboBox.GetItemText(this,e_Selection);
lakhder = String.ToNumber(lakhder);
ـــــــــــــــق
Application.Sleep(1000);
---- للقراءة بالتكرار ----
ListBox.DeleteItem("ListBox4", 1);
k = ListBox.GetItemText("ListBox4", 1);
MediaPlayer.Load("Plugin1", 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", "");
end
تعليق