X
 
  • Filter
  • الوقت
  • عرض
مسح الكل
مشاركات جديدة

    Font Size
    #1




    هناك عدة طرق لنسخ الخطوط أو اضافتها اليك هذه الطريقة

    نقوم بضغط الخطوط بامتداد zip و لنسميها fonts اختر اي اسم
    علي ان لا تكون الخطوط داخل مجلد

    تابع الشرح



    نفتح مشروع جديد








    لاتنسي اعطاء صلاحية المدير لأسطوانتك



    الكود المستعمل

    Code:
    path = Shell.GetFolder(SHF_FONTS);
    StatusDlg.Show(MB_ICONNONE, false);
    Zip.Extract("AutoPlay\\Docs\\fonts.zip", {"*.*"}, path, true, true, "", ZIP_OVERWRITE_NEVER, nil);
    StatusDlg.Hide();
    آخر تعديل بواسطة: espritmarin, 21-12-2020, 07:45 PM. السبب: تعديل الكود
    Similar Threads

    Font Size
    #2
    dude
    as well as copying / extracting to the destination folder, the fonts must be registered
    تعليق

    • espritmarin
      espritmarin أضاف تعليق
      تعديل تعليق
      نبهتني الي امر مهم سأجد حلا ان شاء الله

    Font Size
    #3
    سأضع الحل غدا ان شاء الله
    تعليق

      Font Size
      #4
      Originally posted by old_school *
      dude
      as well as copying / extracting to the destination folder, the fonts must be registered
      تم الوصول الي حل

      Code:
      path = Shell.GetFolder(SHF_FONTS);
      zip_contents = Zip.GetContents("AutoPlay\\Docs\\Fonts.zip", true);
      zip_contents_display = Table.Concat(zip_contents, "\r\n", 1, TABLE_ALL);
      
      
      StatusDlg.Show();
      -- Extract the contents of the Zip file.
      Zip.Extract("AutoPlay\\Docs\\Fonts.zip", {"*.*"}, path, true, true, "", ZIP_OVERWRITE_ALWAYS, nil);
      
      
      -- Hide the status dialog.
      StatusDlg.Hide();
      
      
      
      
      for j in pairs (zip_contents)do
      path_parts = String.SplitPath(zip_contents[j])
      
      
      System.RegisterFont(path.."\"..path_parts.Filename..path_parts.Extension,path_p arts.Filename, true);
      
      end
      تعليق

        Font Size
        #5
        و هذا فيديو اثباث

        تعليق

          Font Size
          #6
          ok now your code is complete.......




          here a simple fonts tool






          Code:
          https://mega.nz/file/dFxHHCxR#VUjD13uQO4CMZt4KmrcaHQhjwGziM8hRqcCeoEl_cwU
          تعليق

          • espritmarin
            espritmarin أضاف تعليق
            تعديل تعليق
            عمل مميز و احترافي هل تستطيع تصدير الاسطوانة APZ
            هل تعاملت مع الخطوط مضغوطة لكي يكون الحجم صغير
            فكرة مميزة ان تضغ الخطوط في ليست بوكس ما شاء الله عليك اخي
            انت بارع
            ياريت ترفع لنا الاسطوانة بصيغة APZ

          Font Size
          #7
          some time ago I uploaded examples in apz format in this forum
          but now it has become paid and I only upload files in exe form .....
          sorry.........
          تعليق

          • espritmarin
            espritmarin أضاف تعليق
            تعديل تعليق
            ليس بمشكل أخي كنت بالفعل تحمل امثلة فيما سبق
            أردت فقط ان اري سكريبت يمكنني عمل مثل اسطوانتك
            اردت فقط تبادل الخبرة معك فأنا اعشق الاتوبلاي من ناحية التعامل مع ملفات
            شكرا اخي

          Font Size
          #8
          غدا ان شاء الله
          تعليق

            Font Size
            #9
            Originally posted by old_school *
            ok now your code is complete.......




            here a simple fonts tool






            Code:
            https://mega.nz/file/dFxHHCxR#VUjD13uQO4CMZt4KmrcaHQhjwGziM8hRqcCeoEl_cwU
            عاينت اسطوانتك انها احترافية
            ماهي طريقتك لحمايتها الحماية قوية
            تعليق
            Working...
            X