رفتن به مطلب
برای استفاده از انجمن و عضـویت کلیک کنید.

sbr

گروه دانشجو
  • تعداد ارسال ها

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

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

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

15

درباره sbr

  • درجه
    برنامه نویس

پیشفرض

  • وضعیت فردی :
    مجرد
  • جنسیت :
    اقا
  • محل تولد :
    سربندر
  • محل سکونت :
    سربندر
  • مدل گوشی :
    .

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

467 بازدید کننده نمایه
  1. ایجاد خط افقی در لایوت

    سلام دوست عزیز این عکسی که شما گزاشتید مربوط به MsmaterialDrawer هست که خودش قابلیت افزودن بخش (همون خط تقسیم کننده ) رو داره اما اگه میخواید خط اضافه کنید اینطوری عمل کنید Dim canvas As Canvas canvas.DrawLine((x1,y1,x2,y2,Colors.Transparent,10) نقطه x1 , y1 ابتدای خط x2 , y2 نقطه انتهای خط هستند و دو المان دیگه رنگ و ضخامت خط هستند
  2. دبل کلیک Button

    اینطوری برای انجام کار مورد نظرتون باید دوبار روی باتن کلیک بشه دقت کن که اونجا که نوشتم n=0 حتما باید در انتها باشه و در داخل شرط باشه Dim n as int = 0 Sub Button_Click n = n + 1 If n = 2 Then 'کاری که میخوای انجام بدی n = 0 End If End Sub
  3. ارور در ذخیره سازی

    این دسترسی رو به manifest اضفه کنید ببینید مشکلتون حل میشه یا نه AddPermission(android.permission.READ_EXTERNAL_STORAGE)
  4. مشکل Force Close

    سلام دوست عزیز از try / catch استفاده کنید Try کد هایی مورد نظر شما Catch Log("Error") کد هایی که در صورت درست عمل نکردن دستور باید اجرا شوند End Try
  5. اگه مشکلتون فقط دکمه شناور هست خب از کتابخونه bcMaterial استفاده کنید که دکمه شناور هم داره
  6. بیاید و توی بیسیک یه باتن تعریف کنید و توی Activity creat بعد از لود لایه xml بیاید و باتن رو به همون چیزی که میخواید نسبت بدید توی get view باید ای دی ویوو مورد نظر رو بدی بعدش رویداد کلیکش میشه رویداد کلیک همون btn
  7. سلام دوست عزیز خب اول این کد ها رو به منیفست اضافه کنید SetActivityAttribute("Main", android:label ,"@string/AppName") SetActivityAttribute("Main", android:configChanges , "locale") خب حالا برید به مسیر زیر در پروژه تون \Objects\res و توی پوشه res به ازای هر زبونی که میخواید یه پوشه باید بسازید توی هر پوشه هم یه فایل xml بساز و این مقادیزو توش قرار بدید برای زبان فارسی من اسم برنامم رو گزاشتم سربندر <?xml version="1.0" encoding="utf-8"?> <resources> <string name = "AppName">سربندر</string> </resources> و برای زبان انگلیسی اسم برنامم رو گزاشتم sarbandar <?xml version="1.0" encoding="utf-8"?> <resources> <string name = "AppName">sarbandar</string> </resources> بعدش فایلا با نام strings.xml و با کدگزاری utf-8 ذخیره کنید خب در نهایت فایل ها رو حتما حتما حتما Read Only کن تا پاک نشن هر دو تا فایل رو Read only کن خب تمومه برو تستش کن اینم یه پروژه واسه تست change app lable
  8. اینم یه راه Dim et As EditText et.InputType = et.INPUT_TYPE_PHONE Sub et_TextChanged (Old As String, New As String) If New.Length > 11 Then New = Old If New.Length >= 2 Then If New.SubString2(0,1) = "09" Then Else ToastMessageShow("شماره باید با 09 شروع شود",True) End If End If End Sub
  9. دیتابیس

    سلام از عنوان پیداست که میخواید متن رو از دیتابیس به لیست ویوو اضافه کنید پس اول باید متن رو از دیتابیس فراخونی کنید و بعدش به لیست ویوو اضافه کنید برای فراخونی از دیتابیس پیشنهاد میکنم این آموزشا رو ببینید سری آموزش های دیتابیس از بخش آموزش های تصویری برای اضافه کردن متن به لیست ویوو همم اینجوری اضاف کنید listview.AddSingleLine("")
  10. استفاده از دستور for

    فکر نمیکنم اینطوری که میگید بشه ولی یه نگاه به اموزش مولتی پنل بندازید شاید چیزی باشه که میخواید
  11. ارور هنگام کامپایل

    توی ارور میگه محل ذخیره پروژه توی مسیری با مدودیت هست پروژه تون رو کلا توی یه درایو دیگه غیر از درایو c ذخیره کنید ببینید بازم مشکل داره
  12. ضریب عدد

    خب دقیقا همین ککه خودتون گفتید هست دیگه الات توی اون کد که شما نوشتی میاد و تکتست باتن1 رو برابر حاصل ضرب اینت1 در 7 میکنه سعی کن از پرانتز استفاده کنی button1.text = (int1 * 7)
  13. سربازم 

    اینقدر وقت کم دارم که تا میام بیسیک رو باز کنم خوابم میبره

    1. شایان آباد

      شایان آباد

      خسته نباشی رزمنده ! ♥

    2. علی فراهی

      علی فراهی

      خب بیدار شو:joy:♥

  14. جستجو دیتابیس انلاین

    اون دوستی که بهتون گفته اطلاعات رو بریزید توی یه لیست و لیست رو سرچ کنید منظورش اینجوری بوده که شما اطلاعات رو بریز توی لیست و با یه حلقه بیا و یکی یکی آیتم های لیست رو چک کن و اگر آیتم مورد نظر رو پیدا کردی هر کاری خواستی باهاش بکن اینطوری For i = 0 To list.Size -1 If list.Get(i) = EditText.text Then Msgbox(list.Get(i) ,"Find it !! ") End If Next
×