آموزش های پروژه محور vid4kia

تابع ایجاد سایه برای متن ها و نوشته ها

احتمالا مایل باشید در برنامه نویسی B4A در مواقعی، نوشته های بخشی از برنامه و ویوو View خود را سایه دار کنید. با استفاده از تابع زیر شما میتوانید در هر زمان و در هر جایی از برنامه هر متنی را که بخواهید برایش سایه قرار دهید.
این کد نیاز به فعال کردن کتابخانه Reflector می باشد.

Sub TextShadow(pView As View, pRadius As Float, pDx As Float, pDy As Float, pColor As Int)
	Dim ref As Reflector
	ref.Target = pView
	ref.RunMethod4("setShadowLayer", Array As Object(pRadius, pDx, pDy, pColor), Array As String("java.lang.float", "java.lang.float", "java.lang.float", "java.lang.int"))
End Sub

TextShadow(labelToolBar,3,0,2,Colors.DarkGray)