cjoint

Publicité


Publicité

Format du document : text/plain

Prévisualisation

ÿþ-- ÅíÌÇÏ ÇáäÕ ÇáãßÊæÈ Ýí ÇáßæãÈæ ÈæßÓ
nItemsInListBox = ListBox.GetCount("ListBox1");

if nItemsInListBox ~= 0 then
end
-- ÅíÌÇÏ ÇáÚäÕÑ æÇáÓæÑÉ ÇáãÍÏÏÉ
tSelected = ListBox.GetSelected("ListBox1");
sJustFinishFile = ListBox.GetItemData("ListBox1", tSelected[1]);
nFileIndex = ListBox.FindItem("ListBox1", -1, 1, sJustFinishFile);
nNextFileIndex = nFileIndex+1;

if nFileIndex == nItemsInListBox or nFileIndex > nItemsInListBox then
end
-- Ãí ÊÔÛíá ÇáÓæÑÉ ÇáÊí Êáí ÇáÓæÑÉ ÇáÍÇáíÉ¡

-- æÅÐÇ ßÇäÊ åÐå åí ÇáÓæÑÉ ÇáÃÎíÑÉ íÊã ÊÔÛíá ÇáÓæÑÉ ÇáÃæáì Ýí ÇáÞÇÆãÉ
ListBox.SelectItem("ListBox1", 1);
sFileName = ListBox.GetItemData("ListBox1", 1);

-- ÊÔÛíá ÇáÓæÑÉ ÇáãæÇáíÉ
sFileName = ListBox.GetItemText("ListBox1", nNextFileIndex);
result = ListBox.GetItemData("ListBox1", nNextFileIndex);
ListBox.SelectItem("ListBox1", nNextFileIndex);
nSelect = ComboBox.GetText("ComboBox1");
if nSelect == "ÓÚÏ ÇáÛÇãÏí"then
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\AL RAMEDI\\"..result..".mp3");
elseif result == "ãÇåÑ ÇáãÚÞíáí" then
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\AL MA3QILI\\"..result..".mp3");
end
Web.LoadURL("Web1", "Autoplay\\Docs\\"..result..".mht");


Publicité


Signaler le contenu de ce document

Publicité