اطلاعیه

کاربر گرامی

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

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


mehran3d

کاربر عادی
  • تعداد ارسال ها

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

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

  • روز های برد

    2

آخرین بار برد mehran3d در بهمن 18 2017

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

درباره mehran3d

  • درجه
    کاربر حرفه ای
  • تاریخ تولد 07/02/1367

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

344 بازدید کننده نمایه
  1. لود کردن آهنگ

    ممنونم این آدرس برابر همین دستوره؟ File.Combine(dir,"filename") همون full path of file?
  2. ذخیره کردن متن ادیت تکست در لیست ویو

    سیوش باید کنی خب بعد از سیو شدن یه جای یسیوش کن اول یه فایل براش در نظر بگیر اول برنامت بنویس If File.Exists(File.DirInternal,"save.txt") Then Dim templist As List templist=File.ReadList(File.DirInternal,"save.txt") For i=0 To templist.Size-1 listview1.AddSingleLine(templist.Get(i)) Next End If چک میکنه اگه فایل save.txt وجود داشت رشته هایی که توش ذخیره شده رو بخونه بزاره توی لیست ویو اگه فایل نبود که هیچ دفعه اول طبیعتا نیست(باید برنامه رو پاک کنی و دوباره نصب چون اگه آپدیت کنی لیستای قبلی میمونه) برای ذخیرشون خیلی راحت میتونی ذخیرشون کنی بعدش جایی که متن رو کپی کردی توی ادیت تکست اینو مینویسی dim templist as list templist.initialize templist.Clear For p=0 To listview.Size-1 دونه دونه آیتما رو از لیست ویو میخونه توی یه لیست میزاره templist.Add(listview.GetItem(p)) Next لیست رو که از لیست ویو خونده توی یه فایل save.txt میریزه که بعدا بتونه بخوندش( کدشو یکم بالاتر گفتم) File.WriteList(File.DirInternal,"save.txt",templist) روشهای دیگه ای هم هست این تقریبا ساده ترشونه
  3. لود کردن آهنگ

    ممنون چطور به مدیا پلیر بفهمونمش؟ Mediaplayer.load(file.dirrootexternal,"example. Mp3") ??
  4. لود کردن آهنگ

    سلام دوستان من با این کد آدرس فایلی رو از دستگاه میگیرم Sub cc_Result (Success As Boolean, Dir As String, FileName As String) If Success Then LogColor(FileName,Colors.Green) LogColor(Dir,Colors.Blue) LogColor(File.Combine(Dir,""),Colors.Red) End If End Sub اگه فایل رو از روت توی امولاتور بگیرم اینو برگشت میده /storage/emulated/0/a174.mp3 به رنگ سبز اگه فایل رو از پوشه دانلود انتخاب کنم اینو لاگ میکنه content://media/external/file/1007 به رنگ سبز ContentDir آبی ContentDir قرمز چیکار باید بکنم که درست بتونم توی پلیر لودش کنم و صد البته نیاز دارم که بعدا بصورت (file.dirrootexternal,"nameoffile.mp3) استفادش کنم
  5. توابع

    این تابع دو عدد میگیره و دو عدد برمیگردونه اما در اصل دو عدد میگیره و یک آرایه دو عنصری برمی گردونه اولی حاصلضرب دو عدد ورودی و دومین حاصلجمع دو عدد گرفته شده int test ( int a,int b) { int temp[2]; temp[0]=a*b; temp[1]=a+b; return temp; } اینجوری باید فراخوانی کنی int first=3; inf sec=4; int result[]; result=test(first,sec) printf("sum result is ..%d",result[0]); printf("multiple result is ..%d /n",result[1]); اگه اشتباه نکنم برای بیش از دوتا int temp[tedad] va int result[tedad] print resul[0] print resul[1] print resul[2] print resul[...] print resul[tedad]
  6. مشکل برنامه در گوشی شیامی نوت 4

    من رد می ۴ دارم میخا apk بده یه تست بگیرم
  7. چرا برنامه های در حال اجرا در پس زمینه بسته میشوند؟

    والا بسته به نوع گوشی و ویرایش اندروید گوشی(نسخه ای از اندروید که شرکتا تغییرش میدن) و رام و ... داره بهتره توی فروم های مخصوص گوشیت بگردی دنبالش
  8. سلام دوستان توی دیتا بیس چند جدول دارم Id,people,name,last name میخام اینجوری خروجی xml بم بده <items> <item> <id>10</id> <people>man</people> <name>ali</name> <lastname>alavi</lastname> </item> <item> <id>11</id> <people>man</people> <name>ahmad</name> <lastname>ahmadi</lastname> </item> </items> یعنی کوئری id بزرگتر از 9 یه کمکی میدید؟
  9. ساخت snippet زیبا برای GoogleMap Fragment

    آقا بلاخره راهشو فهمیدم اول گوگل مپ و گوگل مپ اکستراز رو که ادد کردی بعدش Dim gx As GoogleMapsExtras Dim liste As OnInfoWindowClickListener Dim iva As InfoWindowAdapter Dim marka As MarkerOptions تا اینجا اوکی؟ مپ که لود شد اینو میزنی liste.Initialize("liste") gx.SetOnInfoWindowClickListener(gmap,liste) iva.Initialize("iva") gx.SetInfoWindowAdapter(gmap,iva) اوکی؟ بعدش مارکر رو ادد میکنی marka.Initialize marka.Position2(33.388018, 52.710411) title midi marka.Title("title") snippest midi marka.Snippet("snippest") icon midi Dim bsf As BitmapDescriptorFactory marka.Icon(bsf.DefaultMarker2(bsf.HUE_RED)) به مپ اضافه میکنی gx.AddMarker(gmap,marka) اوکی؟؟ حالا این رویداد ها رو هم اوکی میکنی Sub mFragment_MarkerClick (SelectedMarker As Marker) As Boolean 'Return True to consume the click این مپه SelectedMarker.InfoWindowShown=True Return True End Sub Sub liste_Click(Marker1 As Marker) اینم همون OnInfoWindowClickListener هستش که وقتی روی اون پنجره کلیک شد یه کاری کنه '''some thing to do End Sub و در آخر Sub iva_GetInfoContents(Marker1 As Marker) As View ' InfoWindowLabel.Text=Marker1.Title&CRLF&Marker1.Snippet ' Return InfoWindowLabel Dim cd As ColorDrawable cd.Initialize(Colors.Transparent,5) Dim infopan As Panel infopan.Initialize("") infopan.Background=cd infopan.SetLayout(5%x,40%y,70%x,30%y) Dim infomaglbl As Label Dim infosummury As Label infomaglbl.Initialize("") infosummury.Initialize("") ' infopan.AddView(infomaglbl,0,0,50,20) infopan.AddView(infomaglbl,0,0,70%x,10%y) infopan.AddView(infosummury,0,10%y,70%x,20%y) infomaglbl.Text=Marker1.Title infomaglbl.Color=Colors.White infomaglbl.TextColor=Colors.Black infomaglbl.textsize=21 infosummury.Text=Marker1.Snippet infosummury.Color=Colors.White infosummury.TextColor=Colors.Black ' Dim InfoWindowLabel As Label ' InfoWindowLabel.Initialize("") ' InfoWindowLabel.Color=Colors.White ' InfoWindowLabel.TextColor=Colors.Black ' ' InfoWindowLabel.Text=Marker1.Title&CRLF&Marker1.Snippet Return infopan End Sub توی این کد که چیزیه که شما میخواین من یه پنل ساختم توتا لیبل بهش اضافه کردم بعدش تایتل و اسنیپست که به مارکرداده بودیم رو بهشون اضافه کردم شما میتونید به جای دو لیبل یه لیبل و ایمیج بزارید یا اصلا یه لایه توی اون پنل لود کنید
  10. مشکل در خواندن لیستی از مپ از فایل

    خوب پیدا کردم برای ذخیره و خوندن یک لیست از objects (مثلا مپ و بیت مچ یا.....) باید از کتابخونه randomaccessfile استفاده کنید(کنم؟!) که کد این شکل میشه Dim ras As RandomAccessFile ras.Initialize(File.DirInternal,"list.dat",False) ras.WriteObject(list,True,0) ras.Close list.Clear ras.Initialize(File.DirInternal,"list.dat",False) list=ras.ReadObject(0) ras.Close به جای File.WriteList(File.DirInternal,"list.txt",list) list.Clear list=File.ReadList(File.DirInternal,"list.txt")
  11. سلام و خسته نباشید من یه لیست از مپ ها دارم که در حالت عادی میتونم راحت مپ ها رو از لیست بخونم اما وقتی لیست رو توی فایل با دستور file.writelist ذخیره میکنم و با دستور file.readlist میخونمش نمیتونمم مپ ها رو بخونم نمونه کد و ارور رو ملاحظه کنید Sub Process_Globals Dim list As List Dim map,map2 As Map End Sub Sub Globals End Sub Sub Activity_Create(FirstTime As Boolean) list.Initialize map.Initialize map.Put("keh1","val1") map.Put("keh2","val2") map.Put("keh3","val3") map.Put("keh4","val4") map2.Initialize map2.Put("keh1","val1") map2.Put("keh2","val2") map2.Put("keh3","val3") map2.Put("keh4","val4") list.Add(map) list.Add(map2) File.WriteList(File.DirInternal,"list.txt",list) list.Clear list=File.ReadList(File.DirInternal,"list.txt") For i=0 To list.Size-1 Dim tempmap As Map map=list.Get(i) Log(map.Get("keh1")) Log(map.Get("keh2")) Log(map.Get("keh3")) Log(map.Get("keh4")) Next End Sub خروجی در لاگ بدون اینکه لیست رو توی فایل ذخیره کنم و بخونم ((( یعنی با حذف File.WriteList(File.DirInternal,"list.txt",list) list.Clear list=File.ReadList(File.DirInternal,"list.txt") ))))) val1 val2 val3 val4 val1 val2 val3 val4 ارور در صورتی که لیست رو توی یه فایل ذخیره کنم بعد از فایل بخونم یعنی با استفاده از File.WriteList(File.DirInternal,"list.txt",list) list.Clear list=File.ReadList(File.DirInternal,"list.txt") java.lang.ClassCastException: java.lang.String cannot be cast to anywheresoftware.b4a.objects.collections.Map$MyMap at test.list.main._activity_create(main.java:378) at java.lang.reflect.Method.invoke(Native Method) at java.lang.reflect.Method.invoke(Method.java:372) at anywheresoftware.b4a.BA.raiseEvent2(BA.java:186) at test.list.main.afterFirstLayout(main.java:102) at test.list.main.access$000(main.java:17) at test.list.main$WaitForLayout.run(main.java:80) at android.os.Handler.handleCallback(Handler.java:739) at android.os.Handler.dispatchMessage(Handler.java:95) at android.os.Looper.loop(Looper.java:135) at android.app.ActivityThread.main(ActivityThread.java:5254) at java.lang.reflect.Method.invoke(Native Method) at java.lang.reflect.Method.invoke(Method.java:372) at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:903) at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:698) نیاز دارم به ذخیره مپ ها در لیست که دیگه از دیتا بیس استفاده نکنم
  12. لیست ویو قدرتمند و بسیار سریع AriaListView

    آقا من ویدیو های آموزش لیست ویو ر گم کردم توی فروشگاه هم اینشکلی برام میاد http://s9.picofile.com/file/8312189284/ariaerror.png
  13. ارسال sos

    توی خود پوشه هستش پوشه فایل ها
  14. ارسال sos

    JHSflashMorse
  15. ارسال sos

    ارسال sos به کجا؟ Sos اگه همین sos هستش که من میگم خوب این sos همون کمک به کد مرسه. این ... --- ... مثلا تبدیل حروف به کد مرس؟ Sos با چراغ قوه؟