Android Question button longclick time set?

[Hacky35]

Hello,
first of all, thank you everyone. I'm still a beginner, so my questions might seem simple

How can I change the button's longclick time?

 

[mangojack]

Possible solution ...

Changing LongClick delay?

I want to change delay after which LongClick() event is raised for a button. I think below code will work, but I don't know how to implement it in B4A: http://stackoverflow.com/a/32979806/3800856 I need to do it for several buttons. Need help...!

www.b4x.com

 

[Hacky35]

Possible solution ...

Thank you for your help,
I couldn't install the example, it gives an old Android version message.
Also, the application I'm trying to write has 48 buttons.
I think there will be too many "sub"s for each one.
I wish there was a command similar to
longclick, (delay_Time)

Regards

 

[Erel]

Full example with SwiftButton (XUI Views), supporting multiple buttons. Make sure that the Event Name of all of them is set to SwiftButton:

Sub Class_Globals
    Private Root As B4XView
    Private xui As XUI
    Private SwiftButton1 As SwiftButton
    Private SwiftButtonsIndices As Map = CreateMap()
End Sub

Public Sub Initialize
End Sub

Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Root.LoadLayout("MainPage")
End Sub

Private Sub SwiftButton_ButtonDown
    Dim btn As SwiftButton = Sender
    Dim Index As Int = SwiftButtonsIndices.GetDefault(btn, 0)
    Index = Index + 1
    SwiftButtonsIndices.Put(btn, Index)
    Sleep(3000)
    Dim NewIndex As Int = SwiftButtonsIndices.GetDefault(btn, 0)
    If NewIndex = Index Then
        Log("Long click after 3 seconds")
        XUIViewsUtils.PerformHapticFeedback(btn.mBase)
    End If
End Sub

Private Sub SwiftButton_ButtonUp
    Dim index As Int = SwiftButtonsIndices.GetDefault(Sender, 0)
    SwiftButtonsIndices.Put(Sender, index + 1)
End Sub

 

[Hacky35]

Thank you @Erel , I will try it as soon as possible.