دکمه شناور در تمامی گوشی

[محمد مهدی کمالی 19]

سلام 

من یه سورس دکمه شناور تو کل محیط گوشی پیدا کردم 

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

ولی تو ران گرفتن یه مشکلی داره 

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

لطفا مشکلشو بهم بگین تا درستش کنم و بقیه هم استفاده کنن

 

سورس+کتابخانه

[محمد مهدی کمالی 19]

سلام 

فک کنم مشکل از ورژن بیسیک باشه 

من 7 رو دارم و نمیتونم کامپایل کنم

لطفا کمکم کنید

سلام 

فک کنم مشکل از ورژن بیسیک باشه 

من 7 رو دارم و نمیتونم کامپایل کنم

لطفا کمکم کنید

[Hamidreza233 31]

در 55 دقیقه قبل، mmkmmk گفته است :

سلام 

فک کنم مشکل از ورژن بیسیک باشه 

من 7 رو دارم و نمیتونم کامپایل کنم

لطفا کمکم کنید

سلام 

فک کنم مشکل از ورژن بیسیک باشه 

من 7 رو دارم و نمیتونم کامپایل کنم

لطفا کمکم کنید

درود فایل سالم هست و مشکلی نداره فقط یه Layout ایجاد کنید به اسم main و ذخیره کنید (اگر وجود داشت باز هم به همین اسم ذخیره کنید)

و باتون های زیر رو تویه لی اوت اضافه کنید

ButtonStart
ButtonStop
Button1
Button2
Button3
Button4

موفق و پیروز باشید !
تشکر یادتون نره

[محمد مهدی کمالی 19]

در 30 دقیقه قبل، Hamidreza233 گفته است :

درود فایل سالم هست و مشکلی نداره فقط یه Layout ایجاد کنید به اسم main و ذخیره کنید (اگر وجود داشت باز هم به همین اسم ذخیره کنید)

و باتون های زیر رو تویه لی اوت اضافه کنید

ButtonStart
ButtonStop
Button1
Button2
Button3
Button4

موفق و پیروز باشید !
تشکر یادتون نره

ممنون من همین کار رو انجام دادم ولی باز اخطار میده

