Browse and button

[dardapu]

I need to control under FPW26 several browses and an exit button.

According to a I articulate of Foxpro Advisor of the year 1994
I have made the following code the one that uses the same base
for different presentations, for the example it shows the same fields.

*************
defi wind fondo from 0,0 to srows(),scols() color rgb(,,,,192,192,192)
defi wind cero from 0,0 to 5,scols()-5 color n/rg*
move wind cero center

defi wind uno from 0,0 to (srows()/2-5),scols()/2.1
defi wind dos from 0,scols()/1.9 to (srows()/2)-5,scols()
defi wind tres from (srows()/2)+5,0 to srows(),scols()/2.1
defi wind cuatro from (srows()/2)+5,scols()/1.9 to srows(),scols()

acti wind fondo
acti wind cero
@ 1,40 get salir pict "@*T Quit" defa 1 size 2,19

acti wind uno
acti wind dos
acti wind tres
acti wind cuatro

use articulo in 0
use articulo again alias art in 0
use articulo again alias dolar in 0
use articulo again alias oferta in 0

sele articulo
brow in wind uno nowai save
sele art
brow in wind dos nowai save
sele dolar
brow in wind tres nowai save
sele oferta
brow in wind cuatro nowai save

read cycle modal with articulo,art,dolar,oferta

close data base
rele wind cero,uno,dos,tres,cuatro,fondo

*********************************************

When executing the code, the windows are activated but alone it is shown active the I finish browse.
Some idea or correcion to the same one?.
Thank you

 

[DSummZZZ]

If I understand correctly, your READ needs the names of the windows, not the names of the tables. Also, to activate the 'Quit' window, add this line before the READ:

acti wind cero
read cycle modal with cero,uno,dos,tres,cuatro,fondo


-Dave S.-

Even more Fox stuff at:

http://www.davesummers.net/foxprolinks.htm

 

[JRB-Bldr]

By "hard coding"
Define Window <ThisWind>
1,40 get salir pict &quot;@*T Quit&quot; defa 1 size 2,19
Activate Window <ThisWind>
your windows, etc. you appear to be doing things the hard way.

Why not use Foxpro's Screen Designer and, at the same time, use GENSCRNX to allow you to combine both Browse Windows and GET's (Fields and Buttons) all within a single screen/window?

It is MUCH easier to do it that way.

If interested do a Keyword Search for GENSCRNX and you will find numerous postings on the topic and you will also find links where to get it.

Good Luck,


JRB-Bldr
VisionQuest Consulting
Business Analyst & CIO Consulting Services
CIOServices@yahoo.com

 

[dardapu]

I need to execute an application made in FPW26 in Visual 6.0.
In her I have several modules that work with Browses, which he has the bookstore Jkey.fll the one that allows to make an incremental search according to the applied order.
What I need is to get a library that can make the same thing and be compatible with
the visual one since the jkey to the being for fpw26 gives error.
Thank you

 

[dardapu]

Thank you for both ideas

 

[JRB-Bldr]

If you are looking for JKey functionality within Visual Foxpro you should create a posting in the VFP forum: forum184

With VFP there is no difficulty placing a GET button on the same Form (screen) as the Grid (Browse window).

Again, you would not be well advised to do this via &quot;hard coding&quot; like you show, but rather by using the VFP Form Designer to re-create your &quot;screens&quot;.

Good Luck,


JRB-Bldr
VisionQuest Consulting
Business Analyst & CIO Consulting Services
CIOServices@yahoo.com

 

[giridpi]

Best u can use GENSCRNX its more easy compare to ur program.

Giri