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
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
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
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
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
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
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
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
Sysop: | Keyop |
---|---|
Location: | Huddersfield, West Yorkshire, UK |
Users: | 286 |
Nodes: | 16 (2 / 14) |
Uptime: | 89:07:36 |
Calls: | 6,496 |
Calls today: | 7 |
Files: | 12,100 |
Messages: | 5,277,442 |