FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour How to use xbrowse():lKinetic with xbrowse():bLClicked
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
How to use xbrowse():lKinetic with xbrowse():bLClicked
Posted: Sun Oct 17, 2021 02:19 AM

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,

Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: How to use xbrowse():lKinetic with xbrowse():bLClicked
Posted: Tue Oct 19, 2021 03:57 AM
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.
Regards



G. N. Rao.

Hyderabad, India
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Re: How to use xbrowse():lKinetic with xbrowse():bLClicked
Posted: Wed Oct 20, 2021 01:59 AM
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,
nageswaragunupudi wrote: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.
Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: How to use xbrowse():lKinetic with xbrowse():bLClicked
Posted: Wed Oct 20, 2021 08:44 AM

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 (fw): Select all Collapse
Eval( ::bLClicked, nRow, nCol, nKeyFlags, Self, lTouch )


You may code like this:
Code (fw): Select all Collapse
oBrw:bLClicked := { |r,c,f,brw,lTouch| If( lTouch, nil, MyAction(r,c,f,brw) ) }
Regards



G. N. Rao.

Hyderabad, India
Posts: 1598
Joined: Fri Oct 07, 2005 05:56 PM
Re: How to use xbrowse():lKinetic with xbrowse():bLClicked
Posted: Wed Oct 20, 2021 03:08 PM
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,

nageswaragunupudi wrote:

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 (fw): Select all Collapse
Eval( ::bLClicked, nRow, nCol, nKeyFlags, Self, lTouch )


You may code like this:
Code (fw): Select all Collapse
oBrw:bLClicked := { |r,c,f,brw,lTouch| If( lTouch, nil, MyAction(r,c,f,brw) ) }
Regards,

Dutch



FWH 2304 / xHarbour Simplex 1.2.3 / BCC73 / Pelles C / UEStudio

FWPPC 10.02 / Harbour for PPC (FTDN)

ADS V.9 / MySql / MariaDB

R&R 12 Infinity / Crystal Report XI R2

(Thailand)
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: How to use xbrowse():lKinetic with xbrowse():bLClicked
Posted: Wed Oct 20, 2021 03:37 PM

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

Regards



G. N. Rao.

Hyderabad, India

Continue the discussion