FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour TMultiGet():bRClicked := {|..| } like TGet():lChangeCaret ?
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
TMultiGet():bRClicked := {|..| } like TGet():lChangeCaret ?
Posted: Mon Mar 07, 2016 02:34 PM
Hi

We use TGet():lChangeCaret := .f. to use this behavior all application.

Can we use it with like TMultiGet():bRClicked := {|nRow, nCol, nFlags|MEMO_RC(nRow, nCol, nFlags, Self)}

Must I change all TMultiget class descriptions in my app?

Thanks.
Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: TMultiGet():bRClicked := {|..| } like TGet():lChangeCaret ?
Posted: Mon Mar 07, 2016 10:17 PM

Hakan,

Please try to modify Class TMultiGet adding this:

CLASSDATA bRClicked

from that moment on, you should be able to use it as you use lChangeCaret

I have tried to do it this way, to avoid changing the FWH source code:

include "c:\harbour\contrib\xhb\xhbcls.ch"

...

EXTEND CLASS TMultiGet WITH CLASSDATA bRClicked

but it seems as CLASSDATA is not supported there, thats why you need to modify the class

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1387
Joined: Fri May 23, 2008 01:33 PM
Re: TMultiGet():bRClicked := {|..| } like TGet():lChangeCaret ?
Posted: Tue Mar 08, 2016 07:10 AM

Thank you Antonio,

I prefer not to modify standart FWH class.

Regards,



Hakan ONEMLI



Harbour & MSVC 2022 & FWH 23.06

Continue the discussion