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

تقليص
لا يوجد إعلان حتى الآن.

كود للحصول على اسماء الملفات فقط وليس مساراتها

تقليص
هذا الموضوع مغلق.
X
X
 
  • تصفية - فلترة
  • الوقت
  • عرض
إلغاء تحديد الكل
مشاركات جديدة

  • كود للحصول على اسماء الملفات فقط وليس مساراتها

    السلام عليكم ورحمة الله وبركاته
    بسم الله الرحمن الرحيم
    عندى يا اخوة هذا الكود
    كود:
    vids = File.Find(_SourceFolder.."\\AutoPlay\\Videos\\1", "*.mp4", false, false, nil, nil);
    for x,y in pairs (vids) do
    	ListBox.AddItem("ListBox1", y,y);
    end
    ووظيفته جلب جميع الفيديوهات ذات صيغة ال MP4 داخل الملف 1
    وارفاقها فى ال Listbox
    ولكن يعطينى اسامى الملفات ومساراتها
    مثال
    C:\Documents and Settings\ahmed\temp\....video.mp4
    اريد انى اضع فى الList Box اسم هذه الملفات دون مسارتها وتكون ال Data الخاصة بها هى المسار
    بمعنى ان اول عنصر اسمه يكون Video1.mp4 وقيمته داخل الليست بوكس بها مساره C:\Documents and Settings\ahmed\temp\....video.mp4
    وجزاكم الله كل خير

  • #2
    جزاكم الله خيرا تم وضع هذه الداله لعمل هذا الغرض
    كود:
    function get_name(path)
    finded = false;
    while finded == false do
    temp = String.Find(path, "\\", 1, false);
    path = String.Mid(path, temp+1, -1);
    if temp == -1 then
    finded = true;
    end
    end
    return path;
    end

    تعليق


    • #3
      جزك الله خيرا على مشاركة الحل
      يمكنك إستخدام الأكشن الجاهز String.SplitPath بالأوتوبلاى مباشرة دون الحاجة لدوال إضافية

      كود:
      path = String.SplitPath("C:\\Program Files\\My Product\\MyFile.ext");
      Dialog.Message("Notice", path.Filename..path.Extension, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

      تعليق


      • #4
        المشاركة الأصلية بواسطة المـهاجر مشاهدة المشاركة
        جزك الله خيرا على مشاركة الحل
        يمكنك إستخدام الأكشن الجاهز String.SplitPath بالأوتوبلاى مباشرة دون الحاجة لدوال إضافية

        كود:
        path = String.SplitPath("C:\\Program Files\\My Product\\MyFile.ext");
        Dialog.Message("Notice", path.Filename..path.Extension, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

        نعم أخى هذا الحل هو الصحيح أو الأصح

        جزاك الله خيرا على المتابعة

        تعليق


        • #5
          المشاركة الأصلية بواسطة المـهاجر مشاهدة المشاركة
          جزك الله خيرا على مشاركة الحل
          يمكنك إستخدام الأكشن الجاهز string.splitpath بالأوتوبلاى مباشرة دون الحاجة لدوال إضافية

          كود:
          path = string.splitpath("c:\\program files\\my product\\myfile.ext");
          dialog.message("notice", path.filename..path.extension, mb_ok, mb_iconinformation, mb_defbutton1);
          هل ممكن رفع الأكشن لو تكرمت

          تعليق


          • #6
            string.splitpath

            تعليق


            • #7
              المشاركة الأصلية بواسطة ربيع مشاهدة المشاركة
              string.splitpath

              الله المستعان
              والله العتب على النظر يا صديقي

              تعليق


              • #8
                المشاركة الأصلية بواسطة أبو محسن مشاهدة المشاركة
                هل ممكن رفع الأكشن لو تكرمت
                ليست إضافة
                هى أكشن جاهز و متضمن فى جميع إصدارات الأوتوبلاى

                تعليق

                مواضيع تهمك

                تقليص

                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 06-08-2025 الساعة 11:33 PM
                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 06-04-2025 الساعة 05:29 PM
                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 05-31-2025 الساعة 10:07 PM
                المنتدى: القسم العام نشرت بواسطة: ماريا عبد الله الوقت: 05-30-2025 الساعة 11:48 PM
                المنتدى: التصنيع والانتاج نشرت بواسطة: HaMooooDi الوقت: 05-30-2025 الساعة 09:36 AM
                يعمل...
                X