رفتن به مطلب

Mr.Kafiri

کاربر رو به رشد
  • تعداد ارسال ها

    231
  • تاریخ عضویت

  • آخرین بازدید

  • روز های برد

    15

آخرین بار برد Mr.Kafiri در 1 آبان

Mr.Kafiri یکی از رکورد داران بیشترین تعداد پسند مطالب است !

اعتبار در سایت

207 عالی

درباره Mr.Kafiri

  • درجه
    کاربر حرفه ای
  • تاریخ تولد 29 خرداد 1384

مشخصات پروفایل

  • محل زندگی
    یزد
  • محل تولد
    یزد

آخرین بازدید کنندگان نمایه

984 بازدید کننده نمایه
  1. فک نکنم روش درستی برای گرفتن چندین دسترسی باشه شما متد CheckAndRequest رو که صدا بزنید ، خودش چک میکنه اگر دسترسی داده نشده بود از کاربر درخواست میکنه اگر داده بود کاری انجام نمیده rr.CheckAndRequest(rr.PERMISSION_READ_SMS) rr.CheckAndRequest(rr.PERMISSION_RECEIVE_SMS) rr.CheckAndRequest(rr.PERMISSION_READ_CONTACTS) rr.CheckAndRequest(rr.PERMISSION_READ_CALL_LOG) sub Activity_PermissionResult (Permission As String, Result As Boolean) log(Permission) log(Result) If Result = false Then Log("No Permission") End If End If
  2. Mr.Kafiri

    گرفتن همه مخاطبین!

    سلام با قطعه کد زیر میتونید تمام مخاطبین رو بگیرید Public Sub GetAllPhones As Map Dim crsr As ResultSet = cr.Query(dataUri, Array As String("data1", "data2", "contact_id"), "mimetype = ?", _ Array As String("vnd.android.cursor.item/phone_v2"), "") Dim res As Map res.Initialize Do While crsr.NextRow Dim id As Long = crsr.GetLong("contact_id") Dim phones As List If res.ContainsKey(id) = False Then phones.Initialize res.Put(id, phones) Else phones = res.Get(id) End If Dim p As cuPhone p.Initialize p.Number = crsr.GetString2(0) p.PhoneType = phoneTypes.Get(crsr.GetString2(1)) phones.Add(p) Loop crsr.Close Return res End Sub روش استفاده هم به شکل زیر: Dim phones As Map = cu.GetAllPhones For Each id As Long In phones.Keys Dim idphones As List = phones.Get(id) Log($"${id}: ${idphones}"$) Next کتابخونه ContactUtils تیک بزنید. دسترسی هم یادتون نره بگیرید از کاربر https://www.b4x.com/android/forum/threads/solved-how-to-get-contact-list-with-mobile-phone.95129/
  3. Mr.Kafiri

    ذخیره تنظیمات

    سلام اینکار اصولی نیست ولی در اکثر مواقع جواب میده خود منم بعضی اوقات از این روش استفاده میکنم ولی برای کارتون اصولی و استاندارد باشه میتونید متغیر هاتون رو توی xml خود برنامه ذخیره کنید.
  4. سلام و درود.. اقای شاهپیری توی رویداد کلیک OnItemClick چجوری میشه با viewclicked کار کرد من هر کار میکنم خطا میده - Sub PR_onBindViewHolder(layoutitem As Object,position As Int,viewtype As Int) Dim pg1 As Panel =layoutitem pg1.Width = 48%X pg1.Height = 140dip . . . pg1.Tag = dt.id End Sub Sub PR_onCreateViewHolder(layoutitem As Object,viewtype As Int) As Object Dim p As Panel = layoutitem Dim pp As Panel pp.Initialize("") pp.LoadLayout("form_pr") p.AddView(pp,0%X,0,45%X,120dip) Return Null End Sub Sub PR_getItemCount As Int Return lData.Size End Sub Sub PR_OnItemClick(ItemTag As Object,viewclicked As Object,position As Int) dim p as panel = viewclicked dim p2 as panel = p.getView(0) dim img as ImageView = p2.GetView(0) . . . End Sub الان این کد های من اشتباس؟ من یه امیج ویو دارم که میخوام وقتی روی اون کلیک شد عکسش عوض بشه، مثل اینکه نمیدونم viewclicked کار نمیکنه یا یجایی من اشتباه رفتم
  5. سلام برای اینکار باید از گت المنت استفاده کنید ----------------- این سورس هم خیلی کمکتون میکنه b4abitlycafetoseeh.ir_.zip منبع کافه توسعه
  6. ارتفاع خود ویو ریسایکلر نه.. منظورم ارتفاع کل ایتم ها مثلا 50 تا ایتمم داریم میخوایم اندازه بگیریم این پنجا تا ایتم چقدر ارتفاع هاشون میشه مثلا 600dip نمیدونم چجوری توضیح بدم خودم یه راهی بذهنم رسید که بیام توی حلقه ارتفاع هارو با هم جمع کنم ولی میخواستم بدونم راه دیگه ای هم داره. مثلا شما در اسکرول ویو میتونید با دستور زیر اندازه کل حجمی که اسکرول میشه رو بگیرید HSV1.Panel.Height -------------------------- من الان ریسایکلر ویو رو توی اسکرول ویو قرار دادم . منتها میخوام اسکرول هاشو همزمان باشه خودم گفتم ارتفاع کل ایتم های ریسایکلر رو گرفت و اندازه ارتفاع خود ویو ریسایکلر رو به همون اندازه کنیم تا دیگه خود ویو ریسایکلر اسکرول نشه و فقط اسکرول ویو اسکرول بشه. یکم پیچیده شد ببخشید حالا نمیدونم این راه حل درسته یا اصلا نمیشه کاری کرد که اسکرول هاشون همزمان باشه حل شد!!!!
  7. خیلی ممنون. این مشکل حل شد... ----------- یه سوال دیگه ، میشه اندازه ارتفاع کل ایتم ها رو حساب کرد؟؟؟ مثلا با دستور زیر میتونیم اندازه ارتفاع پنل اسکرول ویو رو بگیریم HSV1.Panel.Height راهی داره ارتفاع کل رو حساب کرد؟ خودم یه راهی بذهنم رسید که تعداد ایتم ها رو گرفت و با حلقه جمع کرد ولی میخواستم بدونم راه حل دیگه هم داره یا نه
  8. نه منظورم اینه که نیاد خط بعدی ادامه داشته باشه و بشه اسکرول کرد بصورت افقی
  9. سلام اقای شاهپیری یه سوال داشتم آیا امکان داره توی فلکس بجای اینکه بیاد خط بعدی مستقیم ادامه داشته باشه؟ اگر نمیشه چه راهی رو پیشنهاد میکنید برای اینکار من سورس تنظیم ارتفاع رو دیدم ولی اون ارتفاعش رو اندازه میگرفت میخوام طول متن رو اندازه بگیرم
  10. بله من تست کردم روی اندروید 10 بخوبی هم کار میکنه
  11. چه خطایی میده؟؟؟؟؟؟؟ تا لاگ هاتون رو نذارید دوستان نمیتونن راهنماییتون کنن
  12. فرقی نداره همه اینکار ها رو برعکس انجام بدید. یه ساب درون سرویس ایجاد کنید و از اکتیویتی صداش بزنید
  13. بله درسته باید از متد کال ساب استفاده کنید برای اینکار یه ساب درست میکنید درون اکتیویتی که سیک بار موردنظر هست بصورت زیر Sub SetValue(Value as int) SeekBar1.Value = Value End sub ّبرای اینکه یک ساب رو از جای دیگه صدا بزنیم باید از دستور کال ساب استفاده کنیم. این رو توضیح بدم دو نوع کال ساب داریم یکی CallSub معمولی که اگر اشتباه نکنم برای صدا زدن ساب ها بین دو اکتیویتی هست یکی هم CallSubDelayed که برای صدا زدن ساب ها بین اکتیوتی و سرویس یا کلاس ، هرکدوم از اینها یک شماره 2 و 3 دارن که بدون شماره ها فقط ساب رو صدا میزنن و شماره داران میتونین باهاش مقدار دهی هم بکنید .. خب برای اینکه ساب مورد نظر رو از سرویس صدا بزنید برای اینکار باید از متد CallSubDelayed و چون یک مقدار هم میخواهیم بفرستیم از CallSubDelayed2 استفاده میکنیم بصورت زیر CallSubDelayed2(Main,"SetValue",15) اولین پارامتر اسم اکتیوتی، دومین اسم ساب درون دابل کوتیشن و سومین مقداری که میخواید بفرستید..
  14. سلام دوست عزیز درون همین کتابخونه متد AriaMarket پیاده شده کافیه همین کتابخونه ورژن 7 رو دانلود کنید بعد بریزید درون پوشه کتابخونه هاتون و تیک کتابخونه بزنید (تیک AriaLib رو بزنید)
  15. سلام. آقای شاهپیری اگر امکان داره یه سورس ساده که ایتم ها با xml لود میشن قرار بدید...
×
×
  • جدید...