إعـــــــلان

**ميزو فوكس ميزو فوكس** · 15-07-2015, 12:06 AM

المشاركة الأصلية بواسطة محمد بن أحمد أبو حذيفة مشاهدة المشاركة

بارك الله فيكم على المتابعة لم اجرب الملف لحد الان في انتظار الاخ المبرمج

توجد مشلكة بالملف تظهر الصورة

ايضا لم اجد المجلد رقم 1و2
الذي يتم وضع صور القران فيها بصيغة mp3و jpj

هذا ليس خطاء استاذ محمد لكن ظهور هذه الرساله
دليل علي ان الداتا المطلوبه غير موجوده في مجلد
dose
يمكنك انت اضافه الملفات من الاسطوانه التي حملتها
هذه ملف المشروع فقط و ليس به ملفات التشغيل

**ميزو فوكس ميزو فوكس** · 15-07-2015, 12:09 AM

انسخ مجلد Docs و مجلد Flash وضعهم في ملف المشروع
تجد كل شئ كما هو بالظبط و لكني قمت برفع ملف المشروع فقط
بدون ملفات الداتا لكبر الحجم وما يهم من ملف المشروع هم الملف
نفسه و الاكواد المكتوبه به و هذا ما فعلته عن طلبك لملف المشروع

**ميزو فوكس ميزو فوكس** · 15-07-2015, 12:11 AM

هذا هو ملف المشروع

http://www.gulfup.com/?1kxowm

محمد بن أحمد أبو حذيفة · 15-07-2015, 02:06 AM

بارك الله فيك

محمد بن أحمد أبو حذيفة · 15-07-2015, 02:16 AM

يوجد شيئ لم افهمه

كود PHP:


ListBox.DeleteItem("ListBox2", LB_ALLITEMS);
ListBox.DeleteItem("ListBox3", LB_ALLITEMS);
ListBox.DeleteItem("ListBox4", LB_ALLITEMS);
MediaPlayer.Stop("Plugin1");
f=ListBox.GetCount(this);
n= ListBox.GetSelected(this);
if n ~= nil and chiek ~= nil then
v = ListBox.GetItemData(this, n[1]);
hh = File.Find(_SourceFolder.."\\AutoPlay\\Docs\\"..v.."\\"..chiek.."\\", "*.mp3", false, false, nil, nil);
for total=1,#hh do
 ListBox.AddItem("ListBox2", total, _SourceFolder.."\\AutoPlay\\Docs\\"..v.."\\"..chiek.."\\"..total..".mp3");
 ListBox.AddItem("ListBox3", total, _SourceFolder.."\\AutoPlay\\Docs\\"..v.."\\"..chiek.."\\"..total..".mp3");
end
end  
ListBox.SelectItem("ListBox2", 1);
ListBox.SelectItem("ListBox3", 1);

اين الكود المسؤول عن تشغيل الفلاش

**ثامر أبو بلقيس ثامر أبو بلقيس** · 15-07-2015, 02:36 AM

السلام عليكم ورحمة الله وبركاته

شكرا جزيلا

أخي محمد الأكواد المرسلة في هذا الملف كما ذكرت سابقا
لا تمكن المستخدم من اختيار السورة من .... إلى .... بل تتم قراءة السورة
كاملة من بدايتها إلى نهايتها دون مراعاة أي اختيار

سألت أخي : اين الكود المسؤول عن تشغيل الفلاش ؟
لا أعرف الفلاش المقصود بالضبط في عمل أخينا ميزو فوكس

محمد بن أحمد أبو حذيفة · 15-07-2015, 02:39 AM

المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة

السلام عليكم ورحمة الله وبركاته

شكرا جزيلا

أخي محمد الأكواد المرسلة في هذا الملف كما ذكرت سابقا
لا تمكن المستخدم من اختيار السورة من .... إلى .... بل تتم قراءة السورة
كاملة من بدايتها إلى نهايتها دون مراعاة أي اختيار

سألت أخي : اين الكود المسؤول عن تشغيل الفلاش ؟
لا أعرف الفلاش المقصود بالضبط في عمل أخينا ميزو فوكس

اقصد صورة المرفقة

الملفات المرفقة

sshot-1.jpg (63.6 كيلوبايت, 3 مشاهدات)

**ثامر أبو بلقيس ثامر أبو بلقيس** · 15-07-2015, 02:41 AM

الأكواد في عنصر ميديا بلير أثناء التشغيل و التوقف
العنصر مخفي

محمد بن أحمد أبو حذيفة · 15-07-2015, 02:50 AM

بارك الله فيك جميعا لي رجعة ان شاء الله

**ميزو فوكس ميزو فوكس** · 15-07-2015, 02:59 AM

المشاركة الأصلية بواسطة محمد بن أحمد أبو حذيفة مشاهدة المشاركة

اقصد صورة المرفقة

ملف المشروع الاخير الي بعتهمولك هو الي فيه الاكواد كامله
و مش ناقصه اي حاجه كما في الاسطوانه بالظبط

**ثامر أبو بلقيس ثامر أبو بلقيس** · 15-07-2015, 03:29 AM

السلام عليكم ورحمة الله وبركاته

في زر التشغيل في مشروعك مادام حقق التكرار من .. إلى
أنت وضعت بدل المكتوب في هذا الملف المرسل
الكود الصحيح التالي

كود PHP:


ListBox.DeleteItem("ListBox4", LB_ALLITEMS); 
MediaPlayer.Stop("Plugin1"); 
if index_1~= nil and index_2~= nil then 
for i = 1,Input.GetText("Input1") 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",ListBox.GetItemData("ListBox3", j), ""); 

end 
end 
end 
end 
-------------------------------------- 
my_table = {}; 
---------- 
for n =1,ListBox.GetCount("ListBox4")do 
vv=ListBox.GetItemText("ListBox4", n); 
path_parts = String.SplitPath(vv); 
p=path_parts.Drive 
b=path_parts.Folder 
c=path_parts.Extension 
Table.Insert(my_table, 1, String.ToNumber(path_parts.Filename)); 
end 
 ListBox.DeleteItem("ListBox4", LB_ALLITEMS); 
selectionsort(my_table) 
for bb = 1, table.getn(my_table) do 
result = ListBox.AddItem("ListBox4", p..b..my_table[bb]..c, ""); 
end 
k = ListBox.GetItemText("ListBox4", 1); 
if k~= nil then 
MediaPlayer.Load("Plugin1", k); 
MediaPlayer.Play("Plugin1"); 
end

لا أريد أن نختلف لكن ثق في كلامي بصدر رحب

موفق أخي

**امل الماضي امل الماضي** · 15-07-2015, 06:05 AM

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية . موفق بإذن الله ... لك مني أجمل تحية .

زكرياء ولد زريقة · 26-07-2015, 02:03 AM

بسم الله الرحمن الرحيم
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

**منوبة منوبة** · 02-10-2015, 10:03 AM

بارك الله فيك اخي ميزو عمل رائع ومتقن
الواحد صار يخاف على نفسه في المنتدى
ماشاء الله جميع الاخوة يتفننون فيما يقدمون
ابدعت فواصل

**سمير نبيل سمير نبيل** · 11-10-2015, 01:19 PM

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

إعـــــــلان

موسوعة ملائكة الرحمن لتحفيظ القرآن الكريم كاملا للكبار و الاطفال

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

مواضيع تهمك