ایجاد چند ویو با مختصات مختلف

[montazeranmahdi 101]

با سلام و خسته نباشید

میخوام با یک حلقه چندتا باتن یا لیبل رو روی اکتیویتی لود کنم ، ممنون میشم کمک کنید

مثلا 4تا باتن زیر همدیگه

 با توجه مختصاتtop  که از قبل در یک فایل txt  تو پوشه برنامه هست

فرض بفرمایید متن داخل edittext  به این صورت است :

10

20

30

40

حالا میخوام 4 تا باتن که تاپشون رو به ترتیب از edittext میگیرن روی اکتیویتی ایجاد بشه

ممنون میشم از اساتید که کمک کنند ..

 

[mahdi tahan 723]

یک ادیت تکست داری یا برا هر باتون یک ادیت تکست؟

اگ یک ادیت تکسه.انگار میخوای با هر بار عدد ادیت تکس یه باتون بسازی؟

[montazeranmahdi 101]

در 12 ساعت قبل، mahdi tahan گفته است :

یک ادیت تکست داری یا برا هر باتون یک ادیت تکست؟

اگ یک ادیت تکسه.انگار میخوای با هر بار عدد ادیت تکس یه باتون بسازی؟

خیلی ممنون از پاسخ شما بزرگوار

کلا یک ادیت تکس

یا یک لیست ویو

فرقی نمیکنه ، البته بنظرم لیست ویو بهتره

فرض بفرمایید یک لیست ویو که 4 ردیف توشه به این صورت :

10

20

30

40

حالا میخوام یه حلقه بنویسم که 4 تا باتن روی اکتیویتی ایجاد بشه که هر کدوم از این ها تاپشون برابر یکی از این اعداد به ترتیب از بالا باشه

مثلا باتن 1 تاپش 10

باتن دوم تاپش 20

باتن سوم ...... 30

چهارم ........40

اگر هم بفرمایید که برای هر باتن به چه صورت امکان تعریف ساب click وجود داره ممنون میشم

[mahdi tahan 723]

نمدونم منظورتو درست فهمیدم یا نه

میتونی 4 تا باتون تو دیزانت تعریف کنی و چپ و راستشو بدی و همشونو مخفی کنی

بعد تو رویداد کلید لیست ویوت اینجوری بنویسی

Sub listview1_ItemClick (Position As Int, Value As Object)



Select Position
	
	Case 0
	Button1.Top=listview1.GetItem(Position)
	Button1.Visible=True	
	Case 1
		
	Button2.Top=listview1.GetItem(Position)
	Button2.Visible=True	
	Case 2	
	
	Button3.Top=listview1.GetItem(Position)
	Button3.Visible=True
	Case 3
	
	Button4.Top=listview1.GetItem(Position)
	Button4.Visible=True
End Select

End Sub

 

[montazeranmahdi 101]

خیلی ممنون

اما میخوام باتن ها با یک حلقه ایجاد بشن و از قبل توی دیزاین تعریف نکنم

[montazeranmahdi 101]

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

.

.

دارم قلم قرآنی درست میکنم و مهمترین بخشش اینجاست اگه درست بشه خیلی کمکم کردین

[mahdi tahan 723]

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

[montazeranmahdi 101]

در 7 دقیقه قبل، mahdi tahan گفته است :

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

نه ... یه حلقه با for میخوام که تو اکتیویتی کریت بنویسم که برنامه که اجرا شد 4 تا باتن درست کنه با مختصاتی که توی لیست ویو وجود داره

[mahdi tahan 723]

چرا لیست ویو خوب فک کنم دیتابیس  بهتر باشه

با حلقه اینطوری میشه

ScrollView1.Initialize(2000dip)
Activity.AddView(ScrollView1,0,0,100%x,100%y)
For i=0 To 3
Dim p As Button
ScrollView1.Panel.AddView(p,30%x,listview1.GetItem(Position),50%x,20%Y)
Next

