Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Search within a project
Message
From
25/11/2003 12:14:13
 
 
To
25/11/2003 12:09:07
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00853363
Message ID:
00853364
Views:
17
Larry

Although it doesn't search through a project, just files, this is what I use:
LPARAM lcStr
LOCAL ARRAY lafiles(1, 1)
=ADIR(lafiles, "lib\*.vcx")

FOR x = 1 TO ALEN(lafiles, 1)
	USE ("lib\"+lafiles(x,1)) ALIAS CLASS IN 0
	lafiles(x,1) = JUSTSTEM(lafiles(x,1))+"found"
	SELE * FROM CLASS;
	WHERE (lcstr $ LOWER(methods) OR lcstr $ LOWER(properties));
	INTO CURSOR (lafiles(x,1))
	IF _TALLY = 0
		USE IN (lafiles(x,1))
	ENDIF
	USE IN CLASS
ENDFOR

=ADIR(lafiles, "form\*.scx")

FOR x = 1 TO ALEN(lafiles, 1)
	USE ("form\"+lafiles(x,1)) ALIAS CLASS IN 0
	lafiles(x,1) = JUSTSTEM(lafiles(x,1))+"found"
	SELE * FROM CLASS;
	WHERE (lcstr $ LOWER(methods) OR lcstr $ LOWER(properties));
	INTO CURSOR (lafiles(x,1))
	IF _TALLY = 0
	     USE IN (lafiles(x,1))
	ENDIF
	USE IN CLASS
ENDFOR
Any classes/forms (you can include prgs) that it finds will be held in a temporary cursor.

Kev

>I'm wondering if there is a utility that will search an entire project for a string of text. I'm deleting some buttons from a form and I would like to make sure there are no references to them in any of the other forms or programs. In the old spagetti code days (FoxBase, Foxpro DOS) I had a program that searched all my program code for .
>
>Thanks,
>Larry Morelli
Previous
Reply
Map
View

Click here to load this message in the networking platform