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

سلام

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

ساخت کتاب اندروید

در این جلسه قصد داریم در مورد عناوین زیر صحبت کنیم:

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

اسکرول کردن متن و عکس با هم

باز هم مبحث بسیار مورد توجه در زمینه ساخت کتاب، نمایش متن و عکس و اسکرول کردن آن در برنامه است. به طوری که متن و عکس در زمان نمایش بهم نریزد و به صورت کامل متن و عکس نمایش داده شود.

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

• ابتدا در پروژه، کتابخانه Reflection را علامت میزنیم.

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

• سپس ساب زیر را به پروژه اضافه میکنید:

Sub lbl_Height As Float
	Dim before,after As Float
	Dim obj1 As Reflector
	Dim str As StringUtils
	lineheight =str.MeasureMultilineTextHeight(lbl_content , lbl_content.Text)
	obj1.Target = lbl_content

	before = obj1.RunMethod("getLineHeight")
	obj1.Target = lbl_content
	obj1.RunMethod3("setLineSpacing", .10, "java.lang.float", 1.5, "java.lang.float")
	obj1.Target = lbl_content
	after = obj1.RunMethod("getLineHeight")
	lineheight = ((after * lineheight)/before)
	lbl_content.Height = lineheight
	Return  lineheight
End Sub

در این ساب فاصله متن از صفحه و متن از عکس ها مشخص میشود. این ساب به صورت مستقیم در برنامه استفاده نمیشود، بلکه باید آن را صدا زد. و در ادامه آن را صدا میزنیم.

• با استفاده از این دستورات، ساب را صدا میزنیم و از آن استفاده میکنیم.

cur=sql.ExecQuery("SELECT * FROM tbl_damage_lap")

	For i=0 To cur.RowCount-1
		cur.Position=i
	
		If cur.GetString("description").EndsWith(".jpg") Then
			Dim img1 As ImageView
			img1.Initialize("")
			img1.Gravity=Gravity.FILL
			sv.Panel.AddView(img1,2%x,h,80%x,25%y)
			img1.SetBackgroundImage(LoadBitmap(File.DirAssets,cur.GetString("description")))
			h=h+29%y
			sv.Panel.Height=h
		Else
			lbl_content.Initialize("")
			lbl_content.Gravity=Gravity.RIGHT
			lbl_content.TextSize=14
			lbl_content.Typeface=Typeface.LoadFromAssets("b.ttf")
			lbl_content.TextColor=Colors.Black
			lbl_content.Text=cur.GetString("description")
			sv.Panel.AddView(lbl_content,2%x,h,85%x,20%y)
			h=h+lbl_Height+12%y
			sv.Panel.Height=h
						
		End If
	Next

دقت کنید که ما آمده ایم و یک دیتابیس نوشتیم و آن را راه اندازی کردیم و سپس آمده ایم و مقادیر آن را به صورت دلخواه نمایش دادیم و شما برای این که بدانید که کوئری را چه طوری زدیم، باید بخش مقدماتی بسیک فور اندروید را کارکرده باشید، که از طریق لینک زیر میتوانید به تمامی آموزش های بیسیک فور اندروید دسترسی داشته باشید:

آموزش های بیسیک فور اندروید

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

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

چنانچه سوالی در رابطه با این آموزش داشتید از ما بپرسید 🙂

موفق باشید.