Hi Albert,
Remember All of these Oldies:
*( In R:BASE 3.1, you can choose a file from a list of files when you
)
*( want to execute a disk function. By using the undocumented feature
)
*( described in this article, you can add this functionality to your
)
*( applications. All you need to do is use a special keyword option such
)
*( as #DRIVES, #DIR, or #LFILES in a pop-up or check box menu file.
)
*(
)
*( The special options, referred to as pound puppies, make the menu
)
*( dynamic--they pull current information from the computer or from the
)
*( currently open database as appropriate. Use the following commands in
)
*( your application to create the dynamic menu, replacing #PUPPY with
the )
*( actual option you want to use.
)
OUTPUT filename.$$$
WRITE 'Title'
WRITE 'POPUP |Choose from this list.|'
WRITE '#puppy'
OUTPUT SCREEN
*( After creating the menu, use the CHOOSE command to prompt the user to
)
*( choose from the list. For example, you might use this CHOOSE:
)
*(
)
CHOOSE vfile FROM filename.$$$ AT 5,10 CLEAR
*(
)
*( If you prefer, you can also create check box menus by changing POPUP
)
*( on the third line to CHKBOX
)
*(
)
*(
)
*( Examples
)
*( """"""""
)
*( This example uses #LFILES to list the files in the current directory:
)
*(
)
OUTPUT f.$$$
WRITE 'Title'
WRITE 'POPUP |Choose a file.|'
WRITE '#LFILES'
OUTPUT SCREEN
CHOOSE vfile FROM f.$$$ AT 5,10 CLEAR
*( To list files with a specific extension such as .TXT, include the
)
*( extension following #LFILES, as in this example:
)
*(
)
OUTPUT f.$$$
WRITE 'Title'
WRITE 'POPUP |Choose a file.|'
WRITE '#LFILES TXT'
OUTPUT SCREEN
CHOOSE vfile FROM f.$$$ AT 5,10 CLEAR
*(
)
*( Include only the extension, not the period (TXT not .TXT). The file
)
*( names show up in the menu without the extension (MYDOC not
MYDOC.TXT). )
*(
)
*( To enable the user to choose multiple files at the same time, use a
)
*( check box menu instead of a pop-up menu, as in this example:
)
*(
)
OUTPUT f.$$$
WRITE 'Title'
WRITE 'CHKBOX |Choose several files.|'
WRITE '#LFILES'
OUTPUT SCREEN
CHOOSE vfile FROM f.$$$ AT 5,10 CLEAR
*(
)
*(
)
*( All the Puppies
)
*( """""""""""""""
)
*( Here's a complete list of all the pound puppies you can use in pop-up
)
*( and check box menu files.
)
*(
)
*( [] #LFILES--List all the files in the current directory.
)
*( [] #LFILES ext--List just the file names (not the extensions) of
)
*( the files in the current directory that have the extension
)
*( specified.
)
*( [] #DRIVES--List all accessible drives on the computer including
)
*( network drives. The current drive is included in the list but
)
*( it's gray to prevent the user from choosing it.
)
*( [] #DIR--List all the subdirectories in the current directory and
)
*( includes an option for Parent Directory if there is one. The
)
*( current directory is included in the list but it's gray to
)
*( prevent the user from choosing it.
)
*( [] #TABLES--List all the tables in the currently open database.
)
*( [] #RBASE--List all the R:BASE tables in the currently open
)
*( database, excluding any dBASE files that may be attached to the
)
*( database.
)
*( [] #DBASE--List all the dBASE files that are attached to the
)
*( currently open R:BASE database.
)
*( [] #COLUMNS IN tblname--List all columns in the specified table.
)
*( [] #FORMS--List all the forms in the currently open database.
)
*( [] #REPORTS--List all the reports in the currently open database.
)
*( [] #LABELS--List all the labels in the currently open database.
)
*( [] #DATABASE--List all the R:BASE databases in the current
)
*( directory.
)
*( [] #GLOBAL--List all the global variables currently residing in
)
*( memory.
)
*( [] #VIEWS--List all the views in the currently open database.
)
*( [] #TBLVIEWS--List all the tables and all the views in the
)
*( currently open database.
)
*( [] #APP--List all the R:BASE application files with .APX
extensions )
*( in the current directory.
)
On Sunday, October 8, 2017 at 1:56:33 PM UTC-4, alb969 wrote:
>
> I owe the DUH fund at least $5
>
> CHOOSE FROM #LFILES IN *.rx1 ……
>
> Albert
--
For group guidelines, visit
http://www.rbase.com/support/usersgroup_guidelines.php
---
You received this message because you are subscribed to the Google Groups
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to rbase-l+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
