Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Refreshing BROWSE NOWAIT window
Message
 
 
To
04/10/2001 20:16:15
General information
Forum:
Visual FoxPro
Category:
FoxPro 2.x
Miscellaneous
Thread ID:
00564569
Message ID:
00564575
Views:
17
This message has been marked as the solution to the initial question of the thread.
Hi Claudio,

The browse window can be refreshed by SHOW WINDOW wzbrow REFRESH.
SET REFRESH TO N1, N2 controls automatic refresh.

>Hello all;
>
>Please help me ! a very strange behavior is happening with my screen.
>
>In the beggining, at SETUP code I call one procedure named browsers. After this I started a loop (its a order's data entry items). The first item is sucesfully being updated in the browser window. But, the others items not.
>
>I am positive that during the loop all the information is been properly writing on my cursor cur_coit, I already check it !
>
>Does any one can tell me, whats going on there ? ..or, How can I refresh a BROWSE NOWAIT wind. ?
>
>TIA
>
>CLAUDIO
>
>
>PROCEDURE browsers
>**
>IF  NOT WVISIBLE("Order's Items")
>    SELE cur_coit
>    go BOTT
>    DEFINE WINDOW wzbrow ;
>        AT 0, 75.100 ;
>        SIZE 44.250,105 ;
>        TITLE "Itens constantes na compra" ;
>        FONT "Arial", 7 ;
>        FLOAT ;
>        NOCLOSE ;
>        NOZOOM ;
>        NOMINIMIZE ;
>        SYSTEM
>    BROWSE NOWAIT WINDOW wzbrow;
>        FONT "Arial", 8 ;
>        NODELETE NOMENU NOAPPEND FIELDS ;
>        d4prodt               :H = "Code" :R,;
>        d4qtpec        :9     :H = "Qtde."  :R :v=wrele() :F,;
>        produtos.descricao    :48    :W=.F. :H = "Product's Description" :R,;
>        d4pruni        :9     :W=.F. :H = "$ Unit.",;
>        d4prtot        :11    :W=.F. :H = "$ Total";
>        WHEN  wwhen()
>    ******rest;
>    activate window wzbrow
>    RELEASE WINDOW wzbrow
>else
>    SELE cur_coit
>    activate window ("Order's items")
>    go TOP
>    SHOW GETS
>    SELE cur_coit
>ENDIF
>**
>RETURN
>
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform