Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Downloads
Add
Search: 
Search

General practice recursion class
Dragan Nedeljkovich, Now officially retired
A general recursing class, which takes two parameters: the object to be scanned for members, and the name of the procedure to which to pass each member as a parameter. Includes a sample procedure which uses this class to drill down the members of _screen.activeform, and report on all of its members, their non-default properties, and size of custom code (for each method or event).
Created on
20 years ago
Downloads
711
File type
Rating
5.00/5.00
General information
URL:
ReCurse.zip
Rating:
5.00/5.00 (1 rate) Rate this item
Description
[2004/01/11 17:47:07] dragan - general purpose class for recursing through an object and its members Parameters toO - object to be recursed tcProc - procedure to which the object and each of its members will be passed Returns object of class Recurser as defined here Use write a procedure ("the.prg" in the sample) or any piece of code which accepts an object as a parameter 1) create the recurse object, set your initial object and procedure, run loRecurse=recurse() loRecurse.oObj=oMyObject loRecurse.cProc=cMyProc loRecurse.recurse() * reuse the loRecurse object as needed loRecurse.oObj=MyOtherObject * etc etc 2) Create the recurse object, pass your object and procedure directly to recurse method loRecurse=recurse() loRecurse.recurse(oMyobject, cMyMethod) 3) Pass both the object and procedure to this as a function - doesn't return anything: DO Recurse with oMyObject, cMyMethod A sample routine, inspectform.prg, is attached in the same zip where you found this. It makes a snapshot of all the non-default properties of the active form at the time it was run. Good for debugging - list memory doesn't give objects contents, only variables. Another usage (proposed by Hilmar Zonneveld) would be to build an array with all the controls on a form and make it an array property. Henceforth, any scanning of controls would simply traverse this array, without repeated recursion. To do: handle OLE objects better. Move to VFP8 and handle the errors using try/catch. General Public License applies. Dragan Nedeljkovich, 2004. I change emails too often. The one published on UniversalThread is good.
Created by
Dragan Nedeljkovich, Now officially retired
After (and/or along with) playing with Sinclair ZX Spectrum and Atari ST, I left teaching in 1986 and went through a series of machines and operating systems: CP/M (Cobol, Turbo pascal, CB-80 Basic), PDP and VAX (Cobol, Basic Plus 2, scripts), DOS 3.1 through 7.0, Windows 3.1 through XP. Ran several (almost) forgotten networks - RPTI, Lantastic, WFWG, Novell 2.x, 3.x, 4.x, Windows peer-to-peer and eventually NT and just plain IP (Win/Lin mix). After a brief flirt with Clipper in 1988, discovered...

Comments
Add a comment
More downloads created from this member
Fes - fox screen savior
Dragan Nedeljkovich, Now officially retired
Screen savior for multiple monitors. Actually just displays photos, needs more work to be installed as .scr file - creates its own .\zdata folder with tables just beneath itself instead of somewhere in %appdata%. This should be easy to do. Runs on a timer. Press ESC to exit.
Created on
6 years ago
Downloads
421
File type
Freeware
New form - pick your class
Dragan Nedeljkovich, Now officially retired
Scans for classes of baseclass Form along VFP path, keeps them in a table, and creates a new form from the class you pick.
Created on
24 years ago
Downloads
596
File type
T-order builder
Dragan Nedeljkovich, Now officially retired
Builder to make instantiation order of controls on a form equal to tab order
Created on
24 years ago
Downloads
503
File type
Alert.prg - custom messagebox
Dragan Nedeljkovich, Now officially retired
Accepts any number of lines in the message area, and may have any number of buttons, with custom captions. Hotkeys selected automatically.Returns the number of the clicked button or zero for Esc/closebox. Expands/shrinks with font size and name ...
Created on
25 years ago
Downloads
3158
File type
Rating
4.00/5.00
VPasns - a VFP Solitaire
Dragan Nedeljkovich, Now officially retired
A full-table solitaire game done entirely in VFP. No runtime included, supposing you all have it (needs VFP 5.0 runtime)
Created on
25 years ago
Downloads
904
File type
Hotkey inserter
Dragan Nedeljkovich, Now officially retired
Builder to insert \< into various captions on a form. Install included.
Created on
26 years ago
Downloads
824
File type
Crashed tables rebuilder
Dragan Nedeljkovich, Now officially retired
Generates routines to recover your tables Updated in 2023. (replaced the original 1997. version with a fresh one from 2003.) to contain code to read various new data formats, namely datetimes, floats, integers and such... not sure the old version had them). Not guaranteed to work at all. Someo...
Created on
26 years ago
Downloads
3275
File type
Freeware
Revision of Filer
Dragan Nedeljkovich, Now officially retired
Beta of Filer 2.0, based on MS's filer, without filer.dll (done entirely in VFP)
Created on
26 years ago
Downloads
1154
File type