TMultiGet():bRClicked := {|..| } like TGet():lChangeCaret ?

TMultiGet():bRClicked := {|..| } like TGet():lChangeCaret ?

Postby Horizon » Mon Mar 07, 2016 2: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.04
Horizon
 
Posts: 1322
Joined: Fri May 23, 2008 1:33 pm

Re: TMultiGet():bRClicked := {|..| } like TGet():lChangeCaret ?

Postby Antonio Linares » 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
User avatar
Antonio Linares
Site Admin
 
Posts: 42074
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: TMultiGet():bRClicked := {|..| } like TGet():lChangeCaret ?

Postby Horizon » Tue Mar 08, 2016 7:10 am

Thank you Antonio,

I prefer not to modify standart FWH class.
Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.04
Horizon
 
Posts: 1322
Joined: Fri May 23, 2008 1:33 pm


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 56 guests