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

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

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

تقليص
هذا الموضوع مغلق.
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
                المشاركة الأصلية بواسطة أبو محسن مشاهدة المشاركة
                هل ممكن رفع الأكشن لو تكرمت
                ليست إضافة
                هى أكشن جاهز و متضمن فى جميع إصدارات الأوتوبلاى

                تعليق

                مواضيع تهمك

                تقليص

                المنتدى: القسم العام نشرت بواسطة: Reem2Rabeh الوقت: 04-23-2025 الساعة 04:27 PM
                المنتدى: ضبط وتوكيد الجودة نشرت بواسطة: HeaD Master الوقت: 04-15-2025 الساعة 09:30 AM
                المنتدى: التصنيع والانتاج نشرت بواسطة: HeaD Master الوقت: 04-11-2025 الساعة 01:08 PM
                المنتدى: القسم العام نشرت بواسطة: نوال الخطيب الوقت: 03-19-2025 الساعة 03:07 AM
                المنتدى: الكمبيوتر والإنترنت نشرت بواسطة: عوض السوداني الوقت: 03-18-2025 الساعة 07:22 AM
                يعمل...
                X