FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour header with a UDF
Posts: 598
Joined: Tue Apr 15, 2008 04:51 PM
header with a UDF
Posted: Mon Jun 07, 2010 05:23 AM

How can I click on the header of a column in xbrowse and bring up a user defined function?

Thank you

Harvey
Posts: 946
Joined: Thu Oct 06, 2005 07:05 PM
Re: header with a UDF
Posted: Mon Jun 07, 2010 06:01 AM

oBrw:aCols[xx]:bLClickHeader := {||yourfunction() }

HTH

http://www.cbati.com

Uestudio
Fwh 13.05 Harbour 3.2 MSVC 2013
Posts: 598
Joined: Tue Apr 15, 2008 04:51 PM
Re: header with a UDF
Posted: Tue Jun 08, 2010 11:59 PM

thanks for the help. haven't tried it yet. Will tonite or tomorrow.

Thank you

Harvey
Posts: 598
Joined: Tue Apr 15, 2008 04:51 PM
Re: header with a UDF
Posted: Wed Jun 09, 2010 11:05 PM
I keep getting abound array access error.

Here is the code sample I use.
Its a xbrowse from resources.

What am I doing wrong. Thanks for the help.



Code (fw): Select all Collapse
 
local aCols[24] 

oBrw:aCols[8]:bLClickHeader := {||msgInfo("Works") }

 ADD column  to xbrowse oBrw;
   DATA {|| if(drill->title == repli('-', 30), repli(' ', 20), ;
   if(drill->title == repli('=', 30), repli(' ', 20), ;
   oBrw:oDbf:drill:Invoice)) };
   SIZE 50 LEFT HEADER "Invoice" COLOR CLR_BLACK,CLR_WHITE
Thank you

Harvey
Posts: 946
Joined: Thu Oct 06, 2005 07:05 PM
Re: header with a UDF
Posted: Thu Jun 10, 2010 08:05 PM

Harvey

Make sure oBrw:aCols[8]:bLClickHeader := {||msgInfo("Works") } is after column definition

HTH

Richard

http://www.cbati.com

Uestudio
Fwh 13.05 Harbour 3.2 MSVC 2013
Posts: 598
Joined: Tue Apr 15, 2008 04:51 PM
Re: header with a UDF
Posted: Thu Jun 10, 2010 09:58 PM

perfect :D

Thank you

Harvey

Continue the discussion