FiveTech Support Forums

Hello friends,
I always use xBrowse for testing.
I have never looked at xBrowse.prg so closely because I was always satisfied with the result.

Today I would have been comfortable if I had a non-modal xBrowser.
I thought, maybe I can just change the source code.
But you can transfer all of these parameters.
XBrowse( uData, cTitle, lAutoSort, bSetUp, aCols, bSelect, lExcel, lFastEdit, bValid, cSerial, lNoModal, lAutoFit )

It is also interesting that you can get the xBrowse object back and make further adjustments with it.
e.g. size and position

Best regards,

Otto

Otto,

I also use Xbrowse dayly and most of my program is used from inside xbrowses....

You use autocode for generating xbrowses, but I'm looking (thinking) into a other way.

oBrowse:= MyBrowse("Customers")

and from this point in code I think to generate a function that will retrieve ALL possible data from a Xbrowse (setup/maintenance) function where all xbrowses are located.

This function would look somewhat like this :

Function MyBrowse(cBrowse)
local oBrw

use Xbrw // data needed to generate the xbrowse Customers
Seek the cBrowse
Start generating the browse

oBrw:=xbrowse(xBrw->dbf,xBrw->title,xBrw->lSort,..... ) // XBrowse( uData, cTitle, lAutoSort, bSetUp, aCols, bSelect, lExcel, lFastEdit, bValid, cSerial, lNoModal, lAutoFit )

//more setup if possible

if !empty(xBrw->Header)
oBrw:setgroupheader("xBrw->header",xbrw->headerfrom,xBrw->headerto)
endif
etc... etc...

It's just a starting idea, because I have to generate Xbrowse a lot and this way the code for them would almost be only 1 line.

I'm sure this technique is used be people at this forum, so I hope a working starting program will be posted ))

return oBrw

Just saw some interesting code in Fivedbu :

You can get back the oBrw object with command syntax also.