I am sure there are a lot of us older around and still looking to contribute to maintaining the Cl*pper legacy.
I also have used the language from Summer86 upto 5.2e with several libraies like Flexfile,Telepathy, LighLib & Blinker to name a few. I never moved up to 5.3 as I have all the...
The error at line 27 is expecting a key value. The following snippet will correct that error as function call expects a key value
private nTp := nTop - 2, nLft := nLeft + 1
//default nInKey TO 1
if empty(nInkey)
inkey := 1
endif
nRight += 2
The error at 425/428 is missing a semicolon...
Here is a set of functions that I use to search a alphabetic db of patients for an electronic medical record.
The first search is on last name and after pressing / or , or . will switch to first name than initial.
Although you are searching numbers and they are stored as characters, you can...
What I use regularly to create a new database with the structure from another is the following code snippet which is using a dbf (PS)using Flexfile (DBV) fields to a DBT structured file (PS_1).
Use PS VIA "FlexFile" NEW
aDbf := PS->(DBSTRUCT())
dbcreate('PS_1', aDbf, 'DBFNTX')
Use PS_1 NEW...
Make sure you have enough file handles allocated in your "files=" statement in your lnk file or your config.*
DBFNTX/1002 Open error (.dbt)
Explanation: The specified memo (.dbt) file could not be opened.
Action: Some suggestions to resolve the problem are:
1. Check to...
I did a search and found they are funcions from
Artful FreshWin.
If interested, you can order the Artful FreshWin library from:
Artful Applications Inc. . 176 St. George Street . Toronto, Ont. M5R 2M7
Voice (416) 920-7395 . Fax (416) 920-4892 . BBS (416) 538-3107
Sam
The V_ functions are from FLEXFILE.LIB which you haven't included in the .lnk script. I am not familiar with the other funcion calls, but you are not including the library they are a part of.
HAG
I have a series of menu style routines that I use extensively in some of my programs that perform tree-ing off I may be able to modify for use by you to obtain what I think you are wanting to do.
Can I contact you via info@yourwebsite or support@yourwebsite or give me another way. Or get...
Are you looking to do this by emulating a tree structure in a visual mode?
Did you think about using a series of tbrowses that when a line item in one tbrowse could branch off to another tbrowse to another tbrowse and so on...
It can be done. The way that I do it is to add a space at the beginning of the string in the first column. I load a dbf into an array
//--------------------------------------------------------
dbeval({|| aadd(a1, ' ' + db_names->db_name)} , ...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.