Hi Przemek, I did some tests using rto_tb.prg, pls. find the fixes applied to tbrowse.prg attached.
Shortly: - ::freeze return value on assign made compatible when numeric, but out of range value was assigned. - ::colSep, ::headSep, ::footSep, ::skipBlock, ::goTopBlock, ::goBottomBlock SETGETs added to replicate exact CA-Cl*pper behaviour. This way type checking is done by _eInstVar() instead of the class engine. There are just three unexplained differences (amazing BTW) when comparing the C53 and Harbour output of rto_tb.prg; value of o:rowPos, where it is 2 in C53 and 1 in Harbour after calls in line 214 (and 215, 216). This is actually a pretty small test case there. One minor issue I've noticed - which doesn't affect actual functionality, AFAICS - is if you use BROWSE() and you keep <PgDn> pressed on the first row, or <PgUp> pressed on the last row, on a long database, you may notice that the non-stable rows are being "scrolled" until the browse gets enough time to stabilize (or you reach the other end of the table). I can't really describe this in better words, but you may see it if you compare C5x and Harbour in the above situation. Probably just cosmetic stuff or some internal side effect (or me seeing ghosts :). I'll continue to do some more tests. Brgds, Viktor
tbrowse.prg.gz
Description: GNU Zip compressed data
On 2008.04.17., at 1:41, Przemyslaw Czerpak wrote:
Hi All, I'm attaching updated TBrowse code. There are 2 minor TODO notes in the code but rest is addressed. I do not know about any problems with this code but maybe I missed sth. Please make tests. If you will find any problems or incompatibilities to Clipper then please inform me. If everything will be OK then I plan to commit it in next days. best regards, Przemek <tbrowse.prg.gz>_______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
_______________________________________________ Harbour mailing list [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
