topic-14418

Marc Vanzegbroeck

Posts: 1195

Joined: Mon Oct 17, 2005 05:41 AM

Change headers in xbrowse
Posted: Thu Jan 29, 2009 02:31 PM

Hi,

How can I change the Headers in xBrowse while it is displayed?

Thanks,
Marc

ukoenig

Posts: 4043

Joined: Wed Dec 19, 2007 06:40 PM

Re: Change headers in xbrowse
Posted: Thu Jan 29, 2009 03:27 PM

Hello Marc,

Change and Test all xBrowse-Settings at Runtime ( Header, Footer, Fonts, Background, Cells .... :
I think, You want to set new values for the header on Button-click ?.
Can You tell me the values, You want to change ?

Download :
http://www.pflegeplus.com/fw_downloads/BRWTools5.zip

Regards
Uwe :

Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.

Marc Vanzegbroeck

Posts: 1195

Joined: Mon Oct 17, 2005 05:41 AM

Re: Change headers in xbrowse
Posted: Thu Jan 29, 2009 06:23 PM

Uwe,

I want the customer to be able to change the header of the xBrowse.
In this example 'Marc' or 'Jan'

In tsbrowse I did something like this:

Code: Select all Collapse

oBrw:SetHeaders( , , ahoofding,  , , ,  )
oBrw:DrawHeaders()

Regards,
Marc

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Change headers in xbrowse
Posted: Thu Jan 29, 2009 07:24 PM

Code: Select all Collapse

oBrw:Jan:cHeader := 'cChangedJan'
oBrw:Refresh()

Regards

G. N. Rao.

Hyderabad, India

Marc Vanzegbroeck

Posts: 1195

Joined: Mon Oct 17, 2005 05:41 AM

Re: Change headers in xbrowse
Posted: Thu Jan 29, 2009 07:44 PM

NageswaraRao,

This is not working. Jan is the text that is in this sample in the cHeader of the 2e row. It's not a variable.

Regards,
Marc

ukoenig

Posts: 4043

Joined: Wed Dec 19, 2007 06:40 PM

Re: Change headers in xbrowse
Posted: Thu Jan 29, 2009 08:20 PM

Hello Marc,

any selected Mouse-Clicks inside the xBrowse, will change the Header-Text
Choose one, to do the defined Column-Title-Change ( You can use also VAR'S ).
Another option could be, to change the Head-color as well.

Code: Select all Collapse

// Old Column-Titles
// ------------------------
oLbx:aCols[ 1 ]:cHeader = Padr("No.", 3)
oLbx:aCols[ 2 ]:cHeader = Padr("Start", 19)

// Define New Column-Titles on any Mouse-Click
// -----------------------------------------------------
for nFor := 1 to 2   // 2 Columns

   oLbx:aCols[ nFor ]:bRClickHeader := ;
   {|r,c,f,o| IIF( o:nCreationOrder = 1,  o:cHeader := "Text 1", o:cHeader := "Text 2"), oLbx:Refresh() }
   
   oLbx:aCols[ nFor ]:bLClickFooter := ;
   {|r,c,f,o| IIF( o:nCreationOrder = 1, o:cHeader := "Text 1", o:cHeader := "Text 2"), oLbx:Refresh() }
   
   oLbx:aCols[ nFor ]:bRClickFooter := ;
   {|r,c,f,o| IIF( o:nCreationOrder = 1, o:cHeader := "Text 1", o:cHeader := "Text 2"), oLbx:Refresh() }
   
   oLbx:aCols[ nFor ]:blDClickData  := ;
   {|r,c,f,o| IIF( o:nCreationOrder = 1, o:cHeader := "Text 1", o:cHeader := "Text 2"), oLbx:Refresh() }
   
   oLbx:aCols[ nFor ]:bRClickData := ;
   {|r,c,f,o| IIF( o:nCreationOrder = 1, o:cHeader := "Text 1", o:cHeader := "Text 2"), oLbx:Refresh() }

next

Regards
Uwe

Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.

Marc Vanzegbroeck

Posts: 1195

Joined: Mon Oct 17, 2005 05:41 AM

Re: Change headers in xbrowse
Posted: Thu Jan 29, 2009 08:53 PM

Thank you Uwe,

It's working very nice now!! :lol:

Regards,
Marc

FiveTech Support Forums

Continue the discussion