اندازه ها رو باید بر هر مبنایی در نظر گرفتی درست کنی

[montazeranmahdi 101]

در 5 دقیقه قبل، mahdi tahan گفته است :

چرا لیست ویو خوب فک کنم دیتابیس  بهتر باشه

با حلقه اینطوری میشه

ScrollView1.Initialize(2000dip)
Activity.AddView(ScrollView1,0,0,100%x,100%y)
For i=0 To 3
Dim p As Button
ScrollView1.Panel.AddView(p,30%x,listview1.GetItem(Position),50%x,20%Y)
Next

اندازه ها رو باید بر هر مبنایی در نظر گرفتی درست کنی

ممنون الان تست میکنم

نه باید لیست ویو باشه دیتابیس نمیشه(توضیحش مفصله)

[montazeranmahdi 101]

آقا دم شما گرم ...

با یکم تغییرات درست شد

خداخیرت بده

ScrollView1.Initialize(2000dip)
    Activity.AddView(ScrollView1,0,0,100%x,100%y)
    Dim x As Int
    Dim p As Button
    p.Initialize("button")
    x=2
    For i = 1 To 5
    p.Initialize("items")
    p.Tag = i
        
        ScrollView1.Panel.AddView(p,30%x,ListView1.GetItem(x),50%x,20%Y)
        x=p.Tag
    Next

[montazeranmahdi 101]

در 56 دقیقه قبل، mohammadjavadmajidi گفته است :

ممنون الان تست میکنم

نه باید لیست ویو باشه دیتابیس نمیشه(توضیحش مفصله)

آقا دم شما گرم ، بایکم تغییرات درست شد

خداخیرت بده

 

ScrollView1.Initialize(2000dip)
    Activity.AddView(ScrollView1,0,0,100%x,100%y)
    Dim x As Int
    Dim p As Button
    p.Initialize("button")
    x=2
    For i = 1 To 5
    p.Initialize("items")
    p.Tag = i
        
        ScrollView1.Panel.AddView(p,30%x,ListView1.GetItem(x),50%x,20%Y)
        x=p.Tag
    Next

[montazeranmahdi 101]

در در 27 مرداد 1399 در 12:56، mahdi tahan گفته است :

چرا لیست ویو خوب فک کنم دیتابیس  بهتر باشه

با حلقه اینطوری میشه

ScrollView1.Initialize(2000dip)
Activity.AddView(ScrollView1,0,0,100%x,100%y)
For i=0 To 3
Dim p As Button
ScrollView1.Panel.AddView(p,30%x,listview1.GetItem(Position),50%x,20%Y)
Next

اندازه ها رو باید بر هر مبنایی در نظر گرفتی درست کنی

سلام مجدد ، ضمن تشکر از پاسخگویی به سوالات ، خواستم بدونم راهی هست که ویوهایی که با این حلقه ایجاد کردیم رو با یک فرمان پاک کنیم ، مثلا یه باتن باشه که وقتی این ویوها ایجاد شدن ما روی اون باتن کلیک کنیم و ویوها مجددا حذف بشن

 

 

و یک نکته اینکه برای هرکدوم از باتن هایی که ایجاد کردیم چطور خاصیت کلیک رو بنویسیم

ممنونم

[Salar82 919]

سلام

اگر میخواین کل ویوها تو اسکرول ویو پاک شه، از کد زیر استفاده کنید:

ScrollView1.Panel.RemoveAllViews

 

اگر هم خواستین، میتونید کل اسکرول ویو رو پاک کنید:

ScrollView1.RemoveView

 

اگر هم میخواین فقط دکمه های داخل اسکرول ویو پاک شن، از For Each استفاده کنید:

	For Each v1 As Button In ScrollView1.Panel.GetAllViewsRecursive
		v1.RemoveView
	Next

 

