اسکرول افقی و عمودی ( تو نت فکر نکمک پیدا کنید ) ScrollView2D

با سپاس و دورد

 

کتابخانه اسکرول ScrollView2D اسکرول به ۲ طرف و گذاشتن هر اشیایی بدون محدودیت جابجای 

 

لینک مرجع :

 

https://www.b4x.com/android/forum/threads/lib-scrollview2d.19268/

 

امید وارم مفید واقع بشه .

 

 

 

دانلود سورس 

 

دانلود کتابخانه ها

 

 

 

 

ساخت منو متریال با MSMaterialDrawer در بیسیک فور اندروید

با سلام و سپاس

 

بنا به در خواست یکی از دوستان گل منو متریال که در بعضی از سایت ها بفروش میرسد براتون به رایگان میزارم تا همگی استفاده کنید .

 

سورس و ریسورس و کتابخانه پیوست شد .

 

دانلود سورس

 

دانلود کتابخانه ها

 

سورس کار با spinner

با سلام خدمت کاربران عزیز 

 

یکی از بهترین امکاناتی که تو پنل های مدیریتی میتونید ازشون استفاده کنید spinner است .

 

نمونه سورسی  براتون پیوست میکنم.

 

دانلود سورس

 

دانلود نمونه APK

 

 

 

 

سورس کد پیانو و قانون بیسیک فور اندروید

با سلام خدمت کاربران عزیز

 

با سورسی دیگر در خدمتتون هستیم .

 

سورس کد پیانو و ساز قانون  امید وارم مفید واقع گردد.

 

با سپاس 

 

 

دانلود سورس

 

دانلود نمونه APK

 

 

سورس پارالاکس ( تب + عکس )

با سلام 

 

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

 

موفق باشید.

 

دانلود سورس

 

 

سورس و کتابخانه لودینگ بسیار زیبای WhorlView

با سلام و حسته نباشید خدمت کاربران عزیز YAHOO 98

 

ان شاءالله که سیزده بدرتون بدر باشه .

 

دانلود کتابخانه ها

 

دانلود سورس

 

#Region  Project Attributes 
	#ApplicationLabel: B4A Example
	#VersionCode: 1
	#VersionName: 
	'SupportedOrientations possible values: unspecified, landscape or portrait.
	#SupportedOrientations: unspecified
	#CanInstallToExternalStorage: False
#End Region

#Region  Activity Attributes 
	#FullScreen: False
	#IncludeTitle: True
#End Region

Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.

End Sub

Sub Globals
	'These global variables will be redeclared each time the activity is created.
	'These variables can only be accessed from this module.
	Private wv1,wv2 As WhorlView
End Sub

Sub Activity_Create(FirstTime As Boolean)
	'Do not forget to load the layout file created with the visual designer. For example:
	Activity.LoadLayout("Layout1")
	'wv1.DefaultColors = "#F44336_#4CAF50_#5677fc"
	wv1.SweepAngle = 50
	wv1.StrokeWidth = 1
	wv1.LayerColors = Array As Int(Colors.Blue,Colors.Red,Colors.Yellow,Colors.Green)
	wv2.SweepAngle = 200
	wv2.StrokeWidth = 5
	wv2.LayerColors = Array As Int(Colors.Blue,Colors.Red,Colors.Yellow,Colors.Green)
End Sub
Sub Activity_Resume
	wv1.start
	wv2.start
End Sub
Sub Activity_Pause (UserClosed As Boolean)
	wv1.stop
	wv2.stop
End Sub

 

کد منحصر به فرد هر دستگاه بغییر سریال نامبر ( SPAndroidID )

با سلام و سپاس

 

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

 

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

 

Dim yahoo98 As SPAndroidID
Log(yahoo98.getAndroidID)
Log(yahoo98.getMACadress)
Log(yahoo98.getUniqueCode)
Log(yahoo98.UniqueCode22)

 

 

دانلود کتابخانه ها

 

 

 

سورس کد روشن کردم wifi و لیست کردن wifi های موجود

با سلام و سپاس

 

ان شا ء الله که نوروز به کامتان باشد .

 

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

 

اسکی آزاد دوستان خودشون فهمیدن خخخخخخخخخخخخ

 

 

 

#Region  Project Attributes 
  #ApplicationLabel: yahoo98.ir
  #VersionCode: 1
  #VersionName: 
  'SupportedOrientations possible values: unspecified, landscape or portrait.
  #SupportedOrientations: unspecified
  #CanInstallToExternalStorage: False
#End Region

#Region  Activity Attributes 
  #FullScreen: False
  #IncludeTitle: True
#End Region

Sub Process_Globals
	'These global variables will be declared once when the application starts.
	'These variables can be accessed from all modules.

