TSBrowse V.8.0

Post Reply
User avatar
mmercado
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

TSBrowse V.8.0

Post by mmercado »

Hello Friends:

After 4 years without updates, I make its available this new version to which I call 8,0 but in fact it would be
1.0 for FWH/(x)Harbour in 32 bits since I have decided to suspend (I haven't time) the compatibility with Clipper 16 bits.

In this occasion there is not WhatsNew.txt since the modifications are so many that I have really forgotten them.

I will only mention those that for me are most showy:

1- Transparency. TSBrowse takes the background of the window or dialog to which belongs, as well as its own background image.

@ 0, 0 BROWSE oBrw of oDlg TRANSPARENT .....


2. - ToolTips for column's headings.

ADD COLUMN TO oBrw TITLE “ST” TOOLTIP “State”


3. - Connectivity with Excel. It has been for me a great aid to give the end user an extension tool for the manipulation of information shown by browser.

DEFINE BUTTON OF oBar ACTION oBrw:ExcelOle()

At the moment I am working in the ADO/TSBrowse connection, you'll have news very soon.

I hope TSBrowse 8.0 to be helpful for you, download it from here:

http://hyperupload.com/download/022f125 ... E.zip.html

Manuel Mercado
Ollie
Posts: 233
Joined: Sat Dec 30, 2006 6:10 am

Post by Ollie »

I am trying to build the LIB.

1. I changed Lang="ENG" in SBROWSEH.RMK
2. I changed my paths to:
FW ="C:\FWH"
HB ="C:\xHarbour"
BC ="C:\Bcc55"
3. I run RMAKE sbrowseh

I get an error:
Quote:

RMAKE 1.4 Copyright (c) 1989-1995 Computer Associates International, Inc.
C:\xHarbour\bin\harbour ..\SOURCE\CLASSES\LANG\SBMSGENG.PRG /n /D__OLE__ /i..\include;C:\FWH\include;C:\xHarbour\include
Error RMAKE/R2001 Exit 12: 'C:\xHarbour\bin\harbour ..\SOURCE\CLASSES\LANG\SBMSGENG.PRG /n /D__OLE__ /i..\include;C:\FWH\include;C:\xHarbour\include'

Whats my problem?

Using:
xHarbour build 0.99.71
Borland C++ 5.5.1
FWH January 7.01 2007 build
Many thanks
Ollie.

Using:
xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6406)
Borland C++ 5.5.1
FWH 9.04 (2009 Apr)
User avatar
TimStone
Posts: 2536
Joined: Fri Oct 07, 2005 1:45 pm
Location: Trabuco Canyon, CA USA
Contact:

Update

Post by TimStone »

Good Morning,

I just did a quick build of the browse and placed it into my existing program for a comparison.

I'm using FWH 8.02 and the November xHarbour build with the xCC compiler ( xBuild default ).

I'm comparing it to your previous version that has numerous corrections discussed in this forum over the previous years.

The two things I noticed immediately:

1) The time to load the browse was much longer then the older version. It was about double what I see for a load time on a 9.5MB data file.

2) We have alternating color bars on each row. These disappeared with the new version.

3) When browsing, the highlight bar should extend all the way across the dialog box. However, if we have a blank column, the highlight bar does not extend into it. ( Some browses don't quite fill the dialog box ... no need to ... )

4) I'll have to look at the fonts. I noticed that fon'ts are fixed at a different value then we were using here.

5) The source code in 3 files had a hard coded include path. Just #include "tsbrowse.ch" would be better.

I'm glad that you are back into this project. I like TSBrowse and have been happy with the appearance and performance I've attained so far.

Tim :D
Tim Stone
http://www.MasterLinkSoftware.com
timstone@masterlinksoftware.com
Using: FWH 19.06 with Harbour 3.2.0 / Microsoft Visual Studio Community 2019
User avatar
mmercado
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Re: Update

Post by mmercado »

Hi Tim:
TimStone wrote:1) The time to load the browse was much longer then the older version. It was about double what I see for a load time on a 9.5MB data file
I'm working now in TSBrowse speed improvement, please send me your email to share my tests with you (course if you want)

Regards

Manuel Mercado
Ollie
Posts: 233
Joined: Sat Dec 30, 2006 6:10 am

Post by Ollie »

Please can you help me build the LIB or send me a Lib compiled for xHarbour.

Thanks

1. I changed Lang="ENG" in SBROWSEH.RMK
2. I changed my paths to:
FW ="C:\FWH"
HB ="C:\xHarbour"
BC ="C:\Bcc55"
3. I run RMAKE sbrowseh

I get an error:
Quote:

RMAKE 1.4 Copyright (c) 1989-1995 Computer Associates International, Inc.
C:\xHarbour\bin\harbour ..\SOURCE\CLASSES\LANG\SBMSGENG.PRG /n /D__OLE__ /i..\include;C:\FWH\include;C:\xHarbour\include
Error RMAKE/R2001 Exit 12: 'C:\xHarbour\bin\harbour ..\SOURCE\CLASSES\LANG\SBMSGENG.PRG /n /D__OLE__ /i..\include;C:\FWH\include;C:\xHarbour\include'

Whats my problem?

Using:
xHarbour build 0.99.71
Borland C++ 5.5.1
FWH January 7.01 2007 build
Many thanks
Ollie.

Using:
xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6406)
Borland C++ 5.5.1
FWH 9.04 (2009 Apr)
User avatar
TimStone
Posts: 2536
Joined: Fri Oct 07, 2005 1:45 pm
Location: Trabuco Canyon, CA USA
Contact:

Email

Post by TimStone »

Manuel,

My email is timstone at masterlinksoftware.com

Tim
Tim Stone
http://www.MasterLinkSoftware.com
timstone@masterlinksoftware.com
Using: FWH 19.06 with Harbour 3.2.0 / Microsoft Visual Studio Community 2019
User avatar
mmercado
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Post by mmercado »

Hi Ollie:

I'm truly sorry by not being able to help you, in fact I don't use Rmake anymore, why dont you try Verce to build the library, it's a great tool and it's free. At \TSBrowse\Lib, you'll find a SBrowsex.vrc file

You can download VerCe 5.3 from:
http://www.box.net/shared/yu6ny3bsws

Regards

Manuel Mercado
User avatar
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 am
Location: São Luiz, Brasil

Post by Kleyber »

Dear Manuel,

I use extensively TSBrowse in all my apps and I have downloaded this new version, but I found several errors. I would like to make just two questions:

1 - Can I send you a piece of code containing a browse of my app, in order to know what have changed?

2 - Can I receive your tests too? I would like to help you to improve this fantastic class.

Best regards,
Kleyber Derick

FWH / xHb / xDevStudio / SQLLIB
User avatar
mmercado
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Post by mmercado »

Kleyber wrote:1 - Can I send you a piece of code containing a browse of my app, in order to know what have changed?
It'll be my pleasure, please send it
Kleyber wrote:2 - Can I receive your tests too? I would like to help you to improve this fantastic class.
Of course, I'm proud by having such luxury beta testers

Best regards

Manuel Mercado
User avatar
kokookao2007
Posts: 59
Joined: Thu May 17, 2007 8:27 am

Post by kokookao2007 »

Hi mmercado :

Nice job !!

Two problems for Tsbrowse 8.0.

1) ACTIVATE DIALOG oDlg CENTERED ;
ON INIT ( oBrw:GoBottom() ) ==> oBrw:gobottom() not Work , always on Top

2) REDEFINE COLUMN BROWSE oBrw ID 201 OF oDlg ;
ON CLICK ( Bdt_chg() , oBDT:REFRESH() ) ;
UPDATE

When move MouseWheel , On Click not Work

Regards

KokooKao
User avatar
mmercado
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Post by mmercado »

kokookao2007 wrote:1) ACTIVATE DIALOG oDlg CENTERED ;
ON INIT ( oBrw:GoBottom() ) ==> oBrw:gobottom() not Work , always on Top
Try this:
ON INIT ( oBrw:lInitGoTop := .F., oBrw:GoBottom().......
kokookao2007 wrote:2) REDEFINE COLUMN BROWSE oBrw ID 201 OF oDlg ;
ON CLICK ( Bdt_chg() , oBDT:REFRESH() ) ;
UPDATE
When move MouseWheel , On Click not Work
Try this:
ON CHANGE ( Bdt_chg() , oBDT:REFRESH() )

Regards

Manuel Mercado
User avatar
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 am
Location: São Luiz, Brasil

Post by Kleyber »

mmercado wrote:
Kleyber wrote:1 - Can I send you a piece of code containing a browse of my app, in order to know what have changed?
It'll be my pleasure, please send it
Kleyber wrote:2 - Can I receive your tests too? I would like to help you to improve this fantastic class.
Of course, I'm proud by having such luxury beta testers

Best regards

Manuel Mercado
Dear Manuel,

Sent to your email.

Thanks in advance,
Kleyber Derick

FWH / xHb / xDevStudio / SQLLIB
User avatar
kokookao2007
Posts: 59
Joined: Thu May 17, 2007 8:27 am

Post by kokookao2007 »

mmercado wrote:
Try this:
ON INIT ( oBrw:lInitGoTop := .F., oBrw:GoBottom().......
oBRW:GOBOTTOM() work NOW, I edit TSBROWSE.CH ADD oBrw:lInitGoTop := .F.
Try this:
ON CHANGE ( Bdt_chg() , oBDT:REFRESH() )
ON Change SUPPORT MouseWheel

How can I transfer all Tcbrowse to Tsbrowse without edit source code ?

Now I need edit all source CODE "ADD COLUMN TO BROWSE oBrw DATA ...."

RIGHT ==>ALIGN DT_RIGHT
LEFT ==>ALIGN LEFT
CENTER ==>ALIGN DT_CENTER

Regards

KOKOOKAO
User avatar
mmercado
Posts: 782
Joined: Wed Dec 19, 2007 7:50 am
Location: Salamanca, Gto., México

Post by mmercado »

kokookao2007 wrote:How can I transfer all Tcbrowse to Tsbrowse without edit source code ?
Syntax between both is very similar, but actually you should make some changes (like ALIGN CLAUSE). I think you should do it manually with a prompted search and replace editor's procedure.

Regards.

Manuel Mercado
Post Reply