Mark-
(correcting the typo and...)
on findit pTextToFind
local x, y
local tText
local tFoundList
repeat for each line tCard in the cardnames of this stack
repeat with y = 1 to number of fields of card tCard
put field y of card tCard into tText
if pTextToFind is in tText then
put tCard,y & cr after tFoundList
end if
end repeat
end repeat
return tFoundList
end findit
--
-Mark Wieder
mwie...@ahsoftware.net
_______________________________________________
use-livecode mailing list
use-livecode@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode
