Bonjour William,
Le 14 avr. 08 à 18:39, william humphrey a écrit :
I forgot to say that it is a converted hypercard stack with
thousands of
cards. When in Hypercard I accomplished this by sorting the stack
by the
index fld.
On Mon, Apr 14, 2008 at 9:40 AM, william humphrey
<[EMAIL PROTECTED]>
wrote:
Can someone help me with a function?
If sort all cards by fld "index" doesn't work and fld "index" has
a bunch
of numbers in it which aren't in order and skip some values how do I
1. Find out what is the highest value in fld "index"?
2. Find out a list of any numbers that are duplicates?
I'm afraid that I do to much work of this sort in Excel and I
can't think
of a way to do this without dumping all the values to memory and
working on
them there.
The precision about the number of cards is important.
You say that your fld "Index" may have several values in it or I
missed something?
If all this is right, you could first run a code snippet to set a
custom property of every card to the higher value in its index:
Custom properties are not supported by HyperTalk but appear very
useful in Revolution ;-)
See the user guide.
function HigherValue pCdNumber
local temp
-----
put fld "Index" of cd pCdNumber into temp -- I assume several lines
replace cr with comma in temp
return max(temp)
end HigherValue
To set all cds in the stack:
repeat with i = 1 to the number of cards
set the uIndex of cd i to HigherValue(i) --
end repeat
You can run this code at any moment :-)
And you have now a custom property named uIndex that keeps the max
value of each index field
Then you can 'sort cards [direction] [sortType] by the uIndex of this
cd'
About to find duplicates, assuming you want to search the custom
property set above:
function DuplicatedCards
local tIndexList ,tDuplicates
-----
repeat with i = 1 to the number of cards
put the uIndex of this cd & cr after tIndexList
if the uIndex of cd i is among the lines of tIndexList then
put the short name of this cd & cr after tDuplicates
end repeat
delete char -1 of tDuplicates
return tDuplicates
end DuplicatedCards
Not sure if all this helps but if you are more specific many people
on this list will be able to help you :-)
Best regards from Paris,
Eric Chatonet.
----------------------------------------------------------------
Plugins and tutorials for Revolution: http://www.sosmartsoftware.com/
Email: [EMAIL PROTECTED]/
----------------------------------------------------------------
_______________________________________________
use-revolution mailing list
use-revolution@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
