استفاده از Tag و Sender در Multi Panel

[houman_aria 2]

خیل این کار رو لازم دارم اگه ممکنه راهنمایی بفرمایید

[مهدی ایزدی 9,203]

در 15 دقیقه قبل، houman_aria گفته است :

خیل این کار رو لازم دارم اگه ممکنه راهنمایی بفرمایید

دوست عزیز لطفا اسپم ندید. صبر کنید تا دوستان سر فرصت بهتون پاسخ بدن

امتیاز منفی براتون ثبت شد

[ahmandir 11]

سلام به آقای ایزدی عزیز و دیگر دوستان .

 

من یک قسمت از برنامم موندم که چجوری بنویسمش که اسکرول درست بخوره . هزار تا کلک رشتی هم زدم درست نشده که نشده .

 

دوستان این روش برای ساخت منو های سفارشی ( اسکرولی ) خیلی خوب هست چون توی منو متن زیادی نوشته نمیشه تو هر لیبل اما من می خوام اطلاعات رو از دیتابیس بخونم ( مثل همین آموزش شما ) اما توی هر حونه از بانک داده متن کوتاه و بلند هست و گاهی متن به هزار کاراکتر هم میرسه . گاهی هم متن شاید بیست کلمه باشه .

 

برنامه ی کلی ای که دارم اینه که توی حلقه ی for بعد از خوندن هر خونه از بانک داده توی یک لیبل نمایشش بده و بعد از اون دو دکمه ( مثلا حذف و تایید ) نمایش داده بشه و باز متن بعدی رو نمایش بده و باز دو تا دکمه رو .

 

مشکلی که دارم این هست که یا متن رو کامل نمایش نمیده و یا وقتی نمایش میده اسکرول نمیشه . خیلی امتحان کردم اما راه رو پیدا نکردم که نکردم .

 

در کل آخرین چیزی که نوشتم این بوده که لیبل رو به اسکرول ادد می کنم و اندازش رو ذخیره می کنم . بعد دکمه ها رو و اندازشون رو با اندازه ی تکست ذخیره می کنم . تا زمانی که for تمام بشه این ماجرای ثبت اندازه ادامه داره و در آخر اندازه رو میدم .

اما اسکرول نمیشه

 

ممنون میشم راهنماییم کنین که تو این شرایط باید دقیقا چیا رو در نظر بگیرم و از چه شیوه ای استفاده کنم .

 

ممنون

[ahmandir 11]

دوستان ممنون راه رو پیدا کردم . اینقدر بالا و پایین کردم کد رو که جواب داد .

[mohammadgh 1]

در در 1394/02/21, 12:01:18، مهدی ایزدی گفته است :

درود خدمت تمامی کاربران عزیز انجمن ، بخصوص کاربرانی که فعالیت میکنند *laie*

خب توی دوره

توی Multi Panel و همراه با ScrollView نمایش بدیم ...

بعد از اون شاید بیشتر از 20 بار سوال شد که چطوری میشه وقتی روی Button در MultiPanel کلیک کرد Button تشخیص بده

که کدوم متن رو نشون بده و چی عملی رو انجام بده ... *fekr*

توی این دوره ی آموزشی ما این موضوع رو با استفاده از Tag و Sender یاد میگیریم *like*

امیدوارم که فیلم رو با دقت نگاه کنید

این رو هم فقط برای تعداد کمی از کاربران میگم: دست از حفظی بازی بردارید

برنامه نویسی رو باید یاد گرفت ، برنامه نویسی کتاب شیمی دبیرستان نیست که یاد بگیری مونوکسید اسید فرمولش چیه و سال تحصیلی که تموم شد

برات فرق نکنه که فرمولش یادش باشه یا نه *fekr* عجب مثالی زدم *laugh2*

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

هرکه را طاووس خواهد جور هندوستان کشد !

لینک دانلود از سرور پیکوفایل

اختصاصی از انجمن Basic4Android.org

موفق باشید

سلام .رمز فایل چیه؟؟

[مجید آرتا 5,874]

در 21 دقیقه قبل، mohammadgh گفته است :

سلام .رمز فایل چیه؟؟

 

سلام

basic4android.org

[mjavad 2]

سلام

در رابطه با تنظیمات رنگ متن و... در مولتی پنل راهنمایی میخواستم 

باتشکر

[ArmaN17 0]

سلام دوستان من دارم مولتی پنل میسازم که وقتی روش کلیک شد بره صفحه بعد و اطلاعات مربوط به اونو نشون بده

