How to use xbrowse():lKinetic with xbrowse():bLClicked

[dutch]

I cannot use ::bLClicked with ::lKinetic.

Because ::bLClicked will action when I try to use finger to scroll the xbrowse (lKinetic).

How do I can use both as Mobile behavior?

Thanks in advance,

[nageswaragunupudi]

Set oBrw:lKinetic to .F.

If you are using Touch screen, XBrowse has builtin scrolling facility with fingers on touch screens.
This is perfect and much smoother than with lKinetic.
All touch gestures are supported including pinch and zoom.

[dutch]

Dear Master Rao,

I try both .F./.T. but :bOnClicked is still action while I scroll the xbrowse to next page.
XBrowse can check the touch behavier. I review in xbrowse.prg. Can xBrowse check :GetTickCount() (:nStartTime and :nEllapsed), if more than xxxx mili-second, it is touch.
Is it possible?

Thank you in advance,

Set oBrw:lKinetic to .F.

If you are using Touch screen, XBrowse has builtin scrolling facility with fingers on touch screens.
This is perfect and much smoother than with lKinetic.
All touch gestures are supported including pinch and zoom.

[nageswaragunupudi]

I try both .F./.T.

Please follow my advice.
Set lKinetic := .F. // .F. only. No second thoughts on this.

XBrowse can check the touch behavier. I review in xbrowse.prg. Can xBrowse check :GetTickCount() (:nStartTime and :nEllapsed), if more than xxxx mili-second, it is touch.
Is it possible?

Please do not overthink.
FWH Library uses Windows Touch API.
Windows knows a lot better than you and me how to distingush between a mouse click or a finger tap.
So, XBrowse can clearly distinguish whether it is a mouse click / finger tap / pan/ flick/ pinch / zoom etc touch gesture.

but :bOnClicked is still action while I scroll the xbrowse to next page.

Please follow this advice.
Syntax for coding bLClicked:

Code: Select all  Expand view

Eval( ::bLClicked, nRow, nCol, nKeyFlags, Self, lTouch )
 

You may code like this:

Code: Select all  Expand view

oBrw:bLClicked := { |r,c,f,brw,lTouch| If( lTouch, nil, MyAction(r,c,f,brw) ) }
 

[dutch]

Dear Master,

1. I do not use real Touch Screen (I use Android mobile with RDP to Windows Desktop)
2. I do not set :lKinetic := .F., I can use Drag and scroll but I cannot use :bLClicked. If I set :bLClicked, :lKinetic does not work.
3. I do not :lKinetic := .F., and :bLClick := { |r,c,f,brw,lTouch| if(lTouch, nil, MyFunc() ) } *lTouch alway .T.*. It means, MyFunc() never call.
4. I do :lKinetic := .F., Drag and scroll is not working.

These are all my test.

Thank you in advance,

I try both .F./.T.

Please follow my advice.
Set lKinetic := .F. // .F. only. No second thoughts on this.

XBrowse can check the touch behavier. I review in xbrowse.prg. Can xBrowse check :GetTickCount() (:nStartTime and :nEllapsed), if more than xxxx mili-second, it is touch.
Is it possible?

Please do not overthink.
FWH Library uses Windows Touch API.
Windows knows a lot better than you and me how to distingush between a mouse click or a finger tap.
So, XBrowse can clearly distinguish whether it is a mouse click / finger tap / pan/ flick/ pinch / zoom etc touch gesture.

but :bOnClicked is still action while I scroll the xbrowse to next page.

Please follow this advice.
Syntax for coding bLClicked:

Code: Select all  Expand view

Eval( ::bLClicked, nRow, nCol, nKeyFlags, Self, lTouch )
 

You may code like this:

Code: Select all  Expand view

oBrw:bLClicked := { |r,c,f,brw,lTouch| If( lTouch, nil, MyAction(r,c,f,brw) ) }
 

[nageswaragunupudi]

Oh.
I thought you were using Windows Tablet or Touch screen PC
Let me think