تگ و سندر _ tag & sender

[Siaic 88]

با سلام

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

حالا میخوام با زدن ایمیج ویو دسترسی داشته باشم به متن لیبل متانظر با همون ایمیج ویو درون پنل...

لطفا راهنمایی کنید.تشکر.

 

[Amir - B 185]

بله چرا نشه

Sub Activity_Create(FirstTime As Boolean)

	
	map1.Initialize
	map1.Put("matn 1","1")
	map1.Put("matn 2","2")
	map1.Put("matn 3","3")
	
	
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
Sub activity_Click
	For i=0 To map1.Size-1
		Log(map1.GetKeyAt(i))
		
		
		
	Next
End Sub

 

[sbr 233]

در 2 دقیقه قبل، Siaic گفته است :

من کد زیر زدم ولی ارور میده!

 

id_limit1 هم قبلا برابر کردم با مقدار id دیتابیس ...

dim ar() as string

.
.

for ...
.
.
ar(id_limit1)=MapData.Get("titr")
.
.

next

 

خب این کار یعنی چی 

اومدید توی حلقه به ارایه مقدار دادید ؟!؟!

شما بیا متن رو از دیتابیس انلاین بگیر 

از طرسق تابع Regex بریز توی ارایه 

بعدش بیا و از ارایه مقدار ای مورد نظر رو بگیر نه اینکه توی مقدار مورد نظر یه چیزو بریزی 

dim str () as String 

str = Regex.Split("Olgoo", "متن مورد نظر ")

'توی اون قسمت Olgoo الگوی جداسازی رو بنویس

log (str(id_Limit1))

 

[Siaic 88]

در 17 دقیقه قبل، Amir - B گفته است :

بله چرا نشه

Sub Activity_Create(FirstTime As Boolean)

	
	map1.Initialize
	map1.Put("matn 1","1")
	map1.Put("matn 2","2")
	map1.Put("matn 3","3")
	
	
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
Sub activity_Click
	For i=0 To map1.Size-1
		Log(map1.GetKeyAt(i))
		
		
		
	Next
End Sub

 

من اومدم بعد تعریف متغیر و اینشیلایز کردن داخل حلقه for که کل اطلاعات از دیتابیس میگیره کد زیر زدم:

map1.Put(id_limit1,MapData.Get("titr"))

بعد تو رویداد ایمیج ویو کد زیر زدم:

Dim im As ImageView=Sender
tagg=im.Tag
		
ToastMessageShow(map1.Get(tagg),False)

ولی مقدار null بر میگردونه ...   میشه بگید کجا اشتباه کردم ؟

در 13 دقیقه قبل، sbr گفته است :

خب این کار یعنی چی 

اومدید توی حلقه به ارایه مقدار دادید ؟!؟!

شما بیا متن رو از دیتابیس انلاین بگیر 

از طرسق تابع Regex بریز توی ارایه 

بعدش بیا و از ارایه مقدار ای مورد نظر رو بگیر نه اینکه توی مقدار مورد نظر یه چیزو بریزی 

dim str () as String 

str = Regex.Split("Olgoo", "متن مورد نظر ")

'توی اون قسمت Olgoo الگوی جداسازی رو بنویس

log (str(id_Limit1))

 

این خطا داد ....

 

 

(ClassCastException) java.lang.ClassCastException: java.lang.String cannot be cast to java.lang.String[]

کد زیر درسته؟

dim ar() as string

for i =0 to 50

ar="p" & i

next

ToastMessageShow(ar(5),False)

 

[Amir - B 185]

در 16 دقیقه قبل، Siaic گفته است :

من اومدم بعد تعریف متغیر و اینشیلایز کردن داخل حلقه for که کل اطلاعات از دیتابیس میگیره کد زیر زدم:

map1.Put(id_limit1,MapData.Get("titr"))

بعد تو رویداد ایمیج ویو کد زیر زدم:

Dim im As ImageView=Sender
tagg=im.Tag
		
ToastMessageShow(map1.Get(tagg),False)

ولی مقدار null بر میگردونه ...   میشه بگید کجا اشتباه کردم ؟

این خطا داد ....

 

 

(ClassCastException) java.lang.ClassCastException: java.lang.String cannot be cast to java.lang.String[]

کد زیر درسته؟

dim ar() as string

for i =0 to 50

ar="p" & i

next

ToastMessageShow(ar(5),False)

 

 

از دستور get استفاده نکنید

از  GetKeyAt استفاده کنید یا map1.GetValueAt 

 

اگر بازم خطا داد، جای id و mapdata رو عوض کنید

[sbr 233]

در 17 دقیقه قبل، Siaic گفته است :

من اومدم بعد تعریف متغیر و اینشیلایز کردن داخل حلقه for که کل اطلاعات از دیتابیس میگیره کد زیر زدم:

map1.Put(id_limit1,MapData.Get("titr"))

بعد تو رویداد ایمیج ویو کد زیر زدم:

Dim im As ImageView=Sender
tagg=im.Tag
		
ToastMessageShow(map1.Get(tagg),False)

ولی مقدار null بر میگردونه ...   میشه بگید کجا اشتباه کردم ؟

این خطا داد ....

 

 

(ClassCastException) java.lang.ClassCastException: java.lang.String cannot be cast to java.lang.String[]

کد زیر درسته؟

dim ar() as string

for i =0 to 50

ar=i

next

ToastMessageShow(ar(5),False)

 

نه مقدار دهی اشتباه هست 

به یک ارایه باید به صورت ارایه ای مقدار ها مقداردهی کنید 

ببینید 

من منظورم اینوطریه 

از یه آدرس مقدار رو میگیرید 

dim str3() as string
htt1.PostString("http://...","test")
str3 = Regex ("#",htt1.GetString)

بعد میاید و مقادیرش رو میریزید توی یه ارایه 

اینطوری 

str4 = Regex.Split("#",str3(i))

 

بعدش میاید و اون مقداری رو که میخواید از آرایه میگیرید 

log (str4(id_Limited))

 

[Siaic 88]

در 6 دقیقه قبل، sbr گفته است :

نه مقدار دهی اشتباه هست 

به یک ارایه باید به صورت ارایه ای مقدار ها مقداردهی کنید 

ببینید 

من منظورم اینوطریه 

از یه آدرس مقدار رو میگیرید 

dim str3() as string
htt1.PostString("http://...","test")
str3 = Regex ("#",htt1.GetString)

بعد میاید و مقادیرش رو میریزید توی یه ارایه 

اینطوری 

str4 = Regex.Split("#",str3(i))

 

بعدش میاید و اون مقداری رو که میخواید از آرایه میگیرید 

log (str4(id_Limited))

 

اها

ولی من با regex اطلاعات نگرفتم ...

این روش اکیه ولی با map تونستم ج بگیرم

ممنون از همتون دوستان