Alaska Software Inc. - oTB:hitBottom equivalent for XbpBrowse ?
Username: Password:
AuthorTopic: oTB:hitBottom equivalent for XbpBrowse ?
AUGE_OHRoTB:hitBottom equivalent for XbpBrowse ?
on Mon, 07 Aug 2006 13:56:57 +0200
hi,

how to "translate" Tbrowse:hitbottom to XbpBrowse ?

DO WHILE .T.
*   SKIP
  oBrowse:down()
  oBrowse:refreshCurrent()
  IF EOF() .OR. oBrowse:hitbottom
      EXIT
  ENDIF
ENDDO

greetings by OHR
Jimmy
AUGE_OHRRe: oTB:hitBottom equivalent for XbpBrowse ?
on Tue, 08 Aug 2006 12:44:20 +0200
hi,

> how to "translate" Tbrowse:hitbottom to XbpBrowse ?

is there realy no workaround for it ?

> DO WHILE .T.
> *   SKIP
>   oBrowse:down()
>   oBrowse:refreshCurrent()
>   IF EOF() .OR. oBrowse:hitbottom
>       EXIT
>   ENDIF
> ENDDO
>
greetings by OHR
Jimmy
Tim SnyderRe: oTB:hitBottom equivalent for XbpBrowse ?
on Tue, 08 Aug 2006 07:54:57 -0400
There's a hitbottomblock. The description is confusing, but maybe it's a 
place to start.

"AUGE_OHR" <AUGE_OHR*AT*CSI.COM> wrote in message 
news:194da220$3d04d556$c2a18@news.alaska-software.com...
> hi,
>
> how to "translate" Tbrowse:hitbottom to XbpBrowse ?
>
> DO WHILE .T.
> *   SKIP
>  oBrowse:down()
>  oBrowse:refreshCurrent()
>  IF EOF() .OR. oBrowse:hitbottom
>      EXIT
>  ENDIF
> ENDDO
>
> greetings by OHR
> Jimmy
>
>
AUGE_OHRRe: oTB:hitBottom equivalent for XbpBrowse ?
on Tue, 08 Aug 2006 14:47:32 +0200
hi,

> There's a hitbottomblock. The description is confusing, but maybe it's a
> place to start.

thx for Answer, i saw that but what to place into codeblock ?
{|| Field->EOF() }does not have a Effect when i do not use SKIP ...

greetings by OHR
Jimmy
AUGE_OHRRe: oTB:hitBottom equivalent for XbpBrowse ?
on Tue, 08 Aug 2006 23:40:53 +0200
hi,

does someone use XbpBrowse:hitbottomblock ?
does it realy work in v1.9x  ?

can someone please show me a working sample using oBrowse:down() ...

greetings by OHR
Jimmy
mark carew Re: oTB:hitBottom equivalent for XbpBrowse ?
on Wed, 09 Aug 2006 08:27:15 +1000
Hi AUGE

In the xbpbrowse:doSkip method is code that says if the number of records
skipped is less than requested and the hitbottom block is a code block then
execute (eval) that code block.

Thus, you just place the code you wish to be executed in the
:hitBottomBlock.

Are you browsing an array or a table?

Regards
Mark


 On Mon, 07 Aug 2006 13:56:57 +0200, AUGE_OHR wrote:

> hi,
> 
> how to "translate" Tbrowse:hitbottom to XbpBrowse ?
> 
> DO WHILE .T.
> *   SKIP
>   oBrowse:down()
>   oBrowse:refreshCurrent()
>   IF EOF() .OR. oBrowse:hitbottom
>       EXIT
>   ENDIF
> ENDDO
> 
> greetings by OHR
> Jimmy
AUGE_OHRRe: oTB:hitBottom equivalent for XbpBrowse ?
on Wed, 09 Aug 2006 02:12:06 +0200
hi,

> In the xbpbrowse:doSkip method is code that says if the number of records
> skipped is less than requested and the hitbottom block is a code block
then
> execute (eval) that code block.

i like to use o:hitbottomblock together with o:down() in a DO WHILE loop
and that seems NOT to work.

> Thus, you just place the code you wish to be executed in the
> :hitBottomBlock.

oBrowse::hitBottomBlock. := {|| EOF() } -> EVAL() -> .T. if end reached ?

> Are you browsing an array or a table?

i attach a Demo.

start Demo, click on "Browse".
click on Button "F8 = SPAM" until "end".

now while you are on the last record click on "F8 = SPAM" again !!!
... to stop press ALT-C

greetings by OHR
Jimmy




Bro_down.zip
J.A. Diego KerejetaRe: oTB:hitBottom equivalent for XbpBrowse ?
on Wed, 09 Aug 2006 10:01:49 +0200
Hi Jimmy, try:

.........
oBrowse:hitBottomBlock:= {|| lBottom:= .T. }
.........

lBottom:= .F.
DO WHILE .T.
   oBrowse:down():forceStable()

   IF IN_MAIL->IN_WAHL <> "D"
      EXIT
   ENDIF
   IF lBottom
      MSGBOX("EOF")
      EXIT
   ENDIF
ENDDO

Regards

Diego
AUGE_OHRRe: oTB:hitBottom equivalent for XbpBrowse ?
on Wed, 09 Aug 2006 14:49:15 +0200
hi,

> Hi Jimmy, try:
> oBrowse:hitBottomBlock:= {|| lBottom:= .T. }
...
> lBottom:= .F.
> DO WHILE .T.
>    oBrowse:down():forceStable()

Diego you are my Hero !!! This works !!!

using a STATIC lBottom AND :forceStable() give me the result i wanted.
... "seems" that o:hitBottomBlock will only set when "o:stable"
(=:forceStable) ?!

thx a lot
greetings by OHR
Jimmy
AUGE_OHRRe: oTB:hitBottom equivalent for XbpBrowse ?
on Wed, 09 Aug 2006 22:04:46 +0200
here the Answer from Alaska :

*** snip ***
Hallo,

 super damit ist das Problem ja geloest. Es stimmt die
 Dokumentation schweigt sich darber aus, das
 :HitTop/Bottomblock nur bei einem ::ForceStable()
 durch ::ForceStable() die jeweiligen Codeblcke
 evaluiert werden.

 Wir werden dies entsprechend korrigieren, besten
 Dank hierfr.

 Mit besten Gren aus Eschborn,
   Steffen F. Pirsig
  Alaska Software

*** eof ***

i try to translate :

"it is true that the Documentation does not say that
 :HitTop/Bottomblock only work with ::ForceStable()
while ::ForceStable() do Eval these Codeblock

we will enhance helpfile ..."

greetings by OHR
Jimmy