+- Parsi Coders (http://parsicoders.com)
+-- انجمن: Mobile (http://parsicoders.com/forumdisplay.php?fid=56)
+--- انجمن: Basic4Android (http://parsicoders.com/forumdisplay.php?fid=112)
+--- موضوع: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها (/showthread.php?tid=1439)
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - ardalanhoo - 10-29-2013
دوستان عزیز بسیار سپاسگزارم از راهنمایی شما
من از طریق HttpUtils2 براحتی عکس را دانلود کرده و مثلا بعنوان پیش زمینه استفاده می کنم ولی مشکل اصلی من در استفاده از دیتابیس است. بطور مثال من یک فایل را دانلود می کنم:job2.Download("http://...ir/bank.db")pاما نمی دونم چگونه از اطلاعات آن استفاده کنم و به جای دیتابیس قبلی بذارم که از این طریق بتوانم مطالب برنامه را آپدیت کنم.
خیلی ممنون میشم اگر من را راهنمایی کنید
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - seyedsharifi - 10-29-2013
(10-27-2013، 05:30 PM)'arya67' نوشته:(10-21-2013، 05:09 PM)'ardalanhoo' نوشته: با درود
سپاسگزارم از مطالب و بحث های مفید انجمن
من میخواهم مطالب برنامه ام را از طریق اینترنت بروز کنم. مثلا شبیه برنامه هایی که قیمت سکه و دلار را بروز می کنند و یا مطالب روزانه ای که از طریق اتصال به اینترنت به روز می شوند.
خوشحال می شوم اگر مرا راهنمایی کنید.
با سپاس فراوان.
شاد باشید.
با درود
میتوانید از وب سوریس و HttpUtils2 استفاده کنید
اینجا رو نگاه کنید: http://www.basic4ppc.com/android/forum/threads/httputils2-web-services-are-now-even-simpler.18992/
نمونه کد:
کد:Sub Activity_Create(FirstTime As Boolean)
Dim job1, job2, job3 As HttpJob
job1.Initialize("Job1", Me)
'Send a GET request
job1.Download2("http://www.basic4ppc.com/print.php", _
Array As String("first key", "first value smiley", "second key", "value 2"))
'Send a POST request
job2.Initialize("Job2", Me)
job2.PostString("http://www.basic4ppc.com/print.php", "first key=first value&key2=value2")
'Send a GET request
job3.Initialize("Job3", Me)
job3.Download("http://www.basic4ppc.com/forum/images/categories/android.png")
End Sub
Sub JobDone (Job As HttpJob)
Log("JobName = " & Job.JobName & ", Success = " & Job.Success)
If Job.Success = True Then
Select Job.JobName
Case "Job1", "Job2"
'print the result to the logs
Log(Job.GetString)
Case "Job3"
'show the downloaded image
Activity.SetBackgroundImage(Job.GetBitmap)
End Select
Else
Log("Error: " & Job.ErrorMessage)
ToastMessageShow("Error: " & Job.ErrorMessage, True)
End If
Job.Release
End Sub
(10-22-2013، 09:13 AM)'seyedsharifi' نوشته:(10-17-2013، 03:36 PM)'arya67' نوشته:(10-12-2013، 01:05 PM)'seyedsharifi' نوشته: با درود
چطوری میتونم وقتی گوشی زنگ خورد دتکت کنم وشماره تلفن تماس گیرنده را بدست آورم
لطفا راهنمایی کنید
با درود
باید از این کد در manifest استفاده کنیدیا باید BroadcastReceiver رو در برنامه تعریف کنید و سپس:کد پی‌اچ‌پی:<receiver android:name=".PhoneStateReceiver">
<intent-.......>
<action android:name="android.intent.action.PHONE_STATE" />
</intent-.......>
</receiver>اینجوری هم وقتی زنگ زده میشه و هم وقتی زنگ خورده میشه رسیور عمل میکنهکد پی‌اچ‌پی:Sub BroadcastReceiver_OnReceive (Action As String, BroadcastIntent As Object)
myintent = BroadcastIntent
If myintent.Action = "android.intent.action.PHONE_STATE" Then
If myintent.GetExtra("state") = "RINGING" Then
callernumber = myintent.GetExtra("incoming_number")
End if
End If
If myintent.Action = "android.intent.action.NEW_OUTGOING_CALL" Then
If myintent.HasExtra("android.intent.extra.PHONE_NUMBER") Then
callnumber = myintent.GetExtra("android.intent.extra.PHONE_NUMBER")
End If
End If
End Sub
ببخشید ولی این کد که برای بیسیک نیست
با درود
چرا دوست من، این کد برای بیسیک می باشد
با سلام و با تشکر از جوابی که دادید
من هرچه سعی کردم نتونستم از این کد استفاده کنم
مثلا من میخواهم برنامه ام در قسمت سرویس باشد و وقتی گوشی زنگ خورد توسط برنامه بفهمم که گوشی زنگ خورده و مثلا شماره تماس گیرنده را بدست بیاورم
لطفا با یک مثال برایم پاسخ دهید
با تشکر
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - ardalanhoo - 10-30-2013
(10-27-2013، 09:13 AM)'seyedsharifi' نوشته:دوست عزیز چطور میتونم این کار رو انجام بدم. لطفا یک کد نمونه بدید. ممنون(10-27-2013، 04:57 AM)'ardalanhoo' نوشته: درود
میخواستم بپرسم چگونه می‌توان دیتابیس برنامه را آپدیت کرد؟ تا ایجا که فایل دیتابیس دانلود شود مشکلی نیست، بعدش چگونه میشود اطلاعات فایل دانلود شده را استفاده می‌کند و آن را جایگزین فایل قبلی کرد؟
لطفا اگر امکان دارد راهنمایی کنید. ممنون میشم.
بعد از اینکه فایل را دانلود کردید بر روی دیتابیس قبلی کپی کنید و بعد دیتابیس را باز کنید تا اطلاعات جدید را استفاده کنید
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - seyedsharifi - 10-30-2013
(10-30-2013، 12:42 PM)'ardalanhoo' نوشته:اگر منظور شما دستور کپی می باشد بصورت زیر است(10-27-2013، 09:13 AM)'seyedsharifi' نوشته:دوست عزیز چطور میتونم این کار رو انجام بدم. لطفا یک کد نمونه بدید. ممنون(10-27-2013، 04:57 AM)'ardalanhoo' نوشته: درود
میخواستم بپرسم چگونه می‌توان دیتابیس برنامه را آپدیت کرد؟ تا ایجا که فایل دیتابیس دانلود شود مشکلی نیست، بعدش چگونه میشود اطلاعات فایل دانلود شده را استفاده می‌کند و آن را جایگزین فایل قبلی کرد؟
لطفا اگر امکان دارد راهنمایی کنید. ممنون میشم.
بعد از اینکه فایل را دانلود کردید بر روی دیتابیس قبلی کپی کنید و بعد دیتابیس را باز کنید تا اطلاعات جدید را استفاده کنید
کد:
File.Copy(File.DirAssets, "test", File.DirInternal, "test")که باید نام فایل و مسیر مورد نظر را خودتان تعیین کنید
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - ardalanhoo - 10-31-2013
(10-30-2013، 06:29 PM)'seyedsharifi' نوشته:(10-30-2013، 12:42 PM)'ardalanhoo' نوشته:اگر منظور شما دستور کپی می باشد بصورت زیر است(10-27-2013، 09:13 AM)'seyedsharifi' نوشته:دوست عزیز چطور میتونم این کار رو انجام بدم. لطفا یک کد نمونه بدید. ممنون(10-27-2013، 04:57 AM)'ardalanhoo' نوشته: درود
میخواستم بپرسم چگونه می‌توان دیتابیس برنامه را آپدیت کرد؟ تا ایجا که فایل دیتابیس دانلود شود مشکلی نیست، بعدش چگونه میشود اطلاعات فایل دانلود شده را استفاده می‌کند و آن را جایگزین فایل قبلی کرد؟
لطفا اگر امکان دارد راهنمایی کنید. ممنون میشم.
بعد از اینکه فایل را دانلود کردید بر روی دیتابیس قبلی کپی کنید و بعد دیتابیس را باز کنید تا اطلاعات جدید را استفاده کنید
کد:File.Copy(File.DirAssets, "test", File.DirInternal, "test")
که باید نام فایل و مسیر مورد نظر را خودتان تعیین کنید
فکر می کنم شما متوجه منظور من نشدید. در هر صورت سپاسگذارم.
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - mpc - 11-02-2013
سلام
اشکال این برنامه چیه ؟ لطفا استاتید راهنمایی کنند
قرار با کشیدن دست روی صفحه خط یکشه
#Region Project Attributes
#ApplicationLabel: Test Draw
#VersionCode: 1
#VersionName:
'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: portrait
#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.
' Dim bmpImage, bmpTest, bmpTransparent As Bitmap
Dim pnlTest As Panel
Dim cvsImage, cvsTest As Canvas
Dim Label3 As Label
Dim Label4 As Label
Dim LineColor As Int : LineColor=Colors.Blue
Dim LineWidth As Float : LineWidth=3
Dim x1 As Float : x1=0
Dim y1 As Float : y1=0
Dim x2 As Float : x2=0
Dim y2 As Float : y2=0
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("Layout")
cvsImage.Initialize(Activity)
Label3.Text ="X = 0.0"
Label4.Text ="Y = 0.0"
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Touch (Action As Int, X As Float, Y As Float)
If Action=Activity.ACTION_DOWN Then
x1=X
y1=Y
x2=X
y2=Y
Label3.Text="X = " & X
Label4.Text="Y = " & Y
Else If Action=Activity.ACTION_MOVE Then
x2=X
y2=Y
pnlTest.Color=Colors.Transparent
cvsTest.Initialize(pnlTest)
cvsTest.DrawLine(x1,y1-pnlTest.Top,x2,y2-pnlTest.Top,Colors.Red,LineWidth)
pnlTest.Invalidate
Label3.Text="X = " & X
Label4.Text="Y = " & Y
Else If Action=Activity.ACTION_UP Then
pnlTest.Color=Colors.Transparent
cvsTest.Initialize(pnlTest)
cvsImage.DrawLine(x1,y1,x2,y2,LineColor,LineWidth)
End If
End Sub
#ApplicationLabel: Test Draw
#VersionCode: 1
#VersionName:
'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: portrait
#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.
' Dim bmpImage, bmpTest, bmpTransparent As Bitmap
Dim pnlTest As Panel
Dim cvsImage, cvsTest As Canvas
Dim Label3 As Label
Dim Label4 As Label
Dim LineColor As Int : LineColor=Colors.Blue
Dim LineWidth As Float : LineWidth=3
Dim x1 As Float : x1=0
Dim y1 As Float : y1=0
Dim x2 As Float : x2=0
Dim y2 As Float : y2=0
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("Layout")
cvsImage.Initialize(Activity)
Label3.Text ="X = 0.0"
Label4.Text ="Y = 0.0"
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Touch (Action As Int, X As Float, Y As Float)
If Action=Activity.ACTION_DOWN Then
x1=X
y1=Y
x2=X
y2=Y
Label3.Text="X = " & X
Label4.Text="Y = " & Y
Else If Action=Activity.ACTION_MOVE Then
x2=X
y2=Y
pnlTest.Color=Colors.Transparent
cvsTest.Initialize(pnlTest)
cvsTest.DrawLine(x1,y1-pnlTest.Top,x2,y2-pnlTest.Top,Colors.Red,LineWidth)
pnlTest.Invalidate
Label3.Text="X = " & X
Label4.Text="Y = " & Y
Else If Action=Activity.ACTION_UP Then
pnlTest.Color=Colors.Transparent
cvsTest.Initialize(pnlTest)
cvsImage.DrawLine(x1,y1,x2,y2,LineColor,LineWidth)
End If
End Sub
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - arya67 - 11-03-2013
(10-30-2013، 12:42 PM)'ardalanhoo' نوشته:(10-27-2013، 09:13 AM)'seyedsharifi' نوشته:دوست عزیز چطور میتونم این کار رو انجام بدم. لطفا یک کد نمونه بدید. ممنون(10-27-2013، 04:57 AM)'ardalanhoo' نوشته: درود
میخواستم بپرسم چگونه می‌توان دیتابیس برنامه را آپدیت کرد؟ تا ایجا که فایل دیتابیس دانلود شود مشکلی نیست، بعدش چگونه میشود اطلاعات فایل دانلود شده را استفاده می‌کند و آن را جایگزین فایل قبلی کرد؟
لطفا اگر امکان دارد راهنمایی کنید. ممنون میشم.
بعد از اینکه فایل را دانلود کردید بر روی دیتابیس قبلی کپی کنید و بعد دیتابیس را باز کنید تا اطلاعات جدید را استفاده کنید
با سلاک
من درست متوجه نشدم مشکلتون رو
اگر فایل را دانلود کردید، خوب با دستور کپی روی دیتابیش قبلی کپیش کنید و از دیتابیس جدید استفاده کنید
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - mpc - 11-03-2013
(11-02-2013، 08:19 PM)'mpc' نوشته: درود
اشکال این برنامه چیه ؟ لطفا استاتید راهنمایی کنند
قرار با کشیدن دست روی صفحه خط یکشه
چقدر جواب دادید
آدم امیدوار میشه به راهنمایی های شما
میشه سورس چند نمونه برنامه خوب از ساده به سخت را در سایت قرار دهید و یا منبع آن ها را معرفی نمائید
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - seyedsharifi - 11-04-2013
(11-03-2013، 10:25 PM)'mpc' نوشته:(11-02-2013، 08:19 PM)'mpc' نوشته: درود
اشکال این برنامه چیه ؟ لطفا استاتید راهنمایی کنند
قرار با کشیدن دست روی صفحه خط یکشه
چقدر جواب دادید
آدم امیدوار میشه به راهنمایی های شما
میشه سورس چند نمونه برنامه خوب از ساده به سخت را در سایت قرار دهید و یا منبع آن ها را معرفی نمائید
با سلام دوست عزیز
اینجا تنها جایی هست که در مورد B4A فعالیت دارد و من در هیچ سایت دیگری تاپیکی برای این موضوع پیدا نکردم
منتها نمیدانم B4A خواهان کمی دارد یا کاراییش کم است یا به چه دلیل مراجعه کننده به این قسمت کم میباشد و کم پیدا میشود کسی جواب ما را بدهد
پیشنهاد میکنم از راهنمایی های خود سایت B4A استفاده کنید و به جواب برسید
من مدتی است که شروع به کار کرده ام ولی پیشرفتم کم است چون براحتی دیگر تاپیکها نمیشود از اینجا نتیجه گرفت
انشا الله که کسایی پیدا شوند تا ما را بهتر و دقیقتر راهنمایی کنند
در آخر از مدیریت سایت برای ایجاد این تاپیک و همکارانی که ما را راهنمایی میکنند کمال تشکر را دارم
RE: اموزش برنامه نویسی اندروید به همراه تمامی ابزارها - wikiccu - 11-04-2013
نمیدونم قضیه چیه هرچی اینجا سوال میپرسم 1 دیقه بعد جوابشو خودم پیدا میکنمیعنی این سوال آخر 3 روز وقت گذاشتم نشد ! الان 5 دیقه نشده سوال کردم خودم فهمیدم جوابشو جواب سوال :برای استفاده از فایل csv که حاوی فایل پارسی هستش با sqlite manager توی پلاگین های FireFox میشه سالم import کردش