Parsi Coders

صفحات: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79

درود
دوست عزیز
خوب از browser همین برنامه استفاده کن
میخوای مرورگر مستقل باشه یه لینک کنی به مرورگر اندریود؟

به هر حال یه سمپل میازارم.
کتابخانه Phone library رو اضافه کنید و د زیر رو بنویسید.

کد:
Dim p As PhoneIntents

StartActivity(p.OpenBrowser("http://www.pxr.ir""))

بدرود

سلام به همه
من تازه عضو شدم و همه فرروم رو خوندم .
واقعا دستتون درد نکنه . خدا خیرتون بده .
مردم از بس که با eclipse سرو کله زدم . یه خواهش دارم
من نتونستم از لینک دانلود ورژن 1.9 استفاده کنم .
اگر کسی بتونه یه لینک از یه سایت دیگه بزاره یا برام ایمیل کنه ممنون میشم (ssalehi213@yahoo.com)

[attachment=237]با سلام خدمت استاد گرامی
بنده تونستم تا اینجا درست کنم اگه لطف کنید یک دکمه که به سایت زیر لینک بشه و فایل apk اون واسم بزارید ممنون می شم می دونم واسه شما کاری نداره

کد پی‌اچ‌پی:
[url]http://www.sabalan-gsm.com/forumdisplay.php?11-Android[/url] 

(06-23-2012، 11:06 AM)mobilemehdi نوشته: [ -> ]با درود خدمت استاد گرامی
بنده تونستم تا اینجا درست کنم اگه لطف کنید یک دکمه که به سایت زیر لینک بشه و فایل apk اون واسم بزارید ممنون می شم می دونم واسه شما کاری نداره

کد پی‌اچ‌پی:
[url]http://www.sabalan-gsm.com/forumdisplay.php?11-Android[/url]

آقا اینجا چند روزه کسی پاسخگو نیست . مشکلتو واضح تر بگو شاید بتونم کمک کنم .
در ضمن پوشه file رو که حاوی فایل bazar.bal هست رو نفرستادی
راستی شما basic4android ورژن 1.9 رو نداری برام بفرستی (ssalehi213@yahoo.com)

درود
اقا من فعلا به نت کم دسترسی دارم , شرمنده
اپلود کردم
بفرمایید:
[attachment=238]

(06-23-2012، 04:47 PM)ssalehi213 نوشته: [ -> ]
(06-23-2012، 11:06 AM)mobilemehdi نوشته: [ -> ]با درود خدمت استاد گرامی
بنده تونستم تا اینجا درست کنم اگه لطف کنید یک دکمه که به سایت زیر لینک بشه و فایل apk اون واسم بزارید ممنون می شم می دونم واسه شما کاری نداره

کد پی‌اچ‌پی:
[url]http://www.sabalan-gsm.com/forumdisplay.php?11-Android[/url]
آقا اینجا چند روزه کسی پاسخگو نیست . مشکلتو واضح تر بگو شاید بتونم کمک کنم .
در ضمن پوشه file رو که حاوی فایل bazar.bal هست رو نفرستادی
راستی شما basic4android ورژن 1.9 رو نداری برام بفرستی (ssalehi213@yahoo.com)

خدمت شما ممنون می شم کمکم کنید

(06-24-2012، 08:59 AM)mobilemehdi نوشته: [ -> ]
(06-23-2012، 04:47 PM)ssalehi213 نوشته: [ -> ]
(06-23-2012، 11:06 AM)mobilemehdi نوشته: [ -> ]با درود خدمت استاد گرامی
بنده تونستم تا اینجا درست کنم اگه لطف کنید یک دکمه که به سایت زیر لینک بشه و فایل apk اون واسم بزارید ممنون می شم می دونم واسه شما کاری نداره

کد پی‌اچ‌پی:
[url]http://www.sabalan-gsm.com/forumdisplay.php?11-Android[/url]
آقا اینجا چند روزه کسی پاسخگو نیست . مشکلتو واضح تر بگو شاید بتونم کمک کنم .
در ضمن پوشه file رو که حاوی فایل bazar.bal هست رو نفرستادی
راستی شما basic4android ورژن 1.9 رو نداری برام بفرستی (ssalehi213@yahoo.com)

خدمت شما ممنون می شم کمکم کنید

سلام
آقا برنامتون خیلی ایراد داشت . تا جایی که میشد درستش کردم
ببین این همون چیزی هست که میخواستی . البته با ورژن 1.9 درست شده [attachment=240]

سلام چطور میتونم از سنسور مجاورت یا همون PROXIMITY استفاده کنم؟

میخوام فقط با سنسور مجاورت عدد بشمارم، همون کانتر ساده اما بجای فشار دادن دکمه از سنسور مجاورت استفاده کنه، راهی هست؟

(06-24-2012، 05:10 PM)smfazel نوشته: [ -> ]درود چطور میتونم از سنسور مجاورت یا همون PROXIMITY استفاده کنم؟

میخوام فقط با سنسور مجاورت عدد بشمارم، همون کانتر ساده اما بجای فشار دادن دکمه از سنسور مجاورت استفاده کنه، راهی هست؟

این یه سمپله کمکت میکنه:

کد:
Sub Process_Globals

End Sub

Sub Globals

End Sub

Sub Activity_Create(FirstTime As Boolean)

    If FirstTime Then

        Dim ps As PhoneSensors 'This object is only used to access the type constants.

        Log("Accel="&ps.TYPE_ACCELEROMETER)

Msgbox(ps.TYPE_ACCELEROMETER,"Accelerometer")

'These appear to return 1 for the Value of TYPE_ACCELEROMETER

        ps.Initialize(ps.TYPE_ACCELEROMETER)

'This is basically what happens in the AddSensor Sub in the example program

        ps.StartListening("Sensor")

'Starts listening to the accelerometer

    End If

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub Sensor_SensorChanged (Values() As Float)

    Dim ps As PhoneSensors

    ps=Sender

'ps has a constant for TYPE_ACCELEROMETER, but how do I read what TYPE the sender is?

    Log(Sender)

    Msgbox(Sender,ps.TYPE_ACCELEROMETER)

End Sub

Amin_Mansouri

Amin_Mansouri

ssalehi213

mobilemehdi

ssalehi213

Amin_Mansouri

mobilemehdi

ssalehi213

smfazel

Amin_Mansouri