TSBROWSE 7 updated

[jose_murugosa]

You can download this class of Manuel Mercado in our blog:

http://www.respuestasintegradas.blogspot.com

Thanks Manuel for your contribution!!

[TimStone]

Am I correct that this revision was built with the Borland compiler ?

Is it compatible with xbuilder / xcc ? ( November 2007 release )
Is it compatible with fwh 8.02 ?
Is it compatible with ADS 8 ?

Thank you.

Tim

[demont frank]

On line METHOD REFRESH(lPaint) :

( ::cAlias )->(Eval( ::bLogicLen ))

NOT ( ::cAlias )->Eval( ::bLogicLen )

Code: Select all  Expand view

METHOD Refresh( lPaint ) INLINE If( ::lFirstPaint == Nil .or. ::lFirstPaint, 0, ( ;
                                       ::nLen := If( ::lIsDbf, ( ::cAlias )->(Eval( ::bLogicLen )) , ;
                                       Eval( ::bLogicLen ) ), ::lNoPaint := .F. , Super:Refresh( lPaint ) ) )


The ch-files are hard coded in tsbrowse.prg , tscolumn.prg and debug.prg
Better is to use no path :

Working with a xbp-file , is better to use
# include "fivewin.ch"
instead off "c:\fwh\fivewin.ch"

In step 2 can the include path's be set , so it is possible to test with different fwh versions

Frank

[mmercado]

Hi Tim:

Am I correct that this revision was built with the Borland compiler ?

You are Right

Is it compatible with xbuilder / xcc ? ( November 2007 release )

Don't know, I don't have nor use it

Is it compatible with fwh 8.02 ?

Yes in my tests it's running ok

Is it compatible with ADS 8 ?

Don't know I don't use ADS, every ADS stuff in TSBrowse has been done by other TSBrowse contributors.

Best regards

Manuel Mercado

[mmercado]

Hi Frank:

Nice to see you again, many thanks for your feedback (welcome as always)

Best regards

Manuel Mercado

[Silvio]

dear Manuel,
where i can found a sample with trasparent sbrowse as the window you insert on this forum ?

[mmercado]

Hi Silvio:

where i can found a sample with trasparent sbrowse as the window you insert on this forum ?

See SBtest.prg sample 7 in TSBrowose\Samples there you have a VerCe file to build the executable

Best regards.

Manuel Mercado

ps I'm revising TSButton about your transparency request, but it'll take a while because TSButton is now in major surgery

[Gale FORd]

I have added some things to TSbrowse and was wondering if you would like to add them to the official version.

DATA bLDblClickHeader // custom function for header (change order etc)
DATA bAddColumn // add/ins column block
DATA lColChanged // if a column was moved, added, inserted, freeze changed, or sized. I use this to know if the browse information needs to be saved.

// Right click header additions.
Insert Column - If bAddColumn defined
Add Column - If bAddColumn defined
Freeze Column - If .not. ::lLockFreeze
Unlock Freeze Column - If .not. ::lLockFreeze .and. ::nFreeze > 0

// Add RMDBFCDX to cRDDName list (Same syntax as Comix)

Thanks,

I really like the browser.

Gale