Android Question [Class] Flexible Table

[Sergey_New]

If possible, how can I change a short press to a long press and vice versa depending on the app settings?
If this isn't possible, what are your suggestions for using the following tapping methods in lists, tables, and the like:
1. Short press - to open the contents of a table row.
2. Long press - to select a row only.

 

[klaus]

In the Table class you have the CellClick and the CellLongClick events.
It is up to you to do what you want with each event.
You can check in each event the current settings and execute different code depending on these settings.

 

[Sergey_New]

It is up to you to do what you want with each event.

Thanks! I do this for every Activity containing a Table.
I'd like to use a variable from the application to modify the CellClick and CellLongClick events in the class itself.

 

[klaus]

Sorry, but i do not want to modify the class for specific needs.
The class must remain 'universal'.
But anyway, as you have the source code, feel free to make the modifications for your special requirements.
The source code is open source and you can use it and modify it.

 

[Sergey_New]

The source code is open source and you can use it and modify it.

I tried this, but it didn't work.
Can you tell me how to change the class that produces the desired result?

 

[klaus]

Show me what you have tested, so i can see what you want.

 

[Sergey_New]

Show me what you have tested

I add the required value (Starter.OneClick) to this code

Private Sub InitTable
    Data.Initialize
    If visibleRows.IsInitialized=False Then
        If Starter.OneClick Then
            Cell_Click
        Else
            Cell_LongClick
        End If
    End If
    visibleRows.Initialize
    '...

Perhaps new functions need to be created for Cell_Click and Cell_LongClick, but I don't know how to do that correctly.

 

[klaus]

In the Table class you have the Cell_Click Routine and the Cell_LongClick routine.
You should manage the difference in these routines.

Private Sub Cell_Click
    Dim rc As RowCol
    Dim L As Label
    L = Sender
    rc = L.Tag

'    SelectRow(rc.Row)
    SelectRow(rc)
    If SubExists(cCallBack, cEventName & "_CellClick") Then
        CallSub3(cCallBack, cEventName & "_CellClick", rc.Col, rc.Row)
    End If
End Sub

Depending on your global variable you could call either
CallSub3(cCallBack, cEventName & "_CellClick", rc.Col, rc.Row)
or
CallSub3(cCallBack, cEventName & "_CellLongClick", rc.Col, rc.Row)
Or any other routine.

And the same in the the other one.

 

[Sergey_New]

Depending on your global variable you could call either

Thank you so much, everything works!
Here's what I got.

Private Sub Cell_LongClick
    Dim rc As RowCol
    Dim L As Label
    L = Sender
    rc = L.Tag
    SelectRow(rc)
    If SubExists(cCallBack, cEventName & "_CellLongClick") Then
        If Starter.OneClick Then
            CallSub3(cCallBack, cEventName & "_CellLongClick", rc.Col, rc.Row)
        Else
            CallSub3(cCallBack, cEventName & "_CellClick", rc.Col, rc.Row)
        End If
'        CallSub3(cCallBack, cEventName & "_CellLongClick", rc.Col, rc.Row)
    End If
End Sub

Private Sub Cell_Click
    Dim rc As RowCol
    Dim L As Label
    L = Sender
    rc = L.Tag
    SelectRow(rc)
    If SubExists(cCallBack, cEventName & "_CellClick") Then
        If Starter.OneClick Then
            CallSub3(cCallBack, cEventName & "_CellClick", rc.Col, rc.Row)
        Else
            CallSub3(cCallBack, cEventName & "_CellLongClick", rc.Col, rc.Row)
        End If
'        CallSub3(cCallBack, cEventName & "_CellClick", rc.Col, rc.Row)
    End If
End Sub