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

AnswerCenter

مرکز پاسخگویی به سوالات برنامه نویسی

  • مرجع پاسخگویی
  • تولید آموزش
  • سفارش پروژه

درخواست سفارش پروژه

اطلاعیه

کاربر گرامی

به انجمن برنامه نویسی AnswerCenter.ir خوش آمدید

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


پرچمداران


مطالب محبوب

در حال نمایش مطالب دارای بیشترین امتیاز از زمان ۱۹/۰۲/۱۹ در همه بخش ها

  1. 6 امتیاز
    کتابخانه زیبا برای دادن امتیاز به برنامه ها دریافت کتابخانه pass : answercenter.ir
  2. 5 امتیاز
    ' 1/4 Dim cvs As Canvas cvs.Initialize(Activity) Dim cx = 60dip, cy = 60dip As Int Dim r As Int = 50dip Dim rt As Int = r + 10dip 'stroke width Dim p As Path p.Initialize(cx - rt, cy - rt) p.LineTo((cx + rt)/2, (cy - rt)/2) p.LineTo((cx + rt)/2, cy) p.LineTo((cx - rt)/2, cy) cvs.ClipPath(p) cvs.DrawCircle(cx, cy, r, Colors.Red, True, 10dip) cvs.RemoveClip Activity.Invalidate '2/4 Dim cvs As Canvas cvs.Initialize(Activity) Dim cx = 60dip, cy = 60dip As Int Dim r As Int = 50dip Dim rt As Int = r + 10dip 'stroke width Dim p As Path p.Initialize(cx - rt, cy - rt) p.LineTo(cx + rt, cy - rt) p.LineTo(cx + rt, cy) p.LineTo(cx - rt, cy) cvs.ClipPath(p) cvs.DrawCircle(cx, cy, r, Colors.Red, True, 10dip) cvs.RemoveClip Activity.Invalidate '3/4 Dim cvs As Canvas cvs.Initialize(Activity) Dim cx = 60dip, cy = 60dip As Int Dim r As Int = 50dip Dim rt As Int = r + 10dip 'stroke width Dim p As Path p.Initialize(cx - rt, cy - rt) p.LineTo(cx + rt, cy - rt) p.LineTo(cx + rt, cy) p.LineTo(cx + rt, cy*2) p.LineTo((cx + rt)/2, cy*2) p.LineTo((cx + rt)/2, cy) p.LineTo(cx - rt, cy) cvs.ClipPath(p) cvs.DrawCircle(cx, cy, r, Colors.Red, True, 10dip) cvs.RemoveClip Activity.Invalidate '4/4 Dim cvs As Canvas cvs.Initialize(Activity) Dim cx = 60dip, cy = 60dip As Int Dim r As Int = 50dip Dim rt As Int = r + 10dip 'stroke width cvs.DrawCircle(cx, cy, r, Colors.Red, True, 10dip) Activity.Invalidate
  3. 5 امتیاز
    بهترین و زیباترین کتابخانه برای پروگرس بیسیک شخصی سازی کامل پروگرس با استفاده از GRADIENT COLOR دریافت کتابخانه pass : answercenter.ir
  4. 4 امتیاز
    با سلام کتابخانه قدرتمند برای تشخیص ادرس ایمیل و تگ ها و منش و شماره تلفن و ادرس وب سایت با قابلیت های شخصی سازی کامل و ویژگی های یک لیبل دریافت کتابخانه pass : answercenter.ir
  5. 2 امتیاز
    Sub FindMaxNumber Dim I_List As List : I_List.Initialize : I_List.Clear I_List.AddAll(Array As Int( 10 , 15 , 15 , 15 , 20 , 20)) Dim I_MAP As Map : I_MAP.Initialize : I_MAP.Clear For Each num As Int In I_List If I_MAP.ContainsKey(num) Then Dim NumberCount As Int = I_MAP.Get(num) NumberCount = NumberCount + 1 I_MAP.Remove(num) I_MAP.Put(num ,NumberCount) Else I_MAP.Put(num ,1) End If Next Dim Number As Int = 0 Dim MaxNumber As Int = 0 For i = 0 To I_MAP.Size-1 Log($" Number : ${I_MAP.GetKeyAt(i)} Count : ${I_MAP.GetValueAt(i)} "$) If I_MAP.GetValueAt(i) >= MaxNumber Then Number = I_MAP.GetKeyAt(i) MaxNumber = I_MAP.GetValueAt(i) End If Next Log($" Number : ${Number} Max : ${MaxNumber} "$) End Sub از این بخش عدد و تعداد اعداد تکرار شده رو بردارید Log($" Number : ${Number} Max : ${MaxNumber} "$) تکه کد پیشنهادی من با دانش اندک ، شاید دوستان روش بهتری داشتن.
  6. 2 امتیاز
    سلام از دو تا افزونه می تونی استفاده کنی 1 - JSON API 2 - WordPress REST API نحوه ی استفادشم توضیح دادن. در حد هلو بپر تو گلو
  7. 2 امتیاز
  8. 2 امتیاز
    باسلام خدمت دوستان انجمن انسر سنتر با این کتابخانه Lottie که برای بیسک رپ شده میتونید پروژه های افترافکت رو بیارید تو بیسیک نه اینکه هر افکتی که اونجا میبنی بتونی تو بیسیک خودت ادیت کنی لینک کتابخانه لینک گیت هابش اینم توضیحات سازنده کتابخانه Lottie is a mobile library for Android and iOS that parses Adobe After Effects animations exported as json with Bodymovin and renders them natively on mobile! فایل کتابخانه Lotti
  9. 1 امتیاز
    اوه ... چناب سروان چطوری ؟؟ چه عکس خوبی شده این مشتی
  10. 1 امتیاز
    این خط رو اینجوری تغییر بده aria.writeBitmapToFile(job.GetBitmap,File.DirRootExternal,cut&".jpg",100)
  11. 1 امتیاز
    درخواست های http رو نمیشه با حلقه فرستاد و دریافت کرد بهترین راهکار اینه که زمانی که یکی succes شد از همون httputiels که داری لینک جدید را بفرستی (اینجوری درواقع یه حلقه داری که دونه دونه و پشت سرهم اجرا میشه )
  12. 1 امتیاز
    شما یه متغیر گلوبال int تعریف کن و پوزیشن کرزرتون رو در لحظه کلیک توی اون بریز زمانی که دالود کامل شد اون مقدار رو به عنوان پوزیشن کرزری که میخواید نام از اون گرفته شه قرار بده
  13. 1 امتیاز
    try ************ catch ************ end try در همه ساب ها بهتره ک استفاده بشه منم همین مشکل رو داشتم برای خودم کار میکرد ولی مایکت قبول نمیکرد میگفت فورس کلوز میده همه ساب های ماین رو تری کش کردم ok شد قبول کردن
  14. 1 امتیاز
    ** توضیحات تکمیلی اگر سوالی درباره کتابخانه دارید می تونید مطرح کنید تا جواب بدم، اما قبل از پرسیدن سوال حتما ویدئوی کتابخانه را ببینید کد و دیکد کردن متن ها، url و... با کلید 16 کارکتری که توسط شما انتخاب میشه انجام میگیره و برای سهولت کار ابزار کمکی ویندوز هم به پکیج اضافه شده
  15. 1 امتیاز
    سلام اگه میشه یه مثال از php که این با این مثال بالا ارتباط داشته باشه بزنید ممنون میشم
  16. 1 امتیاز
    سلام دوستان این هم یه سورس ساده اما بسیار کاربردی ! از عنوان معلومه چیکار میکنه! اما عکس هم قرار میدم! برای دانلود کلیلک کنید! تشکر فراموش نشه! منبع:www.sourcecodester.com
  17. 1 امتیاز
    تصویر : راست چین و تغییر فونت هم وجود دارد. دانلود
  18. 1 امتیاز
    این یه تکلیفه عزیز. اگه میخواین به مراحل عالی تو این زمینه برسین باید خودتونو عادت بدین به اینکه از هرچیزی که میخواین استفاده کنین حتما اول اونو کالبد شکافی کنین
  19. 1 امتیاز
    سلام دوستان. نمیدونم از کجا شروع کنم... میدونم خیلیا این مشکل رو دارن ، شاید دیده باشید وقتی یه کتاب میسازید به فرض مثلا یه متنی رو توی لیبل قرار میدید و اون لیبل رو تو اسکرول میذارید ، باید هی مقدار Height اسکرول ویو رو کمو زیاد کنید تا به اون نتیجه برسید. بعد درضمن ، ممکنه بتونید همونجا عرض اسکرول ویو رو طوری قرار بدید که همه ی متن توش جا بشه ، اما اگه وقتی سایز متن لیبل رو میبرید بالا چی؟؟؟ وقتی تو گوشی هایی با سایز کوچیک تر برنامه اجرا بشه چی؟؟؟ خب مشخصه که یا متن لیبل همش نشون داده نمیشه و یا اسکرول زیادی فضای خالی ایجاد میکنه که خیلی بد میشه. یه ماژولی هم استاد خلیلی در این مورد گذاشته بودن که میومد اونقدر سایز متن لیبل رو کوچیک میکرد تا اینکه توی اسکرول ویو تمام متن جا بشه. اما اینبار سایز اسکرول ویو اونقدر بزرگ میشه که تمام متن لیبل توش جای بگیره. :حالا من اومدم با یه سری چیزا این کتابخونه رو ساختم: خب میریم سراغ کتابخانه و آموزش که خیلی خیلی سادست و فقط با یک نیم خط کد تنظیم میشه. ما اومدیم تو این سورس که پیوست شده: یه لایوت ایجاد کردیم و توش اسکرول ویو قرار دادیم. و یک لیبل هم تعریف کردیم که متن طولانی مون رو اونجا قرار بدیم و ادش کنیم به اسکرول ویو ، که به این صورت تعریف شدن: Sub Globals Dim label1 As Label Private ScrollView1 As ScrollView End Sub خب ، حالا اومدیم تو رویداد activity_Create متن رو دادیم به لیبل و بعد ادش کردیم توی اسکرول و بعد با کتابخانه AutoSizeScroll تنظیمش کردیم. که من کدهای اکتیویتی کریت رو قرار میدم و خط به خط توضیح میدم: Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("main") label1.Initialize("label1") label1.Text=File.ReadString(File.DirAssets,"matn.txt") label1.TextColor=Colors.Black label1.TextSize=16 label1.Gravity=Gravity.CENTER ScrollView1.Panel.AddView(label1,0,0,100%x,100%y) Dim s As AutoSizeScroll s.set(label1,ScrollView1) End Sub 1.لایوتی که ساختیم لود کردیم تو اکتیویتی 2.لیبل رو initizile کردیم ، چون دستی ادش کردیم. 3.یه فایل تکست که برای تست ساختم فراخوانی کردم و دادمش به لیبل 4. یه سری فونت و رنگ دادم به لیبل که هیچی....... ......... 7.لیبل رو اد کردیم به اسکرول ویو(که همتون میدونید) 8.کتابخانه autoSizeScroll رو تعریف کردیم و اسم لیبل و اسکرول ویو خودمو دادم بهش تا واسم تنظیمش کنه. تمام! دیگه فرقی نمیکنه که متن از فایل تکست باشه ف دیتابیس باشه و... حالا هرچقد میخواین متن لیبل رو سایزشو زیاد کنید...... ، و یا متنش رو زیاد کنید. هیچ نیازی به بالا بردن عرض اسکرول نیست و در تمام گوشی ها تنظیم میشه. خسته شدم اینقد نوشتم :::دانلود سورس و کتابخانه::: توجه: بعد از هر عملیات تغییر سایز و زیاد کردن متن این تکه کد باید قرار بگیره تا درستش کنه. مثلا بعد از زیاد کردن سایز توسط سیک بار باید این کد هم بعد از بزرگ کردن متن باید بنویسید: Dim s As AutoSizeScroll s.set(label1,ScrollView1) End Sub
  20. 1 امتیاز
    درود ببینید بهترین راه اینه که شروع کنید و کار کردن با دیتابیس رو یاد بگیرید چطور اطلاعات رو از دیتابیس بخونید و چطوری کوئری اجرا کنید اینجوری هر کوئری از جمله UPDATE و SELECT و DELETE و هر چیزی که دوست داشته باشید رو به هر نحوی اجرا میکنید آموزش های کار با دیتابیس آفلاین به صورت رایگان زیاد توی انجمن هستش هم به صورت مولتی پنل و هم به صورت لیست ویو... همچنین آموزش جامع جست و جو در دیتابیس آنلاین که انواع روش های جست و جو رو توش توضیح دادیم که ویژه کسایی هست که میخوان به صورت تصویری ببین توی فروشگاه قرار داره به صورت رایگان هم مثلا این تاپیک کاملا به جواب رسیده برای جست و جو از طریق دیتابیس :
  21. 1 امتیاز
    سلام 1. چون هر دو کتابخونه از یک منبع استفاده میکنند این خط رو از xml این کتابخونه پاک کنید درست میشه اخرین خطهای xml کتابخونه هست <dependsOn>android-support-design</dependsOn> 2.میتونید به برنامه rtl بدید اگر از منابع استفاده کرده باشه راست چین میشه وگرنه از داخل ریسورس ها میتونید راست چین کنید 3.سایز فونت رو باید خودتون محاسبه کنید و بدید این مشکل رو کتابخونه ی دیزاین ساپورت هم داره باید متناسب با سایز لایوت یا اکتیویتی سایز سایز فونت رو بدید 4. برای این کتابخونه هم همون کار اول رو کنید . یا علی موفق باشد .
  22. 1 امتیاز
    با سلام تو این آموزش ما کوئری رو مستقیم از داخل برنامه میفرستیم به سرور و اطلاعات رو به صورت جیسون از سرور میگیریم تو این روش دیگه نیازی به اسپلیت کردن نیست در ضمن شما هر کوئری رو میتونید بفرستید ما اینجا فقط از select استفاده کردیم ایشالا که مفید باشه لینک http://s6.picofile.com/file/8251980400/server.rar.html پسورد: answercenter.ir
  23. 1 امتیاز
    با عرض سلام و احترام خدمت همه دوستان عزیز تو خیلی از تاپیک ها دیده شده که خیلی از دوستان این مشکل رو دارند که چرا وقتی یک سری آیتم های که داخل اسکرول ویو پشت سر هم ادد میکنم و وقتی میخوام اون ایتم ها رو پاک کنیم ایتم ها پاک میشوند ولی فضای زیادی به اندازه اون ایتم های پاک شده باقی میمونه و آیتم های بعدی که لود میکنم بعد از فضای اون ایتم های پاک شده قرار میگیره و یا این مشکل بیشتر در هنگام سرچ کردن درمولتی پنل اتفاق میفته که ایتم ها بعد از هر بار سرچ کردن به صورت تکرار شده پشت سرم هم قرار میگیرند که این خیلی بده... بنده تو خیلی از تاپیک ها یکی از راهکارهاشو قرار دادم و گفتم بد نیست تو این بخش به صورت آموزش متنی به طور خلاصه قرار بدم تو این آموزش بنده با مثال سرچ کردن در مولتی پنل این مشکل رو برطرف میکنم فرض بر این میگیریم که کار با مولتی پنل رو بلدید و اگر کمی و کاستی داشت به بزرگی خودتون ببخشید. خب اول میام متغییر هامون رو تعریف میکنم. Sub Process_Globals Dim sql1 As SQL Dim cursor1 As Cursor End Sub Sub Globals Private ScrollView1 As ScrollView Private Label1 As Label Dim stop As Int = 1%y Private EditText1 As EditText End Sub از متغییرهای sql و cursor برای استفاده از دیتابیس و متغییرهای ScrollView1 و stop برای ساخت مولتی پنل و متغییر label برای نمایش مقدار گرفته شده از دیتابیس و متغییرEditText1 برای سرچ در مولتی پنل استفاد میکنیم. در بخش Activity_Create مولتی پنل رو میسازیم. Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("scv") If File.Exists(File.DirInternal,"porya.db") = False Then File.Copy(File.DirAssets,"porya.db",File.DirInternal,"porya.db") End If If sql1.IsInitialized = False Then sql1.Initialize(File.DirInternal,"porya.db",True) End If cursor1 = sql1.ExecQuery("SELECT * FROM porya") For i = 0 To cursor1.RowCount-1 cursor1.Position = i Dim p As Panel p.Initialize("p") ScrollView1.Panel.AddView(p,0,stop,88.2%x,100%y) stop = stop + 16%y p.LoadLayout("multi") Label1.Text = cursor1.GetString("name") Label1.TextSize = 23 Label1.Gravity = Gravity.CENTER Label1.TextColor = Colors.Black ScrollView1.Panel.Height = stop Next End Sub و بعد با استفاده ازEditText1 و رویداد (Sub EditText1_TextChanged (Old As String, New As String میام سرچ رو انجام میدیم. Sub EditText1_TextChanged (Old As String, New As String) ScrollView1.Panel.RemoveAllViews stop = ScrollView1.Height - ScrollView1.Height ScrollView1.ScrollPosition = stop cursor1 = sql1.ExecQuery("SELECT * FROM porya WHERE name LIKE '%" & EditText1.Text & "%'") For i = 0 To cursor1.RowCount-1 cursor1.Position = i Dim p As Panel p.Initialize("p") ScrollView1.Panel.AddView(p,0,stop,88.2%x,100%y) stop = stop + 16%y p.LoadLayout("multi") Label1.Text = cursor1.GetString("name") Label1.TextSize = 23 Label1.Gravity = Gravity.CENTER Label1.TextColor = Colors.Black ScrollView1.Panel.Height = stop Next End Sub به این چند خط کد زیر دقت کنید این کدها دقیقا اون کار اصلی یعنی همون clear کردن ایتم ها رو انجام میده اگه این چند خط کد رو بردارید می بینید که با هربار سرچ ایتم ها به صورت تکرار و پشت سرم هم قرار میگیرند اما با استفاده از این چند خط کد میتوانید این مشکل رو برطرف کنید این کدها میاد ایتم های قبلی رو پاک میکنه و شروع ایتم های بعدی رو با استفاده از متغییر top به جای همون ایتم های قبلی که پاک کردیم قرار میده با کمی خلاقیت میتونید این کدها رو در جاهای که مشکلاتی که پیش تر عرض شد وجود داشت استفاده کنید. ScrollView1.Panel.RemoveAllViews stop = ScrollView1.Height - ScrollView1.Height ScrollView1.ScrollPosition = stop خیلی ممنون که بنده رو همراهی کردید امیدوارم از این اموزش راضی و براتون مفید بوده باشه. موفق باشید.
  24. 1 امتیاز
    سلام و خسته نباشید خدمت کاربران عزیز خب توسط این کتابخانه (ViewSetting) میتونید از متد های زیر استفاده کنید : InsertImageIntoEditText MeasureMultilineTextHeight setCursorDrawableColor کار کردن با کتابخانه خیلی ساده است و روش کار از متد ها توی خود کتابخانه توضیح داده شده بر فرض مثال برای عوض کردن رنگ Cursor در EditText : Dim vs As ViewSetting vs.setCursorDrawableColor(EditText1,Colors.Blue) پخش کتابخانه برای اولین بار در سایت های فارسیه + به صورت رایگان موفق و پیروز باشید ViewString.zip
  25. 1 امتیاز
    سلام خدمت دوستان عزیز. داشتم توی سایت مرجع گشت و گذار میزدم که به این سورس کد رسیدم. شما میتونید از طریق Function ای که توی این سورس هست ظاهر ابزارهاتون رو تغییر بدید. مثلا میتونید CheckBox رو شبیه به Button کنید درحالی که Check اش رو هم داره که واقعا من خوشم اومد. عکس نمایانگر توضیح بیشتر هست. سورس پیوست شد پسورد: basic4android.org AddBorder.rar
×