تبلیغات
آموزش برنامه نویسی اندروید

آموزش برنامه نویسی اندروید
 
قالب وبلاگ
نویسندگان
ابر برچسب ها
تم ها رو میتونید به مانفیست اضافه کنید


SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.Light")

SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.NoActionBar")

SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.Light.NoActionBar")

SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.Dialog.NoActionBar")

SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.InputMethod")

SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.Light.DarkActionBar")

SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.Light.Dialog")

SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.Light.NoActionBar.Fullscreen")

SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.Light.NoActionBar.TranslucentDecor")

SetApplicationAttribute(android:theme,"@android:style/Theme.Holo.Light.Panel")

SetApplicationAttribute(android:theme,"@android:style/Theme.Black")

SetApplicationAttribute(android:theme,"@android:style/Theme.Black.NoTitleBar")

SetApplicationAttribute(android:theme,"@android:style/Theme.Light")

SetApplicationAttribute(android:theme,"@android:style/Theme.Light.NoTitleBar")

SetApplicationAttribute(android:theme,"@android:style/Theme.Light.Panel")

SetApplicationAttribute(android:theme,"@android:style/Theme.Translucent")

SetApplicationAttribute(android:theme,"@android:style/Theme.Wallpaper")

SetApplicationAttribute(android:theme,"@android:style/Theme.DeviceDefault")

SetApplicationAttribute(android:theme,"@android:style/Theme.DeviceDefault.Light")

SetApplicationAttribute(android:theme,"@android:style/Theme.DeviceDefault.Light.DarkActionBar")



[ پنجشنبه 15 مرداد 1394 ] [ 03:45 ب.ظ ] [ علی ]
Dim MediaPlayer As MediaPlayer
حالا اونو داخل Activity_Create فراخوانی میکنیم

MediaPlayer.Initialize
حالا یا توی Activity_Create مینویسیم که با شروع برنامه کار کنه یا توی یه دکمه میزاریم که با کلیک روی اون شروع بشه.

MediaPlayer.Load(File.DirAssets, "01 Be Bachat Begoo.mp3")
MediaPlayer.Play



[ پنجشنبه 8 مرداد 1394 ] [ 02:44 ب.ظ ] [ علی ]
این سورس توسط گروه گیم آور طراحی شده و میتونید اونو از لینک زیر خریداری کنید.



لینک خرید


[ شنبه 27 تیر 1394 ] [ 11:43 ب.ظ ] [ علی ]
برای وصل کردن designer به گوشی باید از این مسیر برید.



توجه باید گوشی به b4a وصل باشه



[ شنبه 27 تیر 1394 ] [ 02:13 ق.ظ ] [ علی ]
کپی فایل از حافظه کامپیوتر(پوشه files ) به گوشی
کد PHP:
File.Copy(File.DirAssets,"اسم فایل در پوشه files",File.DirInternal,"نام فایل بعد از  کپی") 



[ شنبه 27 تیر 1394 ] [ 02:07 ق.ظ ] [ علی ]
بوای تغییر مکان متن در label از این کد استفاده کنید

label1.Gravity = Gravity.makan
برای لیست ویو

ListView1.SingleLineLayout.Label.Gravity = Gravity.makan 


[ شنبه 27 تیر 1394 ] [ 02:06 ق.ظ ] [ علی ]


اول یک layout اضفه کنید و در اون یک panel اضافه کنید حالا یک lable با متن "ویجت" ایجاد کنید
خب از منوی project و add new module یک Service ایجاد کنید.
در قسمت Activity_Create این کد رو بنویسید

StartService(widget)
حالا این کد ها رو بریزد داخل Service :

#Region  Service Attributes
    #StartAtBoot: False
#End Region

Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'These variables can be accessed from all modules.
Dim r1 As RemoteViews
End Sub
Sub Service_Create
r1 = ConfigureHomeWidget("layout widjet","widjet(eventname)",0,"نام ویجت",False)

End Sub

Sub Service_Start (StartingIntent As Intent)
If r1.HandleWidgetEvents(StartingIntent) Then Return
'اگر ویجت آغاز شد هیچ کدی رو دیگه اجرا نکن
End Sub

Sub Service_Destroy

End Sub 



[ جمعه 26 تیر 1394 ] [ 12:15 ق.ظ ] [ علی ]
نظرات
برای تغییر رنگ متن label میتوانید از این کد استفاده کنید

label1.color = colors.rang
از رنگ های موجود ویا از

label1.color = Colors.RGB(0,0,0)
از کد رنگ دلخواه استفاده کنید 



[ جمعه 26 تیر 1394 ] [ 12:13 ق.ظ ] [ علی ]
نظرات
با این کد میتونید برای لیست ویو یه زمینه بزارید

    Dim background1 As BitmapDrawable
    background1.Initialize(LoadBitmap(File.DirAssets,"اسم عکس"))
    ListView1.SingleLineLayout.Background=background1

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







[ چهارشنبه 24 تیر 1394 ] [ 08:48 ب.ظ ] [ علی ]
نظرات

