رفتن به مطلب
بیسیک فور ایکس
  • اطلاعیه ها

    • H@mid.RS

      جذب نیرو   پنجشنبه, 10 فروردین 1396

      درود به دوستان عزیز به چند نفر مدیر برای بخش های php و گرافیک نیازمندیم درصورت تمایل درخواست خود را در پیام خصوصی بفرستید  
    • H@mid.RS

      تغییر نام کاربری   دوشنبه, 28 فروردین 1396

      درود دوستانی که نام کاربری انها با ایمل شان یکی بود تغییر کرد مثلا نام کاربری sss@tmail.com به sss تغییر کرد دوستانی که مشکل ورود دارند @ به بعد را پاک کنند
    • H@mid.RS

      کسب درآمد   پنجشنبه, 31 فروردین 1396

      دوستانی که میخواهند با انجمن خودشون همکاری کنند و از محیط انجمن درآمد کسب کنند به بنده پیام خصوصی بفرستند
    • H@mid.RS

      راه اندازی وبلاگ برای انجمن   دوشنبه, 18 اردیبهشت 1396

      درود به همه دوستان عزیز از این پس کاربران ویژه  - همکاران - و مدیران میتوانند در انجمن برای خود وبلاگ بسازند
  • 0
salmana

چک کردن وجود شورتکات

سوال

من دوتا سورس شورتکات دارم که هر کدام یک مشکل متفاوت دارن

سورس پایین مربوط به این لینک میباشد

مشکل من با این سورس این هست که میخام وقتی شورتکات ساخته شد.دیگه شورتکات ساخته نشه.(تا اینجا میشه)

و همچنین اگر شورتکات حذف کردیم دوباره بتوان شورتکات بسازیم (این دیگه نشد)

 

 

------------

سورس و کتابخانه ای از اقای شاهدی داشتم که اون رو خیلی راحت میشه چک کرد وجود شورتکات رو ولی نتونستم بهش عکس از مسیر res بهش بدم

 

سورس و کتابخانه

-------------------------

 

 

من در سورس اولی تونستم آدرس دهی به شکل پایین کنم ولی در سورس آقای شاهدی نه

Dim xml As XmlLayoutBuilder

xml.GetDrawable("ic_launcher")

من خط دومی را به جای load.bitmap میگذارم در سورس اولی جواب میده ولی در سورس دومی ارور پایین میاد

 

 

xml2.PNG

 

 

 

حالا بین این دو سورس یکیش رو حل کنید برام کافیه

 

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

5 پاسخ به این سوال تا کنون داده شده است

Recommended Posts

  • 0

می خواید کاربر خودش شورتکات رو اضافه کنه


بعنوان مثال باتن بذاری با کلیک روی باتن شورتکات اضافه بشه ؟


به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

 

می خواید کاربر خودش شورتکات رو اضافه کنه

بعنوان مثال باتن بذاری با کلیک روی باتن شورتکات اضافه بشه ؟

 

 

روی باتن لمس کنه و شورتکات بسازه.

اگر هم بعد از اول صفحه حذف کرد دوباره با زدن باتن شورتکات ایجاد بشه. ولی اگر شورتکات بود دیگه شورتکات ایجاد نشه

 

ویرایش برای پست اول: با پست آقای شاهدی بازم مشکلم ایجاد شورتکات دارم. چون اگه یه بار ایجاد شد و حذف کنم دیگه بوجود نمیاد.و میگه شورتکات از قبل وجود دارد

همون سورس اولی رو اگه بتونین خاصیت چک کردن بهش بدین خوبه

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

با کد پایین تونستم شورتکات ایجاد کنم

Dim shortcutIntent As Intent
shortcutIntent.Initialize("", "")
shortcutIntent.Action=shortcutIntent.ACTION_MAIN
shortcutIntent.SetComponent("b4a.example/.main") ' Put the app package name here
Dim in As Intent
in.Initialize("", "")
in.PutExtra("duplicate",False)
in.PutExtra("android.intent.extra.shortcut.INTENT", shortcutIntent)
in.PutExtra("android.intent.extra.shortcut.NAME", "b4ae") ' Put you're application name here
in.PutExtra("android.intent.extra.shortcut.ICON", LoadBitmap(File.DirAssets,"sin.png")) 
in.Action = "com.android.launcher.action.INSTALL_SHORTCUT"
Dim p As Phone
p.SendBroadcastIntent(in)
DoEvents

با کد پایین هم تونستم حذفش کنم

Sub remove
	Dim shortcutIntent As Intent
shortcutIntent.Initialize("", "")
shortcutIntent.Action=shortcutIntent.ACTION_MAIN
shortcutIntent.SetComponent("b4a.example/.main") ' Put the app package name here
Dim in As Intent
in.Initialize("", "")
in.PutExtra("android.intent.extra.shortcut.INTENT", shortcutIntent)
in.PutExtra("android.intent.extra.shortcut.NAME", "b4ae") ' Put you're application name here
in.Action = "com.android.launcher.action.UNINSTALL_SHORTCUT"
Dim p As Phone
p.SendBroadcastIntent(in)
DoEvents
End Sub

کد پایین هم به منیفیست اضافه کردم

<uses-permission android:name="com.android.launcher.permission.INSTALL_SHORTCUT" />
    <uses-permission android:name="com.android.launcher.permission.UNINSTALL_SHORTCUT" />

------------------------------------------------

 

 

حالا سوال من اینه که چجوری میشه واسه اکتیویتی غیراز main هم شورتکات ایجادکرد. من main. رو هم به اسم اکتیویتی موردنظر تغییر دادم ولی بیفایده

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

درود این طور که معلومه نمیشه ساخت مگر برایش ی راهی پیدا کنیم


 


فقط ی چیز به کد ساخت شورتکات باید اضافه کنیم تا با هر بار زدن کاربر روی باتن دیگه شورتکات ساخته نشه



in.PutExtra("duplicate",False)

کد کاملش رو هم سلمان عزیز قرار دادن


به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر
  • 0

 

درود این طور که معلومه نمیشه ساخت مگر برایش ی راهی پیدا کنیم

 

فقط ی چیز به کد ساخت شورتکات باید اضافه کنیم تا با هر بار زدن کاربر روی باتن دیگه شورتکات ساخته نشه

	in.PutExtra("duplicate",False)

کد کاملش رو هم سلمان عزیز قرار دادن

 

 

 

 

پس این برنامه جعبه ابزار چجوری اینو پیاده کرده.واسه هر بخش شورتکات گذاشته.

منم چیزی مثل جعبه ابزار درست کردم(البته سر و گردنی بالاتر) و نیاز مبرم دارم که واسه هر بخش شورتکات براش بسازم

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

برای اینکه بتوانید دیدگاهی ارسال کنید نیاز دارید که کاربر سایت شوید

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !

ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید

ورود به حساب کاربری

×