cjoint

Publicité


Publicité

Format du document : text/plain

Prévisualisation

ÿþ--ßíÝíÉ ÇáÍÕæá Úáì ÇáßæÏ ÇáÓÇÈÞ
-- ÅíÌÇÏ ÇáäÕ ÇáãßÊæÈ Ýí ÇáßæãÈæ ÈæßÓ
nSelect = ComboBox.GetText("ComboBox1");
-- ÅíÌÇÏ ÇáÓæÑ ÇáãÍÏÏÉ Ýí ÇááÓÊ ÈæßÓ
Sura_Selected = ListBox.GetSelected("ListBox1");
--ÅíÌÇÏ ÇáÏÇÊÇ ááÓæÑÉ ÇáãÍÏÏÉ
result = ListBox.GetItemData("ListBox1", Sura_Selected[1]);


if nSelect == "ÅÎÊÑ ÇáãÞÑÆ"then
--ÚÑÖ ÑÓÇáÉ ÎØà ÅÎÊÑ ÇáãÞÑÆ ãä ÝÖáß
Dialog.Message("","ÅÎÊÑ ÇáãÞÑÆ ãä ÝÖáß");
end


if nSelect == "ÅÎÊÑ ÇáãÞÑÆ"then
elseif nSelect == "ÓÚÏ ÇáÛÇãÏí"then
-- ÊÔÛíá ÇáÓæÑÉ ÇáãæÇÝÞÉ ááÏÇÊÇ Ýí ãÌáÏ ÇáÔíÎ ÇáÍÕÑí
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\AL RAMEDI\\"..result..".mp3");
--ÊÔÛíá ÕÝÍÉ ÇáæíÈ ÇáãæÇÝÞÉ ááÓæÑÉ ÇáãÎÊÇÑÉ
Web.LoadURL("Web1", "AutoPlay\\Docs\\"..result..".mht");
-- äÞæã ÈäÝÓ ãÇ ÞãäÇ Èå ãÚ ÇáÔíÎ ÇáÍÕÑí ááÔíæÎ ÇáÂÎÑíä
elseif nSelect == "ãÇåÑ ÇáãÚÞíáí"then
-- ÊÔÛíá ÇáÓæÑÉ ÇáãæÇÝÞÉ ááÏÇÊÇ Ýí ãÌáÏ ÇáÔíæÎ
MediaPlayer.Load("media_player", "AutoPlay\\Audio\\AL MA3QILI\\"..result..".mp3");
--ÊÔÛíá ÕÝÍÉ ÇáæíÈ ÇáãæÇÝÞÉ ááÓæÑÉ ÇáãÎÊÇÑÉ
Web.LoadURL("Web1", "AutoPlay\\Docs\\"..result..".mht");



















end

Publicité


Signaler le contenu de ce document

Publicité