• TBMORE.TXT by Hannes Ziegler

    From diamsbibouchka@hotmail.fr@21:1/5 to All on Wed Aug 23 15:03:59 2017
    Hi there,

    I tried to play internals ivars of Tbrowse object on clipper52e.
    I tried this to move the cursor from line 1 To Line 8

    After init oTB:tbrowsedb()
    oTB:addcolumn( )

    oTB:skipBlock := {|x| Skipped(x)}
    I did

    nkey:=inkey(0)


    After clicking mouse I did

    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    oTB:refreshAll()
    while ( !oTB:stabilize() ) ; end

    But nothing happend


    Any Idea?

    Med

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From mirda@21:1/5 to medhome@hotmail.com on Thu Aug 31 16:55:22 2017
    On Wed, 23 Aug 2017 15:03:59 -0700 (PDT), medhome@hotmail.com wrote:

    Hi there,

    I tried to play internals ivars of Tbrowse object on clipper52e.
    I tried this to move the cursor from line 1 To Line 8

    After init oTB:tbrowsedb()
    oTB:addcolumn( )

    oTB:skipBlock := {|x| Skipped(x)}
    I did

    nkey:=inkey(0)


    After clicking mouse I did

    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    oTB:refreshAll()
    while ( !oTB:stabilize() ) ; end

    But nothing happend


    Any Idea?

    Med


    Hi Med!

    I think the line
    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    does nothing.

    Have you tried this:
    oTB[Len(oTB)] := stuff(atail(oTB),47,0,i2bin(8))

    Regards
    Damir

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From diamsbibouchka@hotmail.fr@21:1/5 to All on Fri Sep 1 03:20:55 2017
    Le jeudi 31 août 2017 15:59:02 UTC+1, mirda a écrit :
    On Wed, 23 Aug 2017 15:03:59 -0700 (PDT), medhome@hotmail.com wrote:

    Hi there,

    I tried to play internals ivars of Tbrowse object on clipper52e.
    I tried this to move the cursor from line 1 To Line 8

    After init oTB:tbrowsedb()
    oTB:addcolumn( )

    oTB:skipBlock := {|x| Skipped(x)}
    I did

    nkey:=inkey(0)


    After clicking mouse I did

    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    oTB:refreshAll()
    while ( !oTB:stabilize() ) ; end

    But nothing happend


    Any Idea?

    Med


    Hi Med!

    I think the line
    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    does nothing.

    Have you tried this:
    oTB[Len(oTB)] := stuff(atail(oTB),47,0,i2bin(8))

    Regards
    Damir

    Hi Damir,

    It's the same?
    Did you work with these hiddens ?

    Best Regards
    Med

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From mirda@21:1/5 to medhome@hotmail.com on Fri Sep 1 15:05:31 2017
    On Fri, 1 Sep 2017 03:20:55 -0700 (PDT), medhome@hotmail.com wrote:

    Le jeudi 31 aot 2017 15:59:02 UTC+1, mirda a crit:
    On Wed, 23 Aug 2017 15:03:59 -0700 (PDT), medhome@hotmail.com wrote:

    Hi there,

    I tried to play internals ivars of Tbrowse object on clipper52e.
    I tried this to move the cursor from line 1 To Line 8

    After init oTB:tbrowsedb()
    oTB:addcolumn( )

    oTB:skipBlock := {|x| Skipped(x)}
    I did

    nkey:=inkey(0)


    After clicking mouse I did

    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    oTB:refreshAll()
    while ( !oTB:stabilize() ) ; end

    But nothing happend


    Any Idea?

    Med


    Hi Med!

    I think the line
    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    does nothing.

    Have you tried this:
    oTB[Len(oTB)] := stuff(atail(oTB),47,0,i2bin(8))

    Regards
    Damir

    Hi Damir,

    It's the same?
    Did you work with these hiddens ?

    Best Regards
    Med


    Hi Med!

    It's not the same. Function Stuff doesn't change atail(oTB), it returns a changed copy of string atail(oTB).

    I haven't worked with these hiddens. Acctualy, I haven't heard about them
    until now.

    Regards

    Damir

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From diamsbibouchka@hotmail.fr@21:1/5 to All on Fri Sep 1 06:35:48 2017
    Le vendredi 1 septembre 2017 14:09:02 UTC+1, mirda a écrit :
    On Fri, 1 Sep 2017 03:20:55 -0700 (PDT), medhome@hotmail.com wrote:

    Le jeudi 31 août 2017 15:59:02 UTC+1, mirda a écrit :
    On Wed, 23 Aug 2017 15:03:59 -0700 (PDT), medhome@hotmail.com wrote:

    Hi there,

    I tried to play internals ivars of Tbrowse object on clipper52e.
    I tried this to move the cursor from line 1 To Line 8

    After init oTB:tbrowsedb()
    oTB:addcolumn( )

    oTB:skipBlock := {|x| Skipped(x)}
    I did

    nkey:=inkey(0)


    After clicking mouse I did

    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    oTB:refreshAll()
    while ( !oTB:stabilize() ) ; end

    But nothing happend


    Any Idea?

    Med


    Hi Med!

    I think the line
    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    does nothing.

    Have you tried this:
    oTB[Len(oTB)] := stuff(atail(oTB),47,0,i2bin(8))

    Regards
    Damir

    Hi Damir,

    It's the same?
    Did you work with these hiddens ?

    Best Regards
    Med


    Hi Med!

    It's not the same. Function Stuff doesn't change atail(oTB), it returns a changed copy of string atail(oTB).

    I haven't worked with these hiddens. Acctualy, I haven't heard about them until now.

    Regards

    Damir

    Dear Damir
    I agree with you. I did wrong but I have the same result. the cursor does not move to line 8 in oTB.

    Do you have any Idea?

    Best Regards

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From mirda@21:1/5 to diamsbibouchka@hotmail.fr on Fri Sep 1 21:51:49 2017
    On Fri, 1 Sep 2017 06:35:48 -0700 (PDT), diamsbibouchka@hotmail.fr wrote:

    Le vendredi 1 septembre 2017 14:09:02 UTC+1, mirda a crit:
    On Fri, 1 Sep 2017 03:20:55 -0700 (PDT), medhome@hotmail.com wrote:

    Le jeudi 31 aot 2017 15:59:02 UTC+1, mirda a crit:
    On Wed, 23 Aug 2017 15:03:59 -0700 (PDT), medhome@hotmail.com wrote:

    Hi there,

    I tried to play internals ivars of Tbrowse object on clipper52e.
    I tried this to move the cursor from line 1 To Line 8

    After init oTB:tbrowsedb()
    oTB:addcolumn( )

    oTB:skipBlock := {|x| Skipped(x)}
    I did

    nkey:=inkey(0)


    After clicking mouse I did

    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    oTB:refreshAll()
    while ( !oTB:stabilize() ) ; end

    But nothing happend


    Any Idea?

    Med


    Hi Med!

    I think the line
    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    does nothing.

    Have you tried this:
    oTB[Len(oTB)] := stuff(atail(oTB),47,0,i2bin(8))

    Regards
    Damir

    Hi Damir,

    It's the same?
    Did you work with these hiddens ?

    Best Regards
    Med


    Hi Med!

    It's not the same. Function Stuff doesn't change atail(oTB), it returns a
    changed copy of string atail(oTB).

    I haven't worked with these hiddens. Acctualy, I haven't heard about them
    until now.

    Regards

    Damir

    Dear Damir
    I agree with you. I did wrong but I have the same result. the cursor does not move to line 8 in oTB.

    Do you have any Idea?

    Best Regards

    Hi!

    I haven't noticed wrong parameter in stuff function, it should be:

    oTB[Len(oTB)] := stuff(atail(oTB),47,2,i2bin(8))

    because you wish to replace these two characters.


    Do you have any documentation about ATail(oTB) string?
    How do you know that characters on the 47. and 48. position in the string define row position in browse?
    Why don't you use :rowPos property of browse object? You can simply assing oTB:rowPos := 8

    Regards

    Damir

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From diamsbibouchka@hotmail.fr@21:1/5 to All on Fri Sep 1 15:11:42 2017
    Le vendredi 1 septembre 2017 20:54:02 UTC+1, mirda a écrit :
    On Fri, 1 Sep 2017 06:35:48 -0700 (PDT), diamsbibouchka@hotmail.fr wrote:

    Le vendredi 1 septembre 2017 14:09:02 UTC+1, mirda a écrit :
    On Fri, 1 Sep 2017 03:20:55 -0700 (PDT), medhome@hotmail.com wrote:

    Le jeudi 31 août 2017 15:59:02 UTC+1, mirda a écrit :
    On Wed, 23 Aug 2017 15:03:59 -0700 (PDT), medhome@hotmail.com wrote: >>>>
    Hi there,

    I tried to play internals ivars of Tbrowse object on clipper52e. >>>>> I tried this to move the cursor from line 1 To Line 8

    After init oTB:tbrowsedb()
    oTB:addcolumn( )

    oTB:skipBlock := {|x| Skipped(x)}
    I did

    nkey:=inkey(0)


    After clicking mouse I did

    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    oTB:refreshAll()
    while ( !oTB:stabilize() ) ; end

    But nothing happend


    Any Idea?

    Med


    Hi Med!

    I think the line
    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    does nothing.

    Have you tried this:
    oTB[Len(oTB)] := stuff(atail(oTB),47,0,i2bin(8))

    Regards
    Damir

    Hi Damir,

    It's the same?
    Did you work with these hiddens ?

    Best Regards
    Med


    Hi Med!

    It's not the same. Function Stuff doesn't change atail(oTB), it returns a >> changed copy of string atail(oTB).

    I haven't worked with these hiddens. Acctualy, I haven't heard about them >> until now.

    Regards

    Damir

    Dear Damir
    I agree with you. I did wrong but I have the same result. the cursor does
    not move to line 8 in oTB.

    Do you have any Idea?

    Best Regards

    Hi!

    I haven't noticed wrong parameter in stuff function, it should be:

    oTB[Len(oTB)] := stuff(atail(oTB),47,2,i2bin(8))

    because you wish to replace these two characters.


    Do you have any documentation about ATail(oTB) string?
    How do you know that characters on the 47. and 48. position in the string define row position in browse?
    Why don't you use :rowPos property of browse object? You can simply assing oTB:rowPos := 8

    Regards

    Damir

    Hi Damir,

    doing: rowPos:= nn does not work correctly when nn is mouse:row.

    to have TBINFO.TXT SEARCH it in this group simply type TBINFO.TXT in the message zone. I can send you more by mail.

    Best Regards .

    Med

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From mirda@21:1/5 to diamsbibouchka@hotmail.fr on Sat Sep 2 11:10:40 2017
    On Fri, 1 Sep 2017 15:11:42 -0700 (PDT), diamsbibouchka@hotmail.fr wrote:

    Le vendredi 1 septembre 2017 20:54:02 UTC+1, mirda a crit:
    On Fri, 1 Sep 2017 06:35:48 -0700 (PDT), diamsbibouchka@hotmail.fr wrote:

    Le vendredi 1 septembre 2017 14:09:02 UTC+1, mirda a crit:
    On Fri, 1 Sep 2017 03:20:55 -0700 (PDT), medhome@hotmail.com wrote:

    Le jeudi 31 aot 2017 15:59:02 UTC+1, mirda a crit:
    On Wed, 23 Aug 2017 15:03:59 -0700 (PDT), medhome@hotmail.com wrote: >>>>>>
    Hi there,

    I tried to play internals ivars of Tbrowse object on clipper52e. >>>>>>> I tried this to move the cursor from line 1 To Line 8

    After init oTB:tbrowsedb()
    oTB:addcolumn( )

    oTB:skipBlock := {|x| Skipped(x)}
    I did

    nkey:=inkey(0)


    After clicking mouse I did

    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    oTB:refreshAll()
    while ( !oTB:stabilize() ) ; end

    But nothing happend


    Any Idea?

    Med


    Hi Med!

    I think the line
    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    does nothing.

    Have you tried this:
    oTB[Len(oTB)] := stuff(atail(oTB),47,0,i2bin(8))

    Regards
    Damir

    Hi Damir,

    It's the same?
    Did you work with these hiddens ?

    Best Regards
    Med


    Hi Med!

    It's not the same. Function Stuff doesn't change atail(oTB), it returns a >>>> changed copy of string atail(oTB).

    I haven't worked with these hiddens. Acctualy, I haven't heard about them >>>> until now.

    Regards

    Damir

    Dear Damir
    I agree with you. I did wrong but I have the same result. the cursor does
    not move to line 8 in oTB.

    Do you have any Idea?

    Best Regards

    Hi!

    I haven't noticed wrong parameter in stuff function, it should be:

    oTB[Len(oTB)] := stuff(atail(oTB),47,2,i2bin(8))

    because you wish to replace these two characters.


    Do you have any documentation about ATail(oTB) string?
    How do you know that characters on the 47. and 48. position in the string
    define row position in browse?
    Why don't you use :rowPos property of browse object? You can simply assing >> oTB:rowPos := 8

    Regards

    Damir

    Hi Damir,

    doing: rowPos:= nn does not work correctly when nn is mouse:row.

    to have TBINFO.TXT SEARCH it in this group simply type TBINFO.TXT in the message zone. I can send you more by mail.

    Best Regards .

    Med


    Hi!

    I'm sure you could calculate oTB:rowPos from mouse row (screen row).

    I found TBMORE.TXT and there said that offset 47 in atail(oTB) correspond
    to number of pending row skips during stabilization. It is not row
    position!

    Damir

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From diamsbibouchka@hotmail.fr@21:1/5 to All on Mon Sep 4 09:24:00 2017
    Le samedi 2 septembre 2017 10:14:02 UTC+1, mirda a écrit :
    On Fri, 1 Sep 2017 15:11:42 -0700 (PDT), diamsbibouchka@hotmail.fr wrote:

    Le vendredi 1 septembre 2017 20:54:02 UTC+1, mirda a écrit :
    On Fri, 1 Sep 2017 06:35:48 -0700 (PDT), diamsbibouchka@hotmail.fr wrote: >>
    Le vendredi 1 septembre 2017 14:09:02 UTC+1, mirda a écrit :
    On Fri, 1 Sep 2017 03:20:55 -0700 (PDT), medhome@hotmail.com wrote:

    Le jeudi 31 août 2017 15:59:02 UTC+1, mirda a écrit :
    On Wed, 23 Aug 2017 15:03:59 -0700 (PDT), medhome@hotmail.com wrote: >>>>>>
    Hi there,

    I tried to play internals ivars of Tbrowse object on clipper52e. >>>>>>> I tried this to move the cursor from line 1 To Line 8

    After init oTB:tbrowsedb()
    oTB:addcolumn( )

    oTB:skipBlock := {|x| Skipped(x)}
    I did

    nkey:=inkey(0)


    After clicking mouse I did

    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    oTB:refreshAll()
    while ( !oTB:stabilize() ) ; end

    But nothing happend


    Any Idea?

    Med


    Hi Med!

    I think the line
    stuff(atail(oTB),47,0,i2bin(8)) ( for moving to line 8)
    does nothing.

    Have you tried this:
    oTB[Len(oTB)] := stuff(atail(oTB),47,0,i2bin(8))

    Regards
    Damir

    Hi Damir,

    It's the same?
    Did you work with these hiddens ?

    Best Regards
    Med


    Hi Med!

    It's not the same. Function Stuff doesn't change atail(oTB), it returns a
    changed copy of string atail(oTB).

    I haven't worked with these hiddens. Acctualy, I haven't heard about them
    until now.

    Regards

    Damir

    Dear Damir
    I agree with you. I did wrong but I have the same result. the cursor does
    not move to line 8 in oTB.

    Do you have any Idea?

    Best Regards

    Hi!

    I haven't noticed wrong parameter in stuff function, it should be:

    oTB[Len(oTB)] := stuff(atail(oTB),47,2,i2bin(8))

    because you wish to replace these two characters.


    Do you have any documentation about ATail(oTB) string?
    How do you know that characters on the 47. and 48. position in the string >> define row position in browse?
    Why don't you use :rowPos property of browse object? You can simply assing >> oTB:rowPos := 8

    Regards

    Damir

    Hi Damir,

    doing: rowPos:= nn does not work correctly when nn is mouse:row.

    to have TBINFO.TXT SEARCH it in this group simply type TBINFO.TXT in the message zone. I can send you more by mail.

    Best Regards .

    Med


    Hi!

    I'm sure you could calculate oTB:rowPos from mouse row (screen row).

    I found TBMORE.TXT and there said that offset 47 in atail(oTB) correspond
    to number of pending row skips during stabilization. It is not row
    position!

    Damir

    Hi Mirda

    I agree with you setting oTb:Rowpos is better. But I used the offsets 29,33 and 51 to set oTb:rowPos and oTb:colPos.

    Best Regards

    Med

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)