جستجو در تالار

در حال نمایش نتایج برای برچسب های 'وب پی'.



تنظیمات بیشتر جستجو

  • جستجو بر اساس برچسب

    برچسب ها را با , از یکدیگر جدا نمایید.
  • جستجو بر اساس نویسنده

نوع محتوا


تالار ها

  • اخبار سایت
    • قوانین انجمن
    • اخبار و اطلاعیه ها
    • انتقادات و پیشنهادات
  • بیسیک فور اندروید
    • آموزش ها
    • کتابخانه ها
    • سورس کد ها
    • قطعه کد ها
    • سوالات عمومی
    • معرفی برنامه های شما
    • دانلود نسخه های مختلف
  • اندروید استدیو
    • کتابخانه ها
    • سورس کد ها
    • قطعه کد ها
    • سوالات عمومی
    • معرفی برنامه های شما
  • زبان های برنامه نویسی دیگر
    • PHP
  • بخش گرافیک
    • ابزار های طراحی
    • طرح های لایه باز
    • نمونه رابط کاربری (UI)
  • بخش VIP
    • سورس کد ها
    • کتابخانه ها
    • آموزش ها
    • بخش پشتیبانی
  • متفرقه
    • بحث آزاد

دسته ها

  • بیسیک فور اندروید
    • کتابخانه ها
    • سوس کدها
    • نسخه های مختلف b4a

1 نتیجه پیدا شد

  1. Sub Globals Dim WebpView As Hitex_WebpImageView Dim Decoder As Hitex_WebpDecoder End Sub Sub Activity_Create(FirstTime As Boolean) #Region استفاده از ایمیج ویو شخصی کتابخونه WebpView.Initialize("") Activity.AddView(WebpView,0,0,100%x,100%y) WebpView.ImageWebp(File.DirAssets,"image.webp") #End Region #Region چک کردن دستگاه برای پشتیبانی از فرمت وب پی 'این گزینه فقط برای چک کردنه ، وگرنه این کتابخونه روی تمام نسخه های اندروید وب پی رو نمایش میده Log("Support : " & Decoder.IsDeviceSupportsWebp) #End Region #Region تبدیل اینپات استریم به بیتمپ ' Dim bitmap As Bitmap = Decoder.InputStreamToBitmap(File.OpenInput(File.DirAssets,"image.webp")) #End Region #Region تبدیل مستقیم وب پی از آدرس به بیتمپ ' Dim bitmap As Bitmap = Decoder.WebpToBitmap(File.DirAssets,"image.webp") #End Region #Region تبدیل وب پی به درائیبل ' Activity.Background = Decoder.WebpToDrawable(File.DirAssets,"image.webp",Gravity.FILL) #End Region #Region تبدیل بیتمپ به وب پی و ذخیره روی دیسک ' If Decoder.BitmapToWebp(bitmap, File.DirRootExternal,"pic2.webp", 30) Then ' Msgbox("Saved Successfully .","BitmapToWebp") ' Else ' Msgbox("Saved Failed ! check write external permission or disk space !","BitmapToWebp") ' End If #End Region End Sub