اطلاعیه

کاربر گرامی

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

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


mohammade79

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

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

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

درباره mohammade79

  • درجه
    کاربر رو به رشد
  • تاریخ تولد 02/17/1994

روش های تماس

  • آدرس سایت
    http://appdroids.ir
  • یاهو
    google.iran79@yahoo.com

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

  • بیوگرافی
    دانشجوی مکانیک
  • محل زندگی
    کرج
  • محل تولد
    کرج
  • علایق
    برنامه نویسی
  • شغل
    برنامه نویسی اندروید و ای او اس
  • علاقه مندی ها
    https://cafebazaar.ir/search/?q=appdroids&l=fa
  1. آموزش تصویری جست و جو در دیتابیس آنلاین

    سورس جست و جو در دیتابیس آنلاین.zip چجوری این دوتا سینک میشن ؟ میشه راهنمایی کنید>؟
  2. آموزش تصویری جست و جو در دیتابیس آنلاین

    اقا خیلی ممنون ولی یه سوال داشتم بجای اون فیلد های پایین چی باید بزنم ؟ و اینکه ایشالله هر چی از خدا میخوای بده بهت خیلی گیر بود کارم
  3. جستجو در دیتابیس آنلاین

    اقا دقیقا منم همین مشکل رو دارم از فروشگاه هم خریدم ولی خرابه منسوخ شده کد پی اچ پیش
  4. آموزش تصویری جست و جو در دیتابیس آنلاین

    میشه لطف کنید این کد رو درست کنید شما برامون خیلی نیاز دارم ممنون
  5. سلام من سورس فروشگاه رو تهیه کردم هر کاری کردم نتونستم اطلاعاترو لود کنم حس میکنم مشکل از پی اچ پیه لطفا یکی رسیدگی کنه مشکل پولش نیستا ولی من اعتماد میکنم به این اموزش ک میخرم
  6. چگونه اسلایدر عکس با دیتابیس آنلاین بسازیم؟

    من فراخوانی رو بهت یاد میدم ولی قبلش باید ببینم اسلایدرت کدش چه مدلیه شما بذار کدو من برات بزنم فراخوانی عکس رو با imgdller
  7. چگونه اسلایدر عکس با دیتابیس آنلاین بسازیم؟

    منم همین مشکل رو دارم نمونه اسلایدر انلاین هست داخل انجمن ولی باگ خالصه
  8. اسلایدر عکس ( Image Slider )

    شما نتیجه گرفتی؟ کسی بلد نیست؟
  9. گرفتن فیلد سوم از لیست با get

    خیلی ممنون ولی اخه مشکلم الان با جیسونش بود این مدلی نتونستم بگیرم میشه یه نمونه با جیسونی که تو کدم بود بنویسید بیزحمت برام ممنون میشم
  10. گرفتن فیلد سوم از لیست با get

    من مستقیم دیتا رو گرفتم و ریختم داخل لیست اون ویرگول های بینشون رو برنداشتم این کدمه ببیید Sub JobDone(job1 As HttpJob) If job1.Success Then If job1.JobName = "dl" Then Dim parser As JSONParser parser.Initialize(job1.GetString) Dim root As List = parser.NextArray For Each colroot As Map In root Dim imgname As String = colroot.Get("imgname") Dim text As String = colroot.Get("text") Dim title As String = colroot.Get("title") list(1).Add(imgname) list(2).Add(text) list(3).Add(title) Next For il =0 To list(2).Size-1 Dim p As Panel p.Initialize("p") p.Tag = il scakhbar.Panel.AddView(p,0,topakhbar,100%x,100%y) topakhbar = topakhbar + 31%y p.LoadLayout("items") Dim dl As ImageDller dl.Initialize dl.Download(imgakhbar,list(1).Get(il)) labti.Text= list(3).Get(il) labtext.Text = list(2).Get(il) Next scakhbar.Panel.Height = topakhbar End If End If End Sub ser1 = list(4).Get(0) این کد روکه میزنم مرحله به مرحله میگیره فیلد اول بعد فیلد اول ویرگول فیلد دوم بعد فیلد اول ، دوم، سوم همینجوری نشون میده که فقط فیلد اول رو میتونم بگیرم
  11. سلام بچه ها من یه دیتابیس انلاین دارم ازش اطلاعات رو میگیرم میریزم تو لیست حالا میخوام به صورت تکی بگیرم اطلاعات رو ازش فقط اطلاعات اولی رو برام به تنهایی میگیره پون تک فیلد وقتی میزنم دو هم اولی رو میگیره و با یه ویرگول دومی ررو به اولی میچسبونه
  12. اخه با حلقه میخوام بگیرما مشکلی نداره امکان پذیره ؟
  13. میشه نمونه کد رو با لیست فور برای نمونه سمپل بذارید ؟ نتونستم با اریا لیست ویو کار کنم
  14. سلام دوستان یه اپ دارم ک از دیتابیس انلاین یه سری اطلاعات میگیره و توی مولتی پنل تک ستونی نشون میده حالا میخوام همینو بگیرم توی سه تا ستون کدم اینه ": Sub Globals Private lblMultiTitle As Label Private lblMultiText As Label Private imgMulti As ImageView Private sv As ScrollView Dim downloader As HttpJob Dim top As Int = 0 Dim list(10) As List End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("scroll") For i=0 To 8 list(i).Initialize Next downloader.Initialize("dl",Me) downloader.Download("http://www.appdroids.ir/amoozesh/show.php") End Sub Sub JobDone(job1 As HttpJob) If job1.Success Then If job1.JobName = "dl" Then Dim parser As JSONParser parser.Initialize(job1.GetString) Dim root As List = parser.NextArray For Each colroot As Map In root Dim imgname As String = colroot.Get("imgname") Dim text As String = colroot.Get("text") Dim title As String = colroot.Get("title") list(1).Add(imgname) list(2).Add(text) list(3).Add(title) Next For il =0 To list(2).Size-1 Dim p As Panel p.Initialize("p") p.Tag = il sv.Panel.AddView(p,0,top,100%x,100%y) top = top + 31%y p.LoadLayout("items") Dim dl As ImageDller dl.Initialize dl.Download(imgMulti,list(1).Get(il)) lblMultiTitle.Text= list(3).Get(il) lblMultiText.Text = list(2).Get(il) Next sv.Panel.Height = top End If End If End Sub Sub Activity_Resume End Sub Sub p_Click Dim mypanel As Panel mypanel = Sender ' Msgbox("Text Is - > " & mypanel.Tag,"") Log(list(3).Get(mypanel.Tag)) Log(list(2).Get(mypanel.Tag)) Log(list(1).Get(mypanel.Tag)) End Sub
  15. مشکل در زمینه خواندن اطلاعات از دیتابیس انلاین

    #Region Activity Attributes #FullScreen: False #IncludeTitle: True #End Region Sub Process_Globals End Sub Sub Globals Private lblMultiTitle As Label Private lblMultiText As Label Private imgMulti As ImageView Private sv As ScrollView Dim downloader As HttpJob Dim top As Int = 0 End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("scroll") downloader.Initialize("dl",Me) downloader.Download("http://www.taakapps.com/amoozesh/show.php") 'downloader.PostString("http://www.taakapps.com/amoozesh/show.php","group="&Main.pos) End Sub Sub JobDone(job1 As HttpJob) If job1.Success Then If job1.JobName = "dl" Then Dim parser As JSONParser parser.Initialize(job1.GetString) Dim lst As List lst.Initialize lst = parser.NextArray For Each m As Map In lst Dim p As Panel p.Initialize("p") p.Tag = m.Get("text") sv.Panel.AddView(p,0,top,100%x,100%y) top = top + 31%y p.LoadLayout("items") Dim dl As ImageDller dl.Initialize dl.Download(imgMulti,m.Get("imgname")) lblMultiTitle.Text= m.Get("title") lblMultiText.Text = m.Get("text") Next sv.Panel.Height = top End If End If End Sub Sub Activity_Resume End Sub Sub p_Click Dim mypanel As Panel mypanel = Sender Msgbox("Text Is - > " & mypanel.Tag,"") End Sub Sub Activity_Pause (UserClosed As Boolean) End Sub Sub Activity_KeyPress (KeyCode As Int) As Boolean 'Return True to consume the event If KeyCode = KeyCodes.KEYCODE_BACK Then StartActivity(Main) Activity.Finish Return True End If Return False End Sub ببینید من با این کد یه تایتل و تکست و عکس رو از برنامه میگیرم و توی یه لیستی اسکرول میکنه الان با کیلیک بر روی هر ایتم که همون رویداد پی کلیک هست میخوام تمامی اطلاعات رو دوباره تو رشته بهم بده ولی متاسفانه فقط تونستم ازش عنوان رو بیگیرم ممنون میشم راهنمایی کنید