End Sub
Sub Globals
	Private list_item_wifi As ListView
  
	Dim wifi_m As WifiManager
	Dim toggle As Toggle
	Dim ml As MLwifi
	Dim ml_s As MLScan
	Dim s As String
	
End Sub



Sub Activity_Create(FirstTime As Boolean)
	Activity.LoadLayout("main")
	wifi_m.Initialize("wifi_m")
	toggle.Initialize
	toggle.TurnWiFiOn '''''' روشن کردن اتوماتیک وای فای
	ml_s.startScan("ml_s")
  
End Sub

Sub ml_s_ScanDone(Results() As String, Count As Int)
	For i=0 To Results.Length-1
		list_item_wifi.AddSingleLine(Results(i))
	Next
	s = list_item_wifi
	
	Log(ml_s)
	
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

 

مجموعه ۲۷ لودینگ زیبا Yahoo98 Loading

با سلام و سپاس

 

نوروزتان پیروز ایام به کامتان

 

ان شاء الله که همچی طبق مرادتون باشه عزیزان

 

با سورسی دیگر در خدمتتون هستم که تو این ۲ روز تعطیلات براتون کد نویسی کردم

 

مجموعه ۲۷ لودینگ زیبا با قابلیت تغیر رنگ

 

دانلود سورس

 

دانلود کتابخانه ها

 

دانلود نمونه APK

 

کتابخانه UltimateListView + سمپل های متنوع ( ورن جدید ۴٫۲۱ )

سلام به دوستان عزیز

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

این کتابخانه همون طور که می دونید رایگان نیست و شما باید در سایت اصلی این کتابخانه چیزی حدود ۱۲۰ هزار تومان به پول ایران پرداخت کنید تا بطونید این کتابخانه رو دریافت کنید.

Continue reading “کتابخانه UltimateListView + سمپل های متنوع ( ورن جدید ۴٫۲۱ )”

کتابخانه اختصاصی Yahoo98_GifLoader با تنظیمات سرعت نمایش gif

با سپاس و درود

 

امروز با کتابخانه اختصاصی سایت یاهو ۹۸ در خدمتتون هستسم .

 

من فواد عبدی هستم .

 

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

 

زین پس منتظر کتابخانه ها و سورس های اختصاصی ما باشید .

 

در این کتابخانه که کدنویسی شده شما میتونید با دو خط کد هم فایل گیفت خود رو نمایش بدید و هم سرعت گیفت رو تنظیم کنید .

دانلود کتابخانه ها

 

دانلود سورس

 

دانلود نمونه APK

 

 

 

 

 

با سپاس 

متحرک کردن متن تایتل اکتیویتی و تکس در اکتیویتی AutoTextType

به درود 

 

متحرک کردن متن تایتل اکتیویتی و تکس در اکتیویتی AutoTextType

 

با سورس کد مندرج شده شما میتونید متن تایتل رو متحرک کنید .

 

متن در اکتیویتی رو متحرک کنید .

 

 

با سپاس

 

دانلود سورس

 

دانلود کتابخانه ها

 

دانلود نمونه APK

سورس کد پس زمینه متحرک ir.yahoo98.LiveWallpaper

به درود

 

خدمت کاربران گل یاهو ۹۸

 

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

 

شما برای تغییر پس زمینه کافیه یک فایل گیفت بسازید و در فولدر اصلی سورس به نام bg.gif جایگزین کنید .

 

با سپاس سورس پیوست شد .

 

دانلود سورس

 

دانلود نمونه APK

 

کار با کلید های گوشی در بیسیک فور اندروید

با سپاس

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

 

Sub Activity_KeyPress (KeyCode As Int) As Boolean

 If KeyCode = KeyCodes.KEYCODE_BACK Or KeyCode = KeyCodes.KEYCODE_MENU  Or KeyCode=KeyCodes.KEYCODE_HOME Then

'جایی که یک عمل برامون انجام بده

  Return True

End If

 Return False

End Sub

 

بسته نشدن سرویس در حالات مختلف Service

سلام.

با این کارها میتونی کاری کنی که سرویس بسته نشه.

 

ماندگار کردن سرویس از طریق اضافه کردن این کد توی #Region  Service Attributes :

 

#StartCommandReturnValue: android.app.Service.START_STICKY

 

استارت کردن سرویس به صورت خودکار بعد از روشن شدن گوشی که باید  #StartAtBoot : رو برابر با true قرار بدی.

 

#StartAtBoot: true

 

اجرا کردن سرویس هر ۵دقیقه یک بار با اضافه کردن این کد به service_start به این صورت:

 

Sub Service_Start (StartingIntent As Intent)

StartServiceAt("", DateTime.Now + 60000*5,True)

End Sub

 

و اجرا کردن بلافاصله ی سرویس بعد از بسته شدن سرویس ، در رویداد service_destory :

 

Sub Service_Destroy

StartService("")

End Sub

 

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