یه متغیر از نوع تایمر تعریف کنید . مثلا:
dim timer1 as timer

یک layout بسازید و در اون imageview برای همون splash اضافه کنید.
خب حالا داخل اکتیویتی تون این کد ها رو اضافه کنید.

    Activity.LoadLayout("اسم layout")
    Timer1.Initialize("Timer1",زمان بر حسب هزارم ثانیه اگر اشتباه نکنم)
    Timer1.Enabled = True
Sub Timer1_Tick
    StartActivity(اسم اکتیویتی جدید)
    Activity.Finish
End Sub


و یک جدید Activity بسازید که بعد splash وارد اون بشه








[ چهارشنبه 24 تیر 1394 ] [ 08:29 ب.ظ ] [ علی ]
نظرات
سلام دوستان
شاید دوست داشته باشین در کمترین زمان کتاب اندروید خودتنو بسازید و در بازار بفروشید اما وقت یاد گرفتن برنامه نوسی رو هزار دردسر دیگه رو ندارید
این سورس یک کتاب هست که توسط گروه ما نوشته شده شما میتونید با خرید اون با کم ترین هزینه کتاب بسازید و کسب درامد کنید

لینک خرید کتاب



[ چهارشنبه 24 تیر 1394 ] [ 07:24 ق.ظ ] [ علی ]
نظرات
خب اول باید وارد سایت عدد بشید و در قسمت نمایش دهندگان وارد رسانه های من بشید روی رسانه جدید کلیک کنید پکیج نیم برنامتون بنویسید و تایید رو بزنید حالا کتاب خانه عدد رو از اینجا دانلود کنید و بریزید داخل قسمت لایبری b4a حالا b4a رو باز کنید
کتابخانه های adad و reflection رو فعال کنید
این کدو به مانفیست ادیتورتون اضافه کنید
AddApplicationText(
<activity
android:name="ir.adad.AdadActivity"
android:theme="@android:style/Theme.Dialog">
</activity>
<meta-data android:name="ir.adad.token" android:value="YOUR_TOKEN"></meta-data>
<meta-data android:name="ir.adad.test_mode" android:value="true"></meta-data>
)

داخل قسمت your-token اون شناسه ای که بهتون داخل قسمت جزییات رسانه های من داده کپی کنید


این کدم به صفحه ای که میخواین توش تبلیغ باشه بریزید

Sub Activity_Create(FirstTime As Boolean)
Dim verticalPosition As String = "bottom" '"top" or "bottom"
Dim horizontalPosition As String = "center" '"left", "right" or "center"
Dim r As Reflector
Dim args(3) As Object = Array As Object(r.GetActivity, verticalPosition, horizontalPosition)
Dim types(3) As String = Array As String("android.app.Activity", "java.lang.String", "java.lang.String")
r.RunStaticMethod("ir.adad.AdadB4APlugin", "createAdView", args, types)
End Sub


اگر قبلا به برنامه اجاره یه دسترسی به اینترنت ندادید این کدو به مانفیست اضافه کنید
AddPermission(android.permission.INTERNET)



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

توجه موقع انتشار برنامه در مانفیست ادیتور:
<meta-data android:name="ir.adad.test_mode" android:value=" True "></meta-data>

True را به false تغییر بدید.


[ چهارشنبه 24 تیر 1394 ] [ 07:11 ق.ظ ] [ علی ]
نظرات
 
یه پروژه جدید باز کنید و اونو سیو کنید یه باتن اضافه کنید
باتن و کلیکش رو تعریف کنید
یه متغییر از نوع intent تعریف کنید
مثلا مال من cafe گزاشتم

dim cafe as intent 

حالا توی قسمت buttn_click مینویسم

cafe.Initialize(cafe.ACTION_EDIT,"bazaar://details?id=package name barname"
و داخل قسمتی که نوشتم package name barnae
package name برنامتون رو که از مسیر tools و package name رو توش کپی کنید
در آخر هم کد :

StartActivity(cafe

به همون قسمت buttn_click اضافه کنید


[ چهارشنبه 24 تیر 1394 ] [ 07:07 ق.ظ ] [ علی ]
نظرات
برای اجرای یک برنامه از یک مسیر خواص میتوانید از این کد استفاده کنید.
Dim i As Intent
i.Initialize(i.ACTION_VIEW, "file:///مسیر")
i.SetType("application/vnd.android.package-archive")

StartActivity(i)




برچسب ها: b4a، آموزش بیسیک،
[ چهارشنبه 24 تیر 1394 ] [ 06:59 ق.ظ ] [ علی ]
نظرات
.: Weblog Themes By WeblogSkin :.
درباره وبلاگ


آمار سایت
بازدیدهای امروز : نفر
بازدیدهای دیروز : نفر
كل بازدیدها : نفر
بازدید این ماه : نفر
بازدید ماه قبل : نفر
تعداد نویسندگان : عدد
كل مطالب : عدد
آخرین بروز رسانی :
امکانات وب