** Service (starter) Start **
** Activity (main) Create, isFirst = true **
** Activity (main) Resume **
** Service (standout) Create **
standoutonStartCommand (java line: 80)
java.lang.NoSuchMethodError: No static method onStartCommand(Lanywheresoftware/b4a/BA;)Z in class Lanywheresoftware/b4a/objects/ServiceHelper$StarterHelper; or its super classes (declaration of 'anywheresoftware.b4a.objects.ServiceHelper$StarterHelper' appears in /data/app/b4a.example-2/base.apk)
    at b4a.example.standout.onStartCommand(standout.java:80)
    at android.app.ActivityThread.handleServiceArgs(ActivityThread.java:3297)
    at android.app.ActivityThread.-wrap21(ActivityThread.java)
    at android.app.ActivityThread$H.handleMessage(ActivityThread.java:1565)
    at android.os.Handler.dispatchMessage(Handler.java:102)
    at android.os.Looper.loop(Looper.java:154)
    at android.app.ActivityThread.main(ActivityThread.java:6077)
    at java.lang.reflect.Method.invoke(Native Method)
    at com.android.internal.os.ZygoteInit$MethodAndArgsCaller.run(ZygoteInit.java:865)
    at com.android.internal.os.ZygoteInit.main(ZygoteInit.java

یه لایوت با اسم main درست کردم 6 دکمه مذکور رو ایجاد کردم و تو رویداد کلیکشونم کاری ک باید بشه(استارت و استاپ ) رو کد زدم ولی ارور میده
 

[Hamidreza233 31]

یه پروژه جدا ایجاد کن !

کتابخانه SD_FloatingStandOut رو تیک بزن

یه layout بساز به اسم main توش این دکمه هارو بذار

ButtonStart
ButtonStop
Button1
Button2
Button3
Button4

بعد این کدهارو بنویس بازم ببین همین ارور رو میده ؟

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

#Region  Activity Attributes 
	#FullScreen: False
	#IncludeTitle: False
#End Region
' remenber Add on Manifest this permission:
'	<uses-permission android:name="android.permission.SYSTEM_ALERT_WINDOW"/>

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 Label As Label
	Private PanelMenu As Panel
	Private PanelMain As Panel
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")
	Activity.LoadLayout("main")
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image1.png"
	FloatingStandOut.X=50%x
	FloatingStandOut.Y=50%y
	
	FloatingStandOut.SetEvent("FS")
	FloatingStandOut.SetStartActivity(True,False,False)
	FloatingStandOut.SetStopFloating(False,False,True)
	FloatingStandOut.Start(Me)
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Touch (Action As Int, X As Float, Y As Float)
	Activity.Finish
End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub ButtonStart_Click
	FloatingStandOut.Start(Me)
End Sub

Sub ButtonStop_Click
	FloatingStandOut.Stop
End Sub

Sub Button1_Click
	FloatingStandOut.Stop
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image1.png"
	FloatingStandOut.Start(Me)
End Sub

Sub Button2_Click
	FloatingStandOut.Stop
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image2.png"
	FloatingStandOut.Start(Me)
End Sub

Sub Button3_Click
	FloatingStandOut.Stop
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image3.png"
	FloatingStandOut.Start(Me)
End Sub

Sub Button4_Click
	FloatingStandOut.Stop
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image4.png"
	FloatingStandOut.Start(Me)
End Sub


Sub FS_OnClick(X As Int,Y As Int)
	'Label.Text="Single Tap"
	PanelMain.Visible=False
	PanelMenu.Visible=True
	PanelMenu.Left=FloatingStandOut.X-(PanelMenu.Width-FloatingStandOut.WidthImage)/2
	PanelMenu.top=FloatingStandOut.y-(PanelMenu.Height-FloatingStandOut.HeightImage)/2
	StartActivity(Me)
End Sub

Sub FS_OnDoubleClick(X As Int,Y As Int)
	PanelMain.Visible=False
	PanelMenu.Visible=True
	PanelMenu.Left=FloatingStandOut.X-(PanelMenu.Width-FloatingStandOut.WidthImage)/2
	PanelMenu.top=FloatingStandOut.y-(PanelMenu.Height-FloatingStandOut.HeightImage)/2
	Label.Text="Double Tap"
End Sub

Sub FS_OnLongClick(X As Int,Y As Int)
	Label.Text="Long Tap"
End Sub

Sub FS_OnMove(X As Int,Y As Int)
	If PanelMenu.Visible Then 
		PanelMenu.Left=FloatingStandOut.X-(PanelMenu.Width-FloatingStandOut.WidthImage)/2
		PanelMenu.top=FloatingStandOut.y-(PanelMenu.Height-FloatingStandOut.HeightImage)/2
	End If
End Sub

Sub Button_Click
	PanelMain.Visible=True
	PanelMenu.Visible=False
End Sub

Sub PanelMain_Touch (Action As Int, X As Float, Y As Float)
	
End Sub

اگر دوباره ارور داد به من بگید

[محمد مهدی کمالی 19]

در 38 دقیقه قبل، Hamidreza233 گفته است :

یه پروژه جدا ایجاد کن !

کتابخانه SD_FloatingStandOut رو تیک بزن

یه layout بساز به اسم main توش این دکمه هارو بذار

ButtonStart
ButtonStop
Button1
Button2
Button3
Button4

بعد این کدهارو بنویس بازم ببین همین ارور رو میده ؟

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

#Region  Activity Attributes 
	#FullScreen: False
	#IncludeTitle: False
#End Region
' remenber Add on Manifest this permission:
'	<uses-permission android:name="android.permission.SYSTEM_ALERT_WINDOW"/>

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 Label As Label
	Private PanelMenu As Panel
	Private PanelMain As Panel
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")
	Activity.LoadLayout("main")
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image1.png"
	FloatingStandOut.X=50%x
	FloatingStandOut.Y=50%y
	
	FloatingStandOut.SetEvent("FS")
	FloatingStandOut.SetStartActivity(True,False,False)
	FloatingStandOut.SetStopFloating(False,False,True)
	FloatingStandOut.Start(Me)
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Touch (Action As Int, X As Float, Y As Float)
	Activity.Finish
End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub ButtonStart_Click
	FloatingStandOut.Start(Me)
End Sub

Sub ButtonStop_Click
	FloatingStandOut.Stop
End Sub

Sub Button1_Click
	FloatingStandOut.Stop
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image1.png"
	FloatingStandOut.Start(Me)
End Sub

Sub Button2_Click
	FloatingStandOut.Stop
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image2.png"
	FloatingStandOut.Start(Me)
End Sub

Sub Button3_Click
	FloatingStandOut.Stop
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image3.png"
	FloatingStandOut.Start(Me)
End Sub

Sub Button4_Click
	FloatingStandOut.Stop
	FloatingStandOut.PathImage=File.DirAssets
	FloatingStandOut.NameFileImage="image4.png"
	FloatingStandOut.Start(Me)
End Sub


Sub FS_OnClick(X As Int,Y As Int)
	'Label.Text="Single Tap"
	PanelMain.Visible=False
	PanelMenu.Visible=True
	PanelMenu.Left=FloatingStandOut.X-(PanelMenu.Width-FloatingStandOut.WidthImage)/2
	PanelMenu.top=FloatingStandOut.y-(PanelMenu.Height-FloatingStandOut.HeightImage)/2
	StartActivity(Me)
End Sub

Sub FS_OnDoubleClick(X As Int,Y As Int)
	PanelMain.Visible=False
	PanelMenu.Visible=True
	PanelMenu.Left=FloatingStandOut.X-(PanelMenu.Width-FloatingStandOut.WidthImage)/2
	PanelMenu.top=FloatingStandOut.y-(PanelMenu.Height-FloatingStandOut.HeightImage)/2
	Label.Text="Double Tap"
End Sub

Sub FS_OnLongClick(X As Int,Y As Int)
	Label.Text="Long Tap"
End Sub

Sub FS_OnMove(X As Int,Y As Int)
	If PanelMenu.Visible Then 
		PanelMenu.Left=FloatingStandOut.X-(PanelMenu.Width-FloatingStandOut.WidthImage)/2
		PanelMenu.top=FloatingStandOut.y-(PanelMenu.Height-FloatingStandOut.HeightImage)/2
	End If
End Sub

Sub Button_Click
	PanelMain.Visible=True
	PanelMenu.Visible=False
End Sub

Sub PanelMain_Touch (Action As Int, X As Float, Y As Float)
	
End Sub

اگر دوباره ارور داد به من بگید

بازم همون اخطار رو میده

فک کنم مشکل از این خط

وقتی اینو کامنت میکنم کامل اجرا میشه حالا جز همون خط

FloatingStandOut.Start(Me)

@Hamidreza233

[محمد مهدی کمالی 19]

در در 1396/10/18, 09:07:15، Hamidreza233 گفته است :

اوکی واستون ردیفش میکنم

سلام 

چی شد تونستین کاری کنید

[محمد مهدی کمالی 19]

کسی نیس مشکل مارو حل کنه عایاا

 

[Hamidreza233 31]

در در 1396/10/16, 13:30:49، mmkmmk گفته است :

بازم همون اخطار رو میده

فک کنم مشکل از این خط

وقتی اینو کامنت میکنم کامل اجرا میشه حالا جز همون خط

FloatingStandOut.Start(Me)

@Hamidreza233

برایه چی از کتابخونه Floating Action Button استفاده نمیکنید ؟ پیش نمایش در بالا

اگه مثال + کتابخونه رو میخواید منو دنبال کنید تا ساعات دیگر میذارم

[محمد مهدی کمالی 19]

در 2 ساعت قبل، Hamidreza233 گفته است :

برایه چی از کتابخونه Floating Action Button استفاده نمیکنید ؟ پیش نمایش در بالا

اگه مثال + کتابخونه رو میخواید منو دنبال کنید تا ساعات دیگر میذارم

ممنون منتظر هستم

 

[Hamidreza233 31]

در 1 ساعت قبل، mmkmmk گفته است :

ممنون منتظر هستم

 

منو دنبال کنید تا فردا ظهر میذارم واستون

[محمد مهدی کمالی 19]

در 1 ساعت قبل، Hamidreza233 گفته است :

منو دنبال کنید تا فردا ظهر میذارم واستون

این کتابخونه میتونه یه دکمه شناور تو کل گوشی ایجاد کنه 

مثلا یک دکمه کنار صفحه ک وقتی تو منو خود گوشی یا تلگرام یا هرجا که باشی اون باشه و فعال باشه

با این کتابخونه فقط میشه تو محیط برنامه خودمون یه دکمه ایجاد شه و با خارج شدن از برنامه هم خب میره دیگه

[Hamidreza233 31]

در 7 ساعت قبل، mmkmmk گفته است :

این کتابخونه میتونه یه دکمه شناور تو کل گوشی ایجاد کنه 

مثلا یک دکمه کنار صفحه ک وقتی تو منو خود گوشی یا تلگرام یا هرجا که باشی اون باشه و فعال باشه

با این کتابخونه فقط میشه تو محیط برنامه خودمون یه دکمه ایجاد شه و با خارج شدن از برنامه هم خب میره دیگه

اوکی واستون ردیفش میکنم

[Hamidreza233 31]

در 23 ساعت قبل، mmkmmk گفته است :

سلام 

چی شد تونستین کاری کنید

در حال مطالعه هستم . ..