کسی میتونه بگه مشکلش چیه؟

 

java.lang.ClassCastException: java.lang.String cannot be cast to android.widget.TextView
	at b4a.example.detail._activity_create(detail.java:364)
	at java.lang.reflect.Method.invokeNative(Native Method)
	at java.lang.reflect.Method.invoke(Method.java:515)
	at anywheresoftware.b4a.BA.raiseEvent2(BA.java:186)
	at b4a.example.detail.afterFirstLayout(detail.java:102)
	at b4a.example.detail.access$000(detail.java:17)
	at b4a.example.detail$WaitForLayout.run(detail.java:80)
	at android.os.Handler.handleCallback(Handler.java:733)
	at android.os.Handler.dispatchMessage(Handler.java:95)
	at android.os.Looper.loop(Looper.java:136)
	at android.app.ActivityThread.main(ActivityThread.java:5019)
	at java.lang.reflect.Method.invokeNative(Native Method)
	at java.lang.reflect.Method.invoke(Method.java:515)
	at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:779)
	at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:595)
	at dalvik.system.NativeStart.main(Native Method)

 

[مجید آرتا 5,874]

یجایی کدتونو اشتباه نوشتید که سعی کامپایلر ایراد میگیره و داره بهتون میگه شما نمیتونید یک رشته رو به ویو TextView  تبدیل کنین

کدی که نوشتین رو بزارید

 

[ArmaN17 0]

در در 1397/10/23, 20:45:59، مجید آرتا گفته است :

یجایی کدتونو اشتباه نوشتید که سعی کامپایلر ایراد میگیره و داره بهتون میگه شما نمیتونید یک رشته رو به ویو TextView  تبدیل کنین

کدی که نوشتین رو بزارید

 

 

[مجید آرتا 5,874]

کدهای اکتیویتی که اطلاعات رو میفرستین رو قرار بدین

این کدا مشکلی ندارن

[ArmaN17 0]

در 5 دقیقه قبل، مجید آرتا گفته است :

کدهای اکتیویتی که اطلاعات رو میفرستین رو قرار بدین

این کدا مشکلی ندارن

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("Lay_Detail")
	
	Dim  s As StatusBarCompat
	s.Initialize
	s.StatusBarColor=Colors.RGB("247","127","20")
	
	ps.Initialize
	ps.LoadUrl(games.myimage.Get(games.tag)).IntoImageView(ImageView1)
	Lab_detail=games.mydetail.Get(games.tag)
	Lab_price.Text="قیمت : " & games.myprice.Get(games.tag) & " تومان"
	'la_name.Text = games.mymap.Get("name")

End Sub

 

[مجید آرتا 5,874]

این تیکه کدتون اگه Lab_detail  یک لیبل یا ادیت تکست هستش که مشکل داره :

Lab_detail=games.mydetail.Get(games.tag)

به این شکل بنویسید :

Lab_detail.Text=games.mydetail.Get(games.tag)

 

[ArmaN17 0]

در 3 دقیقه قبل، مجید آرتا گفته است :

این تیکه کدتون اگه Lab_detail  یک لیبل هستش که مشکل داره :

Lab_detail=games.mydetail.Get(games.tag)

به این شکل بنویسید :

Lab_detail.Text=games.mydetail.Get(games.tag)

 

دمت گرم دادا درست شد.به نظرت تو اسکرول ویو هم میشه نوشت؟

[FarzamPlus 1]

من توی تاپیک جدا سوال کردم ارجاع دادن به اینجا ، ولی بازم چیزی پیدا نکردم .

 

این کد ساخت مولتی پنل هستش :

	For i = 0 To 20

		Dim p1 As Panel
		p1.Initialize("")
		SC1.Panel.AddView(p1,0,top, 99%x,  105%y)
		top = top + 22%y
		p1.LoadLayout("listkala")
		b1.Tag = i
		b2.Tag = i
		txt1.Tag = i
		
	Next
	
	SC1.Panel.Height = top

 

اینم کد Button :

	Dim Mybtn As Button
	Mybtn = Sender
	

	For Each v As View In Activity.GetAllViewsRecursive
		If v Is EditText Then
			Dim edits As EditText = v
			If edits.Tag = Mybtn.Tag Then
				txt1.Text = txt1.Text - 1
			End If
		End If
	Next
	

با این دستور فقط آخرین تکست مقدارش کم و زیاد میشه .

باید چکار کنم ؟؟