تويت
تشغيل الفديو من ليست بوكس
السلام عليكم هل ممكن تشغيل الفديو من خلال ليست بوكس
اي تكون اسماء المقاطع في الليست بوكس عند النقر عليها يشتغل الفديو داخل التجميعة
اي تكون اسماء المقاطع في الليست بوكس عند النقر عليها يشتغل الفديو داخل التجميعة
-
-
اجابة تحتمل الكثيثر من الوجهات : نظرا لاننا لا ندري ما وضعت في من روابط هل في items او في dataالمشاركة الأصلية بواسطة احمد كبه مشاهدة المشاركة
لذلك سافترض سيناريو سيدي احمد وهو التالي :
اولا نجعل في زر كود يحضر الفيديوهات من مجلد معين في حاسوبك
و يضعها في ليسبوكس
في اليسبوكس نضع كود يقرا المختار منها في الميدابلاير
جميل جدا :
مع الملف المفتوح
http://up.harajgulf.com/do.php?id=1050681 -
تمام مثل ماعملت بالضبط .... اريد الفديو يشتغل مباشرةً بمجرد الضغط على اسم الفديو بالليست بوكس لكن العناوين اريدها موجودة باليست بوكس تلقائياالتعديل الأخير تم بواسطة احمد كبه; الساعة 30-08-2016, 09:34 AM.تعليق
-
هل من الممكن الاستغناء عن الذر الذي يحضر الفديو الى التجميعة و الاكتفاء بالعناوين فقط تكون موجودة تلقائيا بالليست بوكستعليق
-
ما فيه مشكلالمشاركة الأصلية بواسطة رانيا حسن مشاهدة المشاركة
لكن كيف يملا الليسبوكس ؟
الا اذا وضعت كود الزر في Onswhow الصفحة
ثم حددي مباشرة المجلد المصدر و ليكن مجلد الفيدوهات في التجميعةتعليق
-
ايضا لا يعمل استاذي العزيز اعتقد يتطلب كود في الglobal function
واعادة صياغة الكود في الصفحة حتى يقوم البرنامج بالاشتغال بصورة صحيحةتعليق
-
اين توجد الفيدوهات ؟المشاركة الأصلية بواسطة رانيا حسن مشاهدة المشاركة
من خلال الاجابة نعدل الكودتعليق
-
ان كان فيه فيديوهات في ملف الفيديو الخاص بالتجميعةالمشاركة الأصلية بواسطة رانيا حسن مشاهدة المشاركة
شعي هذا في الصفحة onshow
كود PHP:Ext = {"*.dat","*.avi","*.mpg","*.wmv","*.asf","*.mpeg","*.mp4","*.mpe","*.3gp","*.divx","*.mov","*.ts"};
ListBox.DeleteItem("ListBox1",LB_ALLITEMS);
for index ,type in pairs(Ext) do
MyVideo = File.Find("AutoPlay\\Videos", type, false, true, nil, nil);
if MyVideo then
for i,n in pairs(MyVideo) do
ListBox.AddItem("ListBox1", String.SplitPath(n).Filename, n );
end
end
end
تعليق
-
شكرا جزيلا جدا استاذي العزيز الان البرنامج يعمل بشكل صحيح
ةهل من الممكن عمل زر حتى يقوم بنسخ العناصر الموجودة باليست بوكس الى مكان ما داخل الكمبيوترتعليق
-
بما اننا وضعنا كل الفيديوهات في الليسبوكسالمشاركة الأصلية بواسطة رانيا حسن مشاهدة المشاركة
فالامر بسيط ننسخ كل موهو موجود في ملف الفيديو الى ملف ما في الحاسوب
مثال فقط :
كود PHP:DestFolder = Shell.GetFolder(SHF_MYDOCUMENTS);
Folder.Create(DestFolder.."\\Copied Files");
StatusDlg.Show(MB_ICONNONE, false);
File.Copy("AutoPlay\\Videos\\*.*", DestFolder.."\\Copied Files\\", true, true, false, true, nil);
StatusDlg.Hide();
Shell.Execute(DestFolder.."\\Copied Files", "explore", "", "", SW_SHOWNORMAL);
تعليق
تعليق