رفتن به مطلب

خوش آمدید

مهمان گرامی به انجمن کویک لرن خوش آمدی ، برای استفاده از تمامی امکانات در انجمن عضو شوید.


sagmill

عضو عادی
  • تعداد ارسال ها

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

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

تمامی ارسال های sagmill

  1. sagmill

    کتابخانه T8Textsize (آپدیت جدید اسمارت استرینگ)

    سلام آقا آرمین این کتابخانه و کتابخانه Smart با ادیت تکست مشکل داره و نمی تونه کلمه رو در داخل ادیت تکست فیت کنه. این مشکل از منه یا سایر دوستان هم همچین مشکلی رو باهاش دارند؟
  2. sagmill

    بدست آوردن تعداد فایل های یک فولدر

    رجوع شود به پاسخ Erel در این تایپیک https://www.b4x.com/android/forum/threads/count-the-number-of-files.32604/ Dim c As Int = 0 For Each f As String In File.ListFiles(File.DirRootExternal) If f.EndsWith(".jpg") Then c = c + 1 Next Log(c)
  3. sagmill

    مشکل ارسال اس ام اس با کتابخانه phone

    سلام مجدد دوستان مشکل فوق حل شد. (مشکل از برنامه من بود و الا دستور send2 می تونه هر نوع استرینگی رو ارسال کنه - در واقع چون تعداد کاراکتر من بیش از 72 تا بود به این علت خطا ایجاد می شد) راه حل اون هم در سایت B4X نوشته شده و یکی از دوستان در تایپیکی با نام "عدم دریافت پیام تایید Sms در هنگام استفاده از تابع ارسال اس ام اس چند بخشی" اونو آورده اند. فقط یک خواهش دیگه از دوستان برای اینکه موضوع به همین تایپیک مربوطه و نمی خوام تایپیک جدید براش بسازم: در سایت B4X برای ارسال sms بدون دیده شدن در inbox توسط Erel این دستور پیشنهاد شده. از دوستان خواهش می شه اونو تشریح کنن ببینیم این دستور چکار می کنه ضمن اینکه ظاهرا سینتکس اون هم مشکل داره: دستور: Dim cr As ContentResolver"cr") Dim u As Uriu.Parse("content://sms") Log(cr.Delete(u, "_id = ?", Array As String(<id>))) 'should print 1 لینک: https://www.b4x.com/android/forum/threads/send-sms-without-appearing-in-sent-messages-of-the-device.38700/#content
  4. سلام بر دوستان و اساتید یک سوال دستور send2 برای ارسال SMS در کتابخانه phone قابلیت ارسال متن فارسی رو داره یا مشکل از برنامه منه که نمیتونه متن فارسی رو send کنه؟ Dim phonesms1 As PhoneSms "سلام" = Dim SMStext As String phonesms1.Send2("09100000000", SMStext,True,True)
  5. سلام مجدد به دوستان خودم راه حل موقتی برای این مشکلم پیدا کردم که توضیح خواهم داد تا اگر احیانا کسی با همچین مشکلی روبرو بود موقتا از این روش استفاده بکنه تا انشالله بعدا دوستان راهنمایی های بیشتری انجام بدن. من کلا کتابخانه animation plus رو کنار گذاشتم و به جای اون از یک تایمر استفاده کردم. یعنی اومدم متحرک سازی رو خودم ایجاد کردم. اما در این وسط یه مشکل کوچک هست. و اون اینه که قبل از رسم خط در زمان بعدی، باید خط قبلی پاک بشه. Canvas هیچ متدی برای پاک کردن ترسیماتش نداره و از اونجایی که ترسیمات Canvas آبجکت نیستن پس با دستوراتی مثل: Panel1.RemoveAllViews هم نمیشه اونا رو پاک کرد. من برای پاک کردن از یه ترفند دیگه استفاده کردم: (canvas1.DrawColor(Colors.Whit این دستور میاد کل پنل را با یه رنگ پر میکنه (همون پس زمینه) در نتیجه ترسیمات به ظاهر پاک میشن.
  6. با سلام دوستان سوالی داشتم و در صورت امکان کمکم کنید: من با استفاده از canvas چندین خط و دایره و ... را بر روی یک panel رسم کردم و قصد دارم این خطوط و دایره رو بچرخونم. اومدم از کتابخانه Animation Plus استفاده کردم. اما چون ترسیمات canvas آبجکت نیستند درنتیجه نمیشه اون ها رو به صورت مستقیم با Animation Plus چرخوند. برای چرخوندن میشه از panel استفاده کرد اما دو مشکل هست اولا خطوط، حرکت مستقل دارن که اونوقت باید برای هر خط یک panel بسازم که محاسبات رو زیاد می کنه دوم این خطوط ممکنه رو هم بیفتن که خیلی کار رو نافرم می کنه. دوستان برای حرکت دادن این ترسیمات چه راه حلی هست؟ آیا کتابخونه ای برای کارهایی مثل این سراغ دارید؟
  7. sagmill

    ساخت کالکشن

    ممنونم استاد.
  8. sagmill

    ساخت کالکشن

    سلام دوستان کسی اینجا می دونه توی b4a چطور میشه ارایه اشیا ساخت؟ مثل vb.net که ما می تونیم از new collection استفاده کنیم. تو سایت ها گشتم اما فقط آرایه استرینگ بود. من می خوام یک کالکشنی از تکست باکس (ادیت تکست) بسازم و چندین شی رو داخلش بزارم (اینا توی دیزانر هم هست) بعد یه حلقه رو براش اجرا کنم که اگر فلان متن در هر کدوم از این تکست باکس ها نوشته شده باشه بره فلان دستور رو اجرا کنه.
×