و در آخر اگر قصد دارین که دکمه هایی با تگ خاص، مثلا 1 تا n حذف شن، از تکه کد زیر استفاده کنید:

	Dim i As Int = 1
	For Each v1 As Button In ScrollView1.Panel.GetAllViewsRecursive
		
		If i = v1.Tag Then
			v1.RemoveView
		End If
		
		i = i + 1
	Next

 

 

سؤالی داشتید، در خدمتم

[montazeranmahdi 101]

ممنون از لطف شما

[montazeranmahdi 101]

در در 31 مرداد 1399 در 16:35، Salar82 گفته است :

اگر هم میخواین فقط دکمه های داخل اسکرول ویو پاک شن، از For Each استفاده کنید:

	For Each p As Button In ScrollView1.Panel.GetAllViewsRecursive
		p.RemoveView
	Next

 

سلام ، باتشکر از پاسخگویی شما ، من موفق نشدم با قطعه کد بالا باتن هایی که با یک حلقه روی اسکرول ویو ایجاد کردم رو حذف کنم ...

با ارور زیر مواجه میشه :

quranpage_play_click (java line: 1187)
java.lang.ClassCastException: android.widget.TextView cannot be cast to android.widget.Button
    at madresehefz.qurankarim.quranpage._play_click(quranpage.java:1187)
    at java.lang.reflect.Method.invoke(Native Method)
    at anywheresoftware.b4a.BA.raiseEvent2(BA.java:213)
    at anywheresoftware.b4a.BA.raiseEvent2(BA.java:197)
    at anywheresoftware.b4a.BA.raiseEvent(BA.java:193)
    at anywheresoftware.b4a.objects.ViewWrapper$1.onClick(ViewWrapper.java:80)
    at android.view.View.performClick(View.java:7870)
    at android.view.View.performClickInternal(View.java:7839)
    at android.view.View.access$3600(View.java:886)
    at android.view.View$PerformClick.run(View.java:29363)
    at android.os.Handler.handleCallback(Handler.java:883)
    at android.os.Handler.dispatchMessage(Handler.java:100)
    at android.os.Looper.loop(Looper.java:237)
    at android.app.ActivityThread.main(ActivityThread.java:7860)
    at java.lang.reflect.Method.invoke(Native Method)
    at com.android.internal.os.RuntimeInit$MethodAndArgsCaller.run(RuntimeInit.java:493)
    at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:1075)

 

[Salar82 919]

میدونید به چه خطی گیر میده؟

خیلی بعیده مشکل از کد بالا باشه. به احتمال یه جای دیگه دارین اشتباه میکنین. چون کدهای حلقه فقط به ازای Button های داخل اسکرول ویو اجرا میشه.

الان داره از لیبل ایراد میگیره!!!

 

[montazeranmahdi 101]

در 29 دقیقه قبل، Salar82 گفته است :

میدونید به چه خطی گیر میده؟

خیلی بعیده مشکل از کد بالا باشه. به احتمال یه جای دیگه دارین اشتباه میکنین. چون کدهای حلقه فقط به ازای Button های داخل اسکرول ویو اجرا میشه.

الان داره از لیبل ایراد میگیره!!!

 

بنظر باید با سندر این کار رو انجام داد ولی من نمیدونم به چه صورت ... با سندر خاصیت کلیک رو میتونم تعریف کنم اما حذف ویو رو نمیدونم

[montazeranmahdi 101]

من باتن ها رو بصورت زیر تو اسکرول ویو لود کردم

	Dim x As Int
	x=0
	For i = 1 To tedadayatsafhe
		p.Initialize("items")
		p.SetBackgroundImage(LoadBitmap(File.DirAssets,"r2.png"))
		p.Tag = i
		scrollpage.Panel.AddView(p,ListView2.GetItem(x),ListView1.GetItem(x),40dip,40dip)
		x=p.Tag
	Next

 

[Salar82 919]

log بذارید ببینید از کجا ایراد میگیره

[montazeranmahdi 101]

در ۱ ساعت قبل، Salar82 گفته است :

log بذارید ببینید از کجا ایراد میگیره