FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin for Harbour/xHarbour TsBrowse last version. Where to download ?
avista
Posts: 301
Joined: Fri Jun 01, 2007 09:07 AM
TsBrowse last version. Where to download ?
Posted: Thu Apr 14, 2011 12:26 PM

Please,
Where can i download last version of TsBrowse (9.0) or higher ?

In version 8.0 line 4913

  While ! ::IsColVisible( nNewCol ) .and. ::nColpos >= 1 .and. ::nColPos

something missing at the end of line and produce error..

Best regards,

avista
Posts: 301
Joined: Fri Jun 01, 2007 09:07 AM
Re: TsBrowse last version. Where to download ?
Posted: Mon Apr 18, 2011 07:13 AM

????

Noone know ?

Best regards,

StefanHaupt
Posts: 824
Joined: Thu Oct 13, 2005 07:39 AM
Re: TsBrowse last version. Where to download ?
Posted: Mon Apr 18, 2011 07:22 AM

I can send it to you, if you want. I just need your email

kind regards

Stefan
avista
Posts: 301
Joined: Fri Jun 01, 2007 09:07 AM
Re: TsBrowse last version. Where to download ?
Posted: Mon Apr 18, 2011 07:27 AM

Thanks for reply ,
Please send it to me, my e-mail is:

sunrised@t-home.mk

Best regards.

StefanHaupt
Posts: 824
Joined: Thu Oct 13, 2005 07:39 AM
Re: TsBrowse last version. Where to download ?
Posted: Mon Apr 18, 2011 09:46 AM

Ok, done

kind regards

Stefan
MGA
Posts: 1286
Joined: Mon Feb 25, 2008 02:54 PM
Re: TsBrowse last version. Where to download ?
Posted: Mon Apr 18, 2011 11:10 AM

StefanHaupt,

please: ubiratan@sgsistemas.com.br

ubiratanmga@gmail.com

FWH24.04
BCC7.3
HARBOUR3.2
xMate
Pelles´C
TDolphin
Gale FORd
Posts: 663
Joined: Mon Dec 05, 2005 11:22 PM
Re: TsBrowse last version. Where to download ?
Posted: Mon Apr 18, 2011 03:31 PM

Could you please send it to me also. Manual has tried to send it to me but he has always had problems.

gale.ford@wwrowland.com

Thanks

StefanHaupt
Posts: 824
Joined: Thu Oct 13, 2005 07:39 AM
Re: TsBrowse last version. Where to download ?
Posted: Tue Apr 19, 2011 07:28 AM

Ok, just sent

kind regards

Stefan
Gale FORd
Posts: 663
Joined: Mon Dec 05, 2005 11:22 PM
Re: TsBrowse last version. Where to download ?
Posted: Tue Apr 19, 2011 06:29 PM

Thanks you

RAMESHBABU
Posts: 654
Joined: Fri Oct 21, 2005 05:54 AM
Re: TsBrowse last version. Where to download ?
Posted: Wed Apr 20, 2011 03:20 AM

Hi,

Can you please send it to me also to aksharasoft@live.com ?

Regards,

  • Ramesh Babu
StefanHaupt
Posts: 824
Joined: Thu Oct 13, 2005 07:39 AM
Re: TsBrowse last version. Where to download ?
Posted: Wed Apr 20, 2011 07:18 AM

done

kind regards

Stefan
RAMESHBABU
Posts: 654
Joined: Fri Oct 21, 2005 05:54 AM
Re: TsBrowse last version. Where to download ?
Posted: Wed Apr 20, 2011 08:16 AM

Mr.Stefan,

Thank you very much.

My best regards,

  • Ramesh
Gale FORd
Posts: 663
Joined: Mon Dec 05, 2005 11:22 PM
Re: TsBrowse last version. Where to download ?
Posted: Wed Apr 20, 2011 02:58 PM
I had a problem with the horizontal scroll bar. I traced it down to the addcolumn method. If you use addcolumn, there is no updating of ::oHScroll.
The delcolumn has the code below to update the horizontal scroll bar. So I added that code to method addcolumn and it fixed my problem. I also added some code to method setdbf. I use filters and want to use cmKeyCount() because it respects the filter and scope. ordkeycount() and cmxKeyCount() will respect the scope but do not respect the filter. So a section for ::cDriver == "RMDBFCDX" .or. ::cDriver == "COMIX" was added (see 2nd code sample below).

Code (fw): Select all Collapse
  // added to method addcolumn
   If ::lNoHScroll
      nMin := Min( 1, Len( ::aColumns ) )
      nMax := Len( ::aColumns )
      ::oHScroll := TSBScrlBar():WinNew( nMin, nMax,, .F., Self )
      ::oHScroll:SetRange( 1, Len( ::aColumns ) )
      ::oHScroll:SetPage( 1 , .T. )

      If ::nCell == Len( ::aColSizes )
         ::oHScroll:GoBottom()
      Else
         ::oHScroll:SetPos( ::nCell )
      EndIf

   EndIf


Code (fw): Select all Collapse
   // added to method setdbf
   Elseif ::cDriver == "RMDBFCDX" .or. ::cDriver == "COMIX"
      ::bTagOrder := {|uTag|( cAlias )->( OrdSetFocus(uTag) )}
      ::lClipMore := .t.
      ::bKeyNo    := {|cTag|( cAlias )->( cmKeyNo(cTag) ) }
      ::bKeyCount := {|cTag| ( cAlias )->( If( IndexOrd() > 0, cmKeyCount( cTag ), lastrec() ) ) }
      ::bLogicLen := {|cTag| ( cAlias )->( If( IndexOrd() > 0, cmKeyCount( cTag ), lastrec() ) ) }
      ::bGoToPos  := {|n| ( cAlias )->( cmKeyGoTo( n ) ) }
Gosha
Posts: 6
Joined: Thu Sep 20, 2007 11:16 AM
Re: TsBrowse last version. Where to download ?
Posted: Sat Apr 23, 2011 09:02 AM

Hi,

Can you please send it to me also to gosha@dr.lv.ukrtel.net ?

Regards, - Igor.

StefanHaupt
Posts: 824
Joined: Thu Oct 13, 2005 07:39 AM
Re: TsBrowse last version. Where to download ?
Posted: Tue Apr 26, 2011 07:46 AM

Igor,

just sent

kind regards

Stefan

Continue the discussion

Static archive · New replies & topics via GitHub Discussions