با سلام و درود به کاربرام همیشه در صحنه یاهو ۹۸ YAHOO
امروز براتون تکه کد کاربردی خیلی مواقع لازم هست که کاربر برای اشتراک گذاری فایلی دسترسی پیدا کنه به برنامش رو براتون مهیا کرده ایم .
حتما دیدی موقعی که ما میخوایم یه فایلی رو به اشتراک بزاریم چندین برنامه به صورت پیش فرض باز میشن ؟
✨ نکات مهم:
• کد آماده و تستشده (2 قطعهکد)
• کار با کتابخانههای: JavaObject
• کپی و استفاده مستقیم در پروژه B4A
📚 کتابخانههای مورد نیاز:
JavaObject
(از مسیر Libraries در محیط B4A تیک بزنید.)
🚀 نحوه استفاده:
کد زیر را کپی کنید و در Sub یا ماژول مناسب پروژه خود قرار دهید؛ کتابخانههای اعلامشده را تیک بزنید.
| دستهبندی | تکه کدها |
| تاریخ انتشار | ۲۷ شهریور ۱۴۰۵ - ۰۱:۳۸ |
| تعداد بازدید | ۳ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- تکهکد آماده B4A
- کاملاً رایگان
- کد تستشده با توضیح فارسی
- کتابخانه: JavaObject
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
AddActivityText(Main,
<intent-filter>
<action android:name="android.intent.action.SEND" />
<category android:name="android.intent.category.DEFAULT" />
<data android:mimeType="image/*" />
</intent-filter>)
#BridgeLogger: True
Sub Process_Globals
Private OldIntent As Intent
End Sub
Sub Globals
End Sub
Sub Activity_Create(FirstTime As Boolean)
End Sub
Sub Activity_Resume
If IsRelevantIntent(Activity.GetStartingIntent) Then
Dim in As JavaObject = Activity.GetStartingIntent
Dim uri As String = in.RunMethod("getParcelableExtra", Array("android.intent.extra.STREAM"))
Try
Log("Loading bitmap from: " & uri)
Dim bmp As Bitmap = LoadBitmapSample("ContentDir", uri, ۱۰۰%x, ۱۰۰%y)
Activity.SetBackgroundImage(bmp)
Catch
Log(LastException)
End Try
End If
End Sub
Private Sub IsRelevantIntent(in As Intent) As Boolean
If in.IsInitialized And in <> OldIntent And in.Action = in.ACTION_SEND Then
OldIntent = in
Return True
End If
Return